viewing paste Unknown #26181 | Text

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 42 43 44 45 46 47 48 49 50
prontera,155,178,5  script  ldjfhksfjs  100,{
    end;
OnInit:
    .minplayer2start = 5; // minimum player to start
    .summon_clone = 3; // summon how many evil clone per player
L_Reset:
    waitingroom "Clone Event", .minplayer2start +1, strnpcinfo(0)+"::OnEventInit", .minplayer2start;
    end;
OnEventInit:
    if ( getwaitingroomstate(0) < .minplayer2start ) end;
    warpwaitingpc "guild_vs2", 0,0;
    killmonster "guild_vs2", strnpcinfo(0)+"::Onclonedead";
    for ( .@i = 0; .@i < $@warpwaitingpcnum; .@i++ )
        for ( .@j = 0; .@j < .summon_clone; .@j++ )
            clone "guild_vs2", 0,0, strnpcinfo(0)+"::Onclonedead", getcharid( 0, rid2name( $@warpwaitingpc[.@i] ) );
    .count = .minplayer2start * .summon_clone;
    copyarray .register_aid, $@warpwaitingpc,  $@warpwaitingpcnum;
    delwaitingroom;
    end;
Onclonedead:
    .count--;
    if ( .count ) end;
    announce "all clones are dead !", 0;
    .@size = getarraysize( .register_aid );
    for ( .@i = 0; .@i < .@size; .@i++ )
        getitem 501, 1, .register_aid[.@i]; // reward item here
    getmapxy .@map$, .@x, .@y, 1;
    mapwarp "guild_vs2", .@map$, .@x, .@y;
    goto L_Reset;
OnPCDieEvent:
OnPCLogoutEvent:
    if ( strcharinfo(3) != "guild_vs2" ) end;
    .@size = getarraysize( .register_aid );
    while ( .register_aid[.@i] != getcharid(3) && .@i < .@size ) .@i++;
    deletearray .register_aid[.@i], 1;
    warp "Save", 0,0;
    if ( .@size > 1 ) end;
    announce "all players died, what a failure", 0;
    killmonster "guild_vs2", strnpcinfo(0)+"::Onclonedead";
    goto L_Reset;
}
 
guild_vs2   mapflag nosave  SavePoint
guild_vs2   mapflag nowarp
guild_vs2   mapflag nowarpto
guild_vs2   mapflag noteleport
guild_vs2   mapflag nomemo
guild_vs2   mapflag nopenalty
guild_vs2   mapflag nobranch
guild_vs2   mapflag noicewall
Viewed 881 times, submitted by Guest.