The Dink Network

You forgot to kill the script. You always need to kill the script manually after you've done a script_attach(1000)! Just put this line after unfreeze(1);

kill_this_task();

Also, it might be a good idea to disable touch damage when warping, just to make sure the script isn't run multiple times. Here is the edited version:

void main(void)
{
    //first we make sprite touchable
    sp_touch_damage(&current_sprite, -1);
}
void touch(void)
{
     if(&story == 1)
     {
          sp_touch_damage(&current_sprite, 0);
          freeze(1);
          //fade down the screen after freezeing dink
          fade_down(); 
          script_attach(1000); 
          //&player map is the screen number
          &player_map = 120; 
          //loads map
          load_screen(); 
          //draws map
          draw_screen(); 
         //we have to freeze dink again after wrap
         freeze(1);
         //where should dink appear?
         sp_x(1, 180); 
         sp_y(1, 250); 
        //let's fade up screen
        fade_up();
        unfreeze(1);
        kill_this_task();
    }
    else
    {
         //on the other condition do the same thing but     
        //change loacation and screen number
    }
}

And I don't see any reason why it would need to be hard. Sure Dink can walk straight through the door when it isn't hard, but there would not be any fundamental reason why it wouldn't work...