Here's what I have of a hunt mode so far
I am having a problem with it though, the player variable 'playerhunted' is never 1, even when i explicitly set it to 1 and remove any case where it's set to 0.\
Code:
;;Game Logic
event_start $mode:Hunt 'var_add Hunt 1;var_set Hunt 1;cevent InitHunt'
event_custom $ename:InitHunt $mode:Hunt 'cheat_jetpack 1;timelimit $pn*3;sv_name " XVS.Arcadium(() => new Hunt(DeathIsland))"'
event_custom $ename:InitHunt $mode:Hunt 'var_add Round 1;var_add RoundTime 1;var_set RoundTime 10;var_add Hunter 1;var_add chkReported 1;var_add chkHunted 1'
event_custom $ename:InitHunt $mode:Hunt 'var_add Debug 1;var_set Debug 1;var_add playerhunted 4;var_add plyReported 4'
event_custom $ename:InitHunt $mode:Hunt 'cevent EndRound;cevent clk;cevent InitPlayer'
event_custom $ename:InitPlayer $n=0 $pn>0 'var_add iply 1;var_set iply 1;cevent InitPlayer $iply;w8 1;var_del iply'
event_custom $ename:InitPlayer $n>0 $pn>=$iply 'var_set iply +1;st $n blue;wait 100;cevent InitPlayer $iply'
event_end $mode:Hunt 'cevent EndHunt'
event_custom $ename:EndHunt $mode:Hunt 'cheat_jetpack 0;sv_name " XVS.Arcadium( > Game Over < )"'
event_custom $ename:EndHunt $mode:Hunt 'var_del Round;var_del RoundTime;var_del Hunter;var_del chkReported;var_del chkHunted'
event_custom $ename:EndHunt $mode:Hunt 'var_del Debug;var_del playerhunted;var_del plyReported'
event_join $mode:Hunt 'var_set playerhunted 0;st $n blue;timelimit +2'
event_leave $mode:Hunt 'timelimit -1'
event_leave $mode:Hunt $playerhunted=1 'timelimit -1;var_set playerhunted 0'
event_custom $ename:clk $Round<3 'w8 1;cevent clk'
event_custom $ename:clk $RoundTime>0 'var_set RoundTime -1'
;; Debugger
event_custom $ename:HuntDebug $mode:Hunt $Debug=0 'sv_say "Debug mode enabled";var_add debugRound 1;var_add debugHunter 1;wait 500;var_set Debug 1;var_add dply 1'
event_custom $ename:HuntDebug $mode:Hunt $Debug=1 'sv_say "Debug mode disabled";var_set Debug 0;var_del debugRound;var_del debugHunter'
event_custom $ename:DebugDump $n=0 $mode:Hunt 'sv_say "Round: $Round, Hunter: $Hunter, Round Time: $RoundTime"'
event_custom $ename:DebugDump $n!=0 $mode:Hunt 'sv_say "$name: Hunted: $playerhunted Health: $hp Shield: $sh"'
event_custom $ename:clk 'cevent DebugDump'
event_custom $ename:InitPlayer $n=0 'sv_say "Initializing Players..."'
event_custom $ename:InitPlayer $n>0 'sv_say "Setting $name to hunt";cevent DebugDump $n'
event_custom $Debug=1 $ename:StartRound $mode:Hunt 'sv_say "The Hunting Round begins.";cevent DebugDump;cevent DebugDump $Hunter'
event_alive $Debug=1 $mode:Hunt $Round=0 $n=$Hunter $RoundTime<=0 'sv_say "Hunter has survived and will get another turn"'
event_custom $Debug=1 $ename:EndRound $mode:Hunt 'sv_say "The Post Round begins";cevent DebugDump'
event_spawn $Debug=1 $mode:Hunt $Round=1 $playerhunted=0 $Hunter=0 'sv_say "$name qualifies to be the hunter";cevent DebugDump $n'
event_alive $Debug=1 $mode:Hunt $Round=1 $playerhunted=0 $Hunter=0 'sv_say "$name qualifies to be the hunter";cevent DebugDump $n'
event_alive $Debug=1 $Round=1 $RoundTime<=0 $mode:Hunt 'sv_say "Post Round is over, continue to selection."'
event_alive $Debug=1 $mode:Hunt $Round=2 $Hunter!=0 'sv_say "The hunter has already been chosen, skip selection."'
event_alive $Debug=1 $mode:Hunt $Round=2 $plyReported=0 'sv_say "$name reporting... $chkReported+1"'
event_alive $Debug=1 $mode:Hunt $Round=2 $playerhunted=1 'sv_say "$name has hunted before -- will not hunt again.";cevent DebugDump;cevent DebugDump $n'
event_alive $Debug=1 $mode:Hunt $Round=2 $chkHunted=$pn 'sv_say "All players reporting and hunt limit is reached, the game will not continue.";cevent DebugDump'
event_alive $Debug=1 $mode:Hunt $Round=2 $chkReported=$pn 'sv_say "All players reporting and hunt limit not reached, the game will continue.";cevent DebugDump'
;;;;;;;;;;;;;;;;;;
;; Hunting Round
event_custom $ename:StartRound $mode:Hunt 'var_set Round 0;var_set RoundTime 120;cheat_deathless_player 0;slayer_score_team red $RoundTime;t $Hunter hunterspawn;w8 1;spawn vehi vehicles\banshee\banshee_mp $Hunter;venter $Hunter'
event_alive $mode:Hunt $Round=0 $n=$Hunter $RoundTime<=0 'say * "$name lives to hunt again!";var_set playerhunted 0;cevent EndRound'
event_alive $mode:Hunt $Round=0 $plyReported=1 'var_set plyReported 0'
event_kill $mode:Hunt $Round=0 $n=$Hunter $combo=1 'wait 200;say * "+3 seconds";var_set RoundTime +3'
event_kill $mode:Hunt $Round=0 $n=$Hunter $combo=2 'wait 200;say * "Double Kill! +5 seconds";var_set RoundTime +5'
event_kill $mode:Hunt $Round=0 $n=$Hunter $combo=3 'wait 200;say * "Triple Kill! +10 seconds";var_set RoundTime +10'
event_kill $mode:Hunt $Round=0 $n=$Hunter $combo>=4 'wait 200;say * "Multi Kill! +15 seconds";var_set RoundTime +15'
event_die $mode:Hunt $Round=0 $n=$Hunter 'say * "The hunt is over!";cevent EndRound'
event_teamswitch $n=$Hunter $team:blue 'wait 200;st $n red'
event_die $n=$Hunter $team:blue 'wait 200;st $n red'
event_teamswitch $n!=$Hunter $team:red 'wait 200;st $n blue'
event_die $n!=$Hunter $team:red 'wait 200;st $n blue'
;; Post Round
event_custom $ename:EndRound $mode:Hunt 'var_set Hunter 0;var_set Round 1;wait 200;say * "Next round begins in 10 seconds.";cheat_deathless_player 1;mag * 3200 5;battery * 3200 5'
event_alive $mode:Hunt $Round=1 's * $RoundTime/10'
event_spawn $mode:Hunt $Round=1 $playerhunted=0 $Hunter=0 'var_set Hunter $n;var_set playerhunted 1;wait 200;st $n red;w8 2;say * "$name is the next Hunter"'
event_alive $mode:Hunt $Round=1 $playerhunted=0 $Hunter=0 'var_set Hunter $n;var_set playerhunted 1;kill $n;wait 500;st $n red;w8 1;say * "$name is the next Hunter"'
event_alive $Round=1 $RoundTime<=0 $mode:Hunt 'kill *;wait 100;vdel *;wait 200;st * blue;var_set Round 2;var_set PostRound 10'
;; Selection Round
event_alive $mode:Hunt $Round=2 $Hunter!=0 'cevent StartRound'
event_alive $mode:Hunt $Round=2 $plyReported=0 $playerhunted=1 'var_set chkHunted +1'
event_alive $mode:Hunt $Round=2 $plyReported=0 'var_set chkReported +1;var_set plyReported 1'
event_alive $mode:Hunt $Round=2 $chkHunted=$pn 'god *;s * 0;say * "Everyone has hunted... The game is over!";var_set Round 3;sv_map_next'
event_alive $mode:Hunt $Round=2 $chkReported=$pn 'var_set Round 0'
;; Kill messages
event_kill $mode:Hunt $Round=0 $n!=$Hunter 'var_add Randomchat;var_set Randomchat $rand'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=1 'say * "$name killed the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=2 'say * "$name ended the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=3 'say * "$name stopped the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=4 'say * "$name cancelled the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=5 'say * "$name terminated the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=6 'say * "$name hunted the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=7 'say * "$name wrecked the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=8 'say * "$name denied the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=9 'say * "$name killed the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=10 'say * "$name ended the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=11 'say * "$name stopped the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=12 'say * "$name cancelled the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=13 'say * "$name terminated the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=14 'say * "$name hunted the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=15 'say * "$name wrecked the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter $Randomchat=16 'say * "$name denied the hunter!";var_set Randomchat 0'
event_kill $mode:Hunt $Round=0 $n!=$Hunter 'var_del Randomchat'
Also, can you add an event_load event? event_start doesn't fire when I run reload, which is quite often when trying to debug this behemoth.
Bookmarks