viewing paste Unknown #19793 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
//~~~~~~~~~~~~~ Start ~~~~~~~~~~~~~
OnClock1800:
OnWhisperGlobal:
        set $rmk_active,1;
        donpcevent "Uknown::OnEffect";
        donpcevent "Testin::OnBildChat";
       
        mapwarp "map1","map2",x,y;
        announce "my script goes here",bc_all;
        setcell "map",150,149,150,149,cell_walkable,0;
        set $@BatAlive,8;
        monster "map-1",152,145,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",154,147,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",154,152,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",152,154,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",147,154,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",145,152,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",147,145,"Barricade",1905,1,"Test::OnBatDie";
        monster "map-1",145,147,"Barricade",1905,1,"Test::OnBatDie";
        pvpon "map-1.gat";
        end;
 
//~~~~~~~~~ End (Nach Zeit) ~~~~~~~~~
 
OnClock1900:
        if($rmk_active) {
                announce "my script goes here",bc_all;
                mapwarp "map","map",x,y;
                sleep 1000;
                killmonsterall "map";
                set $rmk_active,0;
                pvpoff "map";
                sleep 5000;
                announce "my script goes here",bc_all;
        }
        end;
 
OnWhisperGlobal:
        goto OnClock1800;
        end;
 
Viewed 630 times, submitted by unknown.