viewing paste jtynne eden race | 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 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135
uro_maze01,33,154,5 script  Race Entry#eden 91,10,10,{
set .@n$,"[Eden Race Event]";
OnTouch:
atcommand "@option 0";
set @palette, getlook(7);
set savePalette, @palette;
if(getgmlevel() >= 10) { mes "Continue as player or start the event?"; next; menu "Continue",-,"Start Event",L_gmstart; }
if($edenrace < 1) { mes .@n$; mes "Sorry, this event is not currently active."; close; end; }
mes .@n$;
mes "Welcome to the Eden Race Event! You will now be sorted into a team. The object of this game is to be the first player to cross the finish line. Only one member of your team has to cross the finish line for your team to win the event. Good luck!";
next;
if($raceteameden == 0) { setlook 7, 202; set $raceteameden,1; set raceteam$,"Orange"; warp "uro_maze01",39,92; end;}
if($raceteameden == 1) { setlook 7, 421; set $raceteameden,0; set raceteam$,"Pink"; warp "uro_maze01",161,92; end;}
 
OnClock2300:
OnClock0700:
OnClock1000:
OnClock1630:
donpcevent "Race Entry#eden::OnStartGame";
end;
 
L_gmstart:
mes "The event will now begin.";
close2;
goto OnStartGame;
end;
 
OnStartGame:
// Clear Race Variables
set $er_place,0;
set $er_winteam$,"null";
set $raceteameden,0;
 
// Begin Script
announce "The Eden Race Event is about to begin. Entry to the event will close in 3 minutes. Only level 1/1 Novices may participate in the event. Enter via a Player Services NPC to participate!",bc_all,0xF7DA9D;
set $edenrace,1;
sleep 180000;
 
mapannounce "uro_maze01","The first participant to cross the finish line will earn 1 Casual Coin for every person on their team. The first three participants to cross the finish line will each receive 1 Reward Point Coin and 2 Casual Coins.",0;
sleep 10000;
 
mapannounce "uro_maze01","You will be teleported into the race track momentarily. You will be running to the west first, so get your mouse ready! You must head north through the winding path. Good luck!",0;
 
sleep 5000;
mapannounce "uro_maze01","- 5 -",0;
sleep 1000;
mapannounce "uro_maze01","- 4 -",0;
sleep 1000;
mapannounce "uro_maze01","- 3 -",0;
sleep 1000;
mapannounce "uro_maze01","- 2 -",0;
sleep 1000;
mapannounce "uro_maze01","- 1 -",0;
sleep 1000;
mapannounce "uro_maze01","- GO! -",0;
mapwarp "uro_maze01","uro_maze01",131,47;
set $edenrace,2;
end;
 
}
 
uro_maze01,78,120,4 script  Finish#edenrace -1,1,7,{
OnTouch:
if($edenrace == 2) {
set $er_place,$er_place+1;
if($er_place >= 3) {
mapannounce "uro_maze01",strcharinfo(0)+" is the third to cross the finish line!",0; getitem 20022,1;
set $edenrace,0;
warp "uro_maze01",153,142;
sleep 2000;
mapannounce "uro_maze01","Thus concludes this round of Eden Racing! You will be warped to the exit momentarily. You will receive your award upon departure.",0;
sleep 5000;
mapwarp "uro_maze01","uro_maze01",153,142;
end;
}
if($er_place == 1) { set $er_winteam$,raceteam$; mapannounce "uro_maze01","Congratulations "+$er_winteam$+" team members! "+strcharinfo(0)+" has crossed the finish line first, awarding your entire team with 1 Reward Point Coin and 2 Casual Coins each.",0; getitem 20022,1; getitem 20048,2; warp "uro_maze01",153,142; end;}
if($er_place == 2) { mapannounce "uro_maze01",strcharinfo(0)+" is the second to cross the finish line!",0; getitem 20022,1; warp "uro_maze01",153,142; end;}
 
 
}
logmes strcharinfo(0)+" is in the race event illegally.";
end;
}
 
uro_maze01,157,146,4    script  Exit#edenrace   -1,10,10,{
OnTouch:
setlook 7, savePalette;
if(raceteam$ == $er_winteam$) { getitem 20022,1; getitem 20048,2; dispbottom "Congratulations! You've earned 1 Reward Point Coin and 2 Casual Coins!"; warp "SavePoint",0,0; end; }
else { dispbottom "Better luck next time! You've received 1 Casual Coin as a consolation prize."; warp "SavePoint",0,0; getitem 20048,1; end; }
 
}
 
uro_maze01,120,93,0 script  Boobytrap::boobye   -1,3,30,{
OnTouch:
                unequip EQI_HEAD_TOP;
                unequip EQI_ARMOR;
                unequip EQI_HAND_L;
                unequip EQI_HAND_R;
                unequip EQI_GARMENT;
                unequip EQI_SHOES;
                unequip EQI_ACC_L;
                unequip EQI_ACC_R;
                unequip EQI_HEAD_MID;
                unequip EQI_HEAD_LOW;
                sc_end SC_ALL;
if(isequipped(4141) > 0) { mes "[Staff]"; mes "Take off your Evil Druid you cheater-weater-pumpkin eater! Nyaaa~"; sleep2 3000; warp "uro_maze01",131,47; end; }
if(ismounting() || checkriding()) { mes "[Staff]","Take off your mount to participate!"; sleep2 3000; warp "uro_maze01",131,47; end; }
set .@rand,rand(1,20);
if(.@rand == 1) { sc_start SC_Stone,5000,0; }
if(.@rand == 2) { sc_start SC_Freeze,10000,0; }
if(.@rand == 3) { sc_start SC_Freeze,3000,0; }
if(.@rand == 4) { sc_start SC_CONFUSION,8000,0;}
if(.@rand == 5) { sc_start SC_SLEEP,4000,0;}
if(.@rand == 6) { sc_start SC_STUN,4000,0; }
if(.@rand == 7) { sc_start SC_SLEEP,1000,0;}
if(.@rand == 8) { sc_start SC_SLEEP,7000,0; }
if(.@rand == 9) { sc_start SC_BLIND,60000,0;}
if(.@rand == 10) { sc_start SC_Stone,3000,0; }
if(.@rand > 10) { end; }
end;
}
 
uro_maze01,86,73,0  duplicate(boobye)   Boobytrap#01    -1,3,20
uro_maze01,107,73,0 duplicate(boobye)   Boobytrap#02    -1,3,20
uro_maze01,124,74,0 duplicate(boobye)   Boobytrap#03    -1,3,20
uro_maze01,86,109,0 duplicate(boobye)   Boobytrap#04    -1,3,20
uro_maze01,112,111,0    duplicate(boobye)   Boobytrap#05    -1,3,20
uro_maze01,109,63,0 duplicate(boobye)   Boobytrap#06    -1,3,20
uro_maze01,78,56,0  duplicate(boobye)   Boobytrap#07    -1,3,20
 
uro_maze01  mapflag nomemo
uro_maze01  mapflag noteleport
uro_maze01  mapflag noskill
uro_maze01  mapflag nobranch
uro_maze01  mapflag noreturn
Viewed 806 times, submitted by Guest.