//~~~~~~~~~~~~~ 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;