;============================================================ ;Wavestorm - By Jarel Jones (http://wavestorm.rangerwiki.com) ;============================================================ ; ;Information on file usage in Readme.txt. ;This file contains the following: ;Various aliases. alias changechat { set %wavechat $input(What chat room do you want to run Wavestorm in? #wavestorm is the $+(default,$chr(44)) but you can type any chat you want down below.,65,Wavestorm,#wavestorm) if ($left(%wavechat,1) != $chr(35)) { set %wavechat $+($chr(35),%wavechat) } } alias wavestorm-s15switch { if (%wavestorm-battleground == s15) { set -n %wavestorm-battleground s16 .notice %wavechat Wavestorm s15switch %wavestorm-battleground display2 %wavechat and all the combatants scream as the shuttle explodes, sending them flying into deep space! } elseif (%wavestorm-battleground == s16) { set %wavestorm-s15dummystage $rand(1,3) if (%wavestorm-s15dummystage == 1) { set -n %wavestorm-battleground s17 .notice %wavechat Wavestorm s15switch %wavestorm-battleground display2 %wavechat and all the combatants crashland on a lush world, where the jungle plantlife is tall and the animals are fierce! } elseif (%wavestorm-s15dummystage == 2) { set -n %wavestorm-battleground s18 .notice %wavechat Wavestorm s15switch %wavestorm-battleground display2 %wavechat and all the combatants crashland on an arid world, where the worms are massive, and the wind increases attack power! unset %wavestorm-s15dummystage } elseif (%wavestorm-s15dummystage == 3) { set -n %wavestorm-battleground s19 .notice %wavechat Wavestorm s15switch %wavestorm-battleground display2 %wavechat and all the combatants crashland on a water world, where the waves are rough, and the turbulence randomizes magic attack power! } unset %wavestorm-s15dummystage } elseif ((%wavestorm-battleground == s17) || (%wavestorm-battleground == s18) || (%wavestorm-battleground == s19)) { set -n %wavestorm-battleground s15 .notice %wavechat Wavestorm s15switch %wavestorm-battleground display2 %wavechat and all the combatants hop in a newer model space shuttle and blast off! } .timers15 1 $rand(300,480) wavestorm-s15switch } alias wavestorm-frenzycool { set %wavestorm-z17 2 unset %wavestorm-z05* unset %wavestorm-z06* unset %wavestorm-z07* .timerfrenzy off .timerfrenzy2 1 45 wavestorm-frenzyoff if (%wavestorm-z17haste == 1) { display2 %wavechat doubles over in pain, trembling in agony, and crashes to the ground as the adrenaline rush wears off, %wavestorm-gender3 body's strength totally spent } else { display2 %wavechat pants as frenzied mode wears off and %wavestorm-gender1 slows down a bit, letting %wavestorm-gender3 body cool off from its earlier intensity } wavewindowreset startbattletimer } alias wavestorm-frenzyoff { if (%wavestorm-z17haste == 1) { display2 %wavechat shakily draws $+(%wavestorm-gender2,self) to %wavestorm-gender3 feet, loses %wavestorm-gender3 balance, and almost falls back down, but finally manages to regain %wavestorm-gender3 strength as the intense hyper-frenzed mode completely wears off } else { display2 %wavechat draws $+(%wavestorm-gender2,self) up to %wavestorm-gender3 full height as he completely gains control of %wavestorm-gender3 body again; fully rested after the intense frenzied mode } unset %wavestorm-z17* unset %wavestorm-z05* unset %wavestorm-z06* unset %wavestorm-z07* .timerfrenzy* off wavewindowreset } alias hpweakness { if ($1 == switch) { set %wavestorm-hploss $round($calc(%wavestorm-hploss * 4 / 5),0) } else { set %wavestorm-hploss $round($calc(%wavestorm-hploss * 6 / 5),0) } } on *:EXIT: { if (%wavestorm-battleon == 1) { .notice %wavechat Wavestorm quit $hget(Player,Level) } .timerbattle* off .timerstop* off .timeridleoff off .timers15 off .timerwavemusic off .remove " $+ $scriptdirWSInfo3.ini" wavestorm-music stop wave-sendstats unset %wave-statuse unset %wavestorm-* set %wavestorm-melee 1 if ($hget(Player)) { hfree Player } } on *:DISCONNECT: { if (%wavestorm-battleon == 1) { .notice %wavechat Wavestorm quit $hget(Player,Level) } .timerbattle* off .timerstop* off .timeridleoff off .timers15 off .timerwavemusic off .remove " $+ $scriptdirWSInfo3.ini" wavestorm-music stop wave-sendstats unset %wave-statuse unset %wavestorm-* set %wavestorm-melee 1 if ($hget(Player)) { hfree Player } } alias wavefusefix { if ((!%wavestorm-fuse1) && (%wavestorm-fuse2)) { set %wavestorm-fuse1 %wavestorm-fuse2 set -n %wavestorm-fuse1nick %wavestorm-fuse2nick set -n %wavestorm-fuse1color %wavestorm-fuse2color unset %wavestorm-fuse2* } if ($dialog(Datascope)) { did -r datascope 18 if (%wavestorm-fuse1) { did -i datascope 18 1 Drop Fuse (1 - $+(%wavestorm-fuse1color,$chr(41)) } else { did -b datascope 18 did -i datascope 18 1 Drop Fuse (1) } did -r datascope 19 if (%wavestorm-fuse2) { did -i datascope 19 1 Drop Fuse (2 - $+(%wavestorm-fuse2color,$chr(41)) } else { did -b datascope 19 did -i datascope 19 1 Drop Fuse (2) } } } alias wavecolor { if ($color(background) == 0) { set %wavecolor2 0 } else { set %wavecolor2 1 } if ($1 == 1) { set %wavecolor1 4 } elseif ($1 == 2) { set %wavecolor1 8 if ($color(background) == 0) { set %wavecolor2 14 } else { set %wavecolor2 1 } } elseif ($1 == 3) { set %wavecolor1 3 } elseif ($1 == 4) { set %wavecolor1 12 } elseif ($1 == 5) { if ($color(background) == 1) { set %wavecolor1 13 } else { set %wavecolor1 6 } } elseif ($1 == 6) { set %wavecolor1 0 | set %wavecolor2 14 } elseif ($1 == 7) { set %wavecolor1 7 } elseif ($1 == 8) { set %wavecolor1 1 | set %wavecolor2 15 } elseif ($1 == 9) { set %wavecolor1 1 | set %wavecolor2 7 } elseif ($1 == 10) { set %wavecolor1 14 } else { set %wavecolor1 $color(text) | set %wavecolor2 $color(background) } } alias wavequit { if ($input(Are you sure you want to quit out of Wavestorm entirely?,264,Wavestorm) == $true) { .notice %wavechat Wavestorm quit $hget(Player,Level) .timerbattle* off .timerstop* off .timeridleoff off .timers15 off .timerwavemusic off .remove " $+ $scriptdirWSInfo3.ini" if (%wavestorm-melee == 1) { wavestorm-music stop } if (%wavestorm-melee != 1) { set %ws-melee 1 if (%wavestorm-friend1) { set %ws-friend1 %wavestorm-friend1 } if (%wavestorm-friend2) { set %ws-friend2 %wavestorm-friend2 } if (%wavestorm-friend3) { set %ws-friend3 %wavestorm-friend3 } if (%wavestorm-enemy1) { set %ws-enemy1 %wavestorm-enemy1 } if (%wavestorm-enemy2) { set %ws-enemy2 %wavestorm-enemy2 } if (%wavestorm-enemy3) { set %ws-enemy3 %wavestorm-enemy3 } if (%wavestorm-enemy4) { set %ws-enemy4 %wavestorm-enemy4 } } unset %wavestorm-* wavewindowreset display2 %wavechat quits out of the battle if (%ws-melee == 1) { unset %ws-melee if (%ws-friend1) { set %wavestorm-friend1 %ws-friend1 } if (%ws-friend2) { set %wavestorm-friend2 %ws-friend2 } if (%ws-friend3) { set %wavestorm-friend3 %ws-friend3 } if (%ws-enemy1) { set %wavestorm-enemy1 %ws-enemy1 } if (%ws-enemy2) { set %wavestorm-enemy2 %ws-enemy2 } if (%ws-enemy3) { set %wavestorm-enemy3 %ws-enemy3 } if (%ws-enemy4) { set %wavestorm-enemy4 %ws-enemy4 } unset %ws-friend* unset %ws-enemy* unset %wavestorm-melee } else { set %wavestorm-melee 1 } display3 %wavechat Wavestorm is now off. Thank you for playing. wave-sendstats if ($dialog(Datascope)) { dialog -x Datascope } if ($dialog(Refresh)) { dialog -x Refresh } if ($dialog(Targets)) { dialog -x Targets } if ($dialog(StageSelect)) { dialog -x StageSelect } if ($dialog(WaveCustom)) { dialog -x WaveCustom } if (!$dialog(Options)) { wavedialog } } } alias wavequit2 { .notice %wavechat Wavestorm quit $hget(Player,Level) .timerbattle* off .timerstop* off .timeridleoff off .timers15 off .timerwavemusic off .remove " $+ $scriptdirWSInfo3.ini" if (%wavestorm-melee == 1) { wavestorm-music stop } if (%wavestorm-melee != 1) { set %ws-melee 1 if (%wavestorm-friend1) { set %ws-friend1 %wavestorm-friend1 } if (%wavestorm-friend2) { set %ws-friend2 %wavestorm-friend2 } if (%wavestorm-friend3) { set %ws-friend3 %wavestorm-friend3 } if (%wavestorm-enemy1) { set %ws-enemy1 %wavestorm-enemy1 } if (%wavestorm-enemy2) { set %ws-enemy2 %wavestorm-enemy2 } if (%wavestorm-enemy3) { set %ws-enemy3 %wavestorm-enemy3 } if (%wavestorm-enemy4) { set %ws-enemy4 %wavestorm-enemy4 } } unset %wavestorm-* wavewindowreset if (%ws-melee == 1) { unset %ws-melee if (%ws-friend1) { set %wavestorm-friend1 %ws-friend1 } if (%ws-friend2) { set %wavestorm-friend2 %ws-friend2 } if (%ws-friend3) { set %wavestorm-friend3 %ws-friend3 } if (%ws-enemy1) { set %wavestorm-enemy1 %ws-enemy1 } if (%ws-enemy2) { set %wavestorm-enemy2 %ws-enemy2 } if (%ws-enemy3) { set %wavestorm-enemy3 %ws-enemy3 } if (%ws-enemy4) { set %wavestorm-enemy4 %ws-enemy4 } unset %ws-friend* unset %ws-enemy* unset %wavestorm-melee } else { set %wavestorm-melee 1 } display3 %wavechat Wavestorm is now off. Thank you for playing. wave-sendstats if ($dialog(Datascope)) { dialog -x Datascope } if ($dialog(Refresh)) { dialog -x Refresh } if ($dialog(Targets)) { dialog -x Targets } if ($dialog(StageSelect)) { dialog -x StageSelect } if ($dialog(WaveCustom)) { dialog -x WaveCustom } if (!$dialog(Options)) { wavedialog } } alias wavequit3 { .notice %wavechat Wavestorm quit $hget(Player,Level) .timerbattle* off .timerstop* off .timeridleoff off .timers15 off .timerwavemusic off .remove " $+ $scriptdirWSInfo3.ini" if (%wavestorm-melee == 1) { wavestorm-music stop } if (%wavestorm-melee != 1) { set %ws-melee 1 if (%wavestorm-friend1) { set %ws-friend1 %wavestorm-friend1 } if (%wavestorm-friend2) { set %ws-friend2 %wavestorm-friend2 } if (%wavestorm-friend3) { set %ws-friend3 %wavestorm-friend3 } if (%wavestorm-enemy1) { set %ws-enemy1 %wavestorm-enemy1 } if (%wavestorm-enemy2) { set %ws-enemy2 %wavestorm-enemy2 } if (%wavestorm-enemy3) { set %ws-enemy3 %wavestorm-enemy3 } if (%wavestorm-enemy4) { set %ws-enemy4 %wavestorm-enemy4 } } unset %wavestorm-* wavewindowreset display2 %wavechat has idled for more than 5 minutes; auto-quitting from battle if (%ws-melee == 1) { unset %ws-melee if (%ws-friend1) { set %wavestorm-friend1 %ws-friend1 } if (%ws-friend2) { set %wavestorm-friend2 %ws-friend2 } if (%ws-friend3) { set %wavestorm-friend3 %ws-friend3 } if (%ws-enemy1) { set %wavestorm-enemy1 %ws-enemy1 } if (%ws-enemy2) { set %wavestorm-enemy2 %ws-enemy2 } if (%ws-enemy3) { set %wavestorm-enemy3 %ws-enemy3 } if (%ws-enemy4) { set %wavestorm-enemy4 %ws-enemy4 } unset %ws-friend* unset %ws-enemy* unset %wavestorm-melee } else { set %wavestorm-melee 1 } display3 %wavechat Wavestorm is now off. Remember that quitting when finished playing instead of idling helps other players. Thank you for playing. wave-sendstats if ($dialog(Datascope)) { dialog -x Datascope } if ($dialog(Refresh)) { dialog -x Refresh } if ($dialog(Targets)) { dialog -x Targets } if ($dialog(StageSelect)) { dialog -x StageSelect } if ($dialog(WaveCustom)) { dialog -x WaveCustom } if (!$dialog(Options)) { wavedialog } } alias wave-eps { if ((%wave-custom-eposes1 != 1) && (%wave-custom-eposes2 != 1)) { goto custom-eposes-skip } if ($exists(" $+ $scriptdirWSeposes.wvs") == $false) { goto custom-eposes1 } elseif ((%wave-custom-eposes1 == 1) && (%wave-custom-eposes2 != 1)) { goto custom-eposes1 } elseif ((%wave-custom-eposes2 == 1) && (%wave-custom-eposes1 != 1)) { goto custom-eposes2 } elseif ((%wave-custom-eposes1 == 1) && (%wave-custom-eposes2 == 1)) { var %wave-custom-eposes3 = $rand(1,$calc(13 + $lines(" $+ $scriptdirWSeposes.wvs"))) if (%wave-custom-eposes3 <= 13) { goto custom-eposes1 } else { goto custom-eposes2 } } :custom-eposes1 var %wave-custom-eposes4 $rand(1,13) if (%wave-custom-eposes4 == 1) { display2 %wavechat puts %wavestorm-gender3 fingers up in a V symbol! } elseif (%wave-custom-eposes4 == 2) { display2 %wavechat gives a THUMBS UP! } elseif (%wave-custom-eposes4 == 3) { display2 %wavechat bows %wavestorm-gender3 head in the direction of %wavestorm-gender3 defeated foe, $nick } elseif (%wave-custom-eposes4 == 4) { display2 %wavechat cackles in laughter } elseif (%wave-custom-eposes4 == 5) { display2 %wavechat turns around and starts to walk away } elseif (%wave-custom-eposes4 == 6) { display2 %wavechat beats on $+($nick,'s) carcass } elseif (%wave-custom-eposes4 == 7) { display2 %wavechat throws %wavestorm-gender3 fist in the air } elseif (%wave-custom-eposes4 == 8) { display2 %wavechat wipes some dust and soot off %wavestorm-gender3 clothes } elseif (%wave-custom-eposes4 == 9) { display2 %wavechat throws around a few silly karate poses } elseif (%wave-custom-eposes4 == 10) { display2 %wavechat points %wavestorm-gender3 fists in the air and lets out a yell. } elseif (%wave-custom-eposes4 == 11) { display2 %wavechat bends over to look at $+($nick,'s) face } elseif (%wave-custom-eposes4 == 12) { display2 %wavechat grins over $+($nick,'s) way } elseif (%wave-custom-eposes4 == 13) { display2 %wavechat crosses %wavestorm-gender3 arms and poses in the moonlight } goto custom-eposes-skip :custom-eposes2 var %custom-eposes-replace = $replace($read(" $+ $scriptdirWSeposes.wvs"),!target,$1,!enemy,$nick,!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3) display2 %wavechat $replace(%custom-eposes-replace,!weapon,$readini(" $+ $scriptdirWSInfo1.ini",Weapon,$+($hget(Player,Weapon),$hget(Player,Modifier)))) :custom-eposes-skip if ((%wave-custom-esayings1 != 1) && (%wave-custom-esayings2 != 1)) { goto custom-esayings-skip } if ($exists(" $+ $scriptdirWSesayings.wvs") == $false) { goto custom-esayings1 } if ((%wave-custom-esayings1 != 1) && (%wave-custom-esayings2 != 1)) { goto custom-esayings1 } elseif ((%wave-custom-esayings1 == 1) && (%wave-custom-esayings2 != 1)) { goto custom-esayings1 } elseif ((%wave-custom-esayings2 == 1) && (%wave-custom-esayings1 != 1)) { goto custom-esayings2 } elseif ((%wave-custom-esayings1 == 1) && (%wave-custom-esayings2 == 1)) { var %wave-custom-esayings3 = $rand(1,$calc(28 + $lines(" $+ $scriptdirWSesayings.wvs"))) if (%wave-custom-esayings3 <= 28) { goto custom-esayings1 } else { goto custom-esayings2 } } :custom-esayings1 var %wave-custom-esayings4 $rand(1,28) if (%wave-custom-esayings4 == 1) { display1 %wavechat RAR! I 0wnz0red j00! } elseif (%wave-custom-esayings4 == 2) { display1 %wavechat A reason for living? Diddly piddly poo. } elseif (%wave-custom-esayings4 == 3) { display1 %wavechat You thought you could beat me? Talk about conceited! } elseif (%wave-custom-esayings4 == 4) { display1 %wavechat You got a lot to learn before you can beat me. Try again, kiddo. } elseif (%wave-custom-esayings4 == 5) { if ($hget(Player,Wavelength) == 1) { var %wavestorm-eps $rand(1,7) } elseif ($hget(Player,Wavelength) == 2) { var %wavestorm-eps $rand(8,14) } elseif ($hget(Player,Wavelength) == 3) { var %wavestorm-eps $rand(15,21) } elseif ($hget(Player,Wavelength) == 4) { var %wavestorm-eps $rand(22,28) } elseif ($hget(Player,Wavelength) == 5) { var %wavestorm-eps $rand(29,35) } elseif ($hget(Player,Wavelength) == 6) { var %wavestorm-eps $rand(36,42) } elseif ($hget(Player,Wavelength) == 7) { var %wavestorm-eps $rand(43,49) } elseif ($hget(Player,Wavelength) == 8) { var %wavestorm-eps $rand(50,56) } display1 %wavechat You must defeat my $readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-eps),Title) to stand a chance. } elseif (%wave-custom-esayings4 == 6) { display1 %wavechat Yeah! Victory is mine! } elseif (%wave-custom-esayings4 == 7) { display1 %wavechat A WINNER IS ME! } elseif (%wave-custom-esayings4 == 8) { display1 %wavechat Humph. You were pathetic. } elseif (%wave-custom-esayings4 == 9) { display1 %wavechat What? It's over already? } elseif (%wave-custom-esayings4 == 10) { display1 %wavechat Guess I overdid it. Forgive me! } elseif (%wave-custom-esayings4 == 11) { display1 %wavechat $me the Invicible wins! } elseif (%wave-custom-esayings4 == 12) { display1 %wavechat Might as well wait for someone stronger. } elseif (%wave-custom-esayings4 == 13) { display1 %wavechat What are you even doing fighting? Go to ballet practice, weakling. } elseif (%wave-custom-esayings4 == 14) { display1 %wavechat You'd be much better off as a $hget(Player,Color) Wavestorm Knight. $hget(Player,Color) is just so much better. } elseif (%wave-custom-esayings4 == 15) { if ($hget(Player,Wavelength) == 1) { var %wavestorm-eps $rand(1,7) } elseif ($hget(Player,Wavelength) == 2) { var %wavestorm-eps $rand(8,14) } elseif ($hget(Player,Wavelength) == 3) { var %wavestorm-eps $rand(15,21) } elseif ($hget(Player,Wavelength) == 4) { var %wavestorm-eps $rand(22,28) } elseif ($hget(Player,Wavelength) == 5) { var %wavestorm-eps $rand(29,35) } elseif ($hget(Player,Wavelength) == 6) { var %wavestorm-eps $rand(36,42) } elseif ($hget(Player,Wavelength) == 7) { var %wavestorm-eps $rand(43,49) } elseif ($hget(Player,Wavelength) == 8) { var %wavestorm-eps $rand(50,56) } display1 %wavechat Too bad you couldn't learn $readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-eps),Title) since you're not a $hget(Player,Color) Wavestorm Knight; you might've kicked some tail then. Maybe. } elseif (%wave-custom-esayings4 == 16) { display1 %wavechat Don't tell me you're actually unconsious. } elseif (%wave-custom-esayings4 == 17) { display1 %wavechat You're KOed already?! } elseif (%wave-custom-esayings4 == 18) { display1 %wavechat Ancient words of wisdom... 'you suck'. } elseif (%wave-custom-esayings4 == 19) { display1 %wavechat Victory is mine. Get up, loser! So I can smack you again! } elseif (%wave-custom-esayings4 == 20) { display1 %wavechat Your teeth are everywhere! Pick them up before they get lost! } elseif (%wave-custom-esayings4 == 21) { display1 %wavechat My fists still have your blood on them! } elseif (%wave-custom-esayings4 == 22) { display1 %wavechat Get lost. You can't compare with my powers. } elseif (%wave-custom-esayings4 == 23) { display1 %wavechat WOW! You LOST! } elseif (%wave-custom-esayings4 == 24) { display1 %wavechat Yahoo! Don't you just love that phrase!? YAHOO! YAHOO! YAHOO! } elseif (%wave-custom-esayings4 == 25) { display1 %wavechat So, now you know what it feels like to be a total loser! } elseif (%wave-custom-esayings4 == 26) { display1 %wavechat Hey! My clothes are stained with your blood! Help me clean it up! } elseif (%wave-custom-esayings4 == 27) { display1 %wavechat Now you know who's really got the skills! } elseif (%wave-custom-esayings4 == 28) { display1 %wavechat Ya might try actually HITTING me next time. Try using the broad side of a barn for target practice! } goto custom-esayings-skip :custom-esayings2 var %custom-esayings-replace = $replace($read(" $+ $scriptdirWSesayings.wvs"),!target,$1,!enemy,$nick,!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3) display1 %wavechat $replace(%custom-esayings-replace,!weapon,$readini(" $+ $scriptdirWSInfo1.ini",Weapon,$+($hget(Player,Weapon),$hget(Player,Modifier)))) :custom-esayings-skip } alias wave-grabstats { if ($dialog(Statcheck)) { dialog -x Statcheck } if ($exists($1-) == $true) { set -n %wave-statuse $1- goto start } if ($exists(%wave-statuse) == $true) { var %wave-statuse2 = %wave-statuse wave-sendstats 1 unset %wave-statuse } set -n %wave-statuse $sfile($scriptdir*.ini,Choose your stat sheet) if (!$readini(" $+ %wave-statuse $+ ",Stats,Player)) { display3 %wavechat This is not a stat sheet! Please choose a proper INI file. unset %wave-statuse return } :start wave-passdecrypt %wave-statuse if ($result != 1) { ;display3 %wavechat This stat file is invalid. Please choose a proper INI file. set -n %wave-statuse %wave-statuse2 ;return } if ($hget(Player)) { hfree Player } wavewindowreset var %wave-statuse2 = %wave-statuse set -n %wave-statuse $+(",%wave-statuse,") hmake Player 100 hadd -m Player Player $readini(%wave-statuse,Stats,Player) hadd -m Player Gender $readini(%wave-statuse,Stats,Gender) hadd -m Player Level $readini(%wave-statuse,Stats,Level) hadd -m Player Wavelength $readini(%wave-statuse,Stats,Wavelength) hadd -m Player Color $readini(%wave-statuse,Stats,Color) hadd -m Player HealthPoints $readini(%wave-statuse,Stats,HealthPoints) hadd -m Player MagicPoints $readini(%wave-statuse,Stats,MagicPoints) hadd -m Player AbilityPoints $readini(%wave-statuse,Stats,AbilityPoints) hadd -m Player CurrentExperience $readini(%wave-statuse,Stats,CurrentExperience) hadd -m Player NeededExperience $readini(%wave-statuse,Stats,NeededExperience) hadd -m Player Credits $readini(%wave-statuse,Stats,Credits) hadd -m Player Weapon $readini(%wave-statuse,Stats,Weapon) hadd -m Player Weaponname $readini(%wave-statuse,Stats,Weaponname) hadd -m Player Modifier $readini(%wave-statuse,Stats,Modifier) hadd -m Player Modifiera $readini(%wave-statuse,Stats,Modifiera) hadd -m Player Modifierb $readini(%wave-statuse,Stats,Modifierb) hadd -m Player Modifierc $readini(%wave-statuse,Stats,Modifierc) hadd -m Player Modifierd $readini(%wave-statuse,Stats,Modifierd) hadd -m Player Modifiere $readini(%wave-statuse,Stats,Modifiere) hadd -m Player Modifierf $readini(%wave-statuse,Stats,Modifierf) hadd -m Player Modifierg $readini(%wave-statuse,Stats,Modifierg) hadd -m Player Modifierh $readini(%wave-statuse,Stats,Modifierh) hadd -m Player Modifieri $readini(%wave-statuse,Stats,Modifieri) hadd -m Player Modifierj $readini(%wave-statuse,Stats,Modifierj) hadd -m Player Wins $readini(%wave-statuse,Stats,Wins) hadd -m Player Losses $readini(%wave-statuse,Stats,Losses) hadd -m Player Item1 $readini(%wave-statuse,Stats,Item1) hadd -m Player Item2 $readini(%wave-statuse,Stats,Item2) hadd -m Player Item3 $readini(%wave-statuse,Stats,Item3) hadd -m Player Item4 $readini(%wave-statuse,Stats,Item4) hadd -m Player Item5 $readini(%wave-statuse,Stats,Item5) hadd -m Player Item6 $readini(%wave-statuse,Stats,Item6) hadd -m Player Item7 $readini(%wave-statuse,Stats,Item7) hadd -m Player Item8 $readini(%wave-statuse,Stats,Item8) hadd -m Player Item9 $readini(%wave-statuse,Stats,Item9) hadd -m Player Item10 $readini(%wave-statuse,Stats,Item10) hadd -m Player Item11 $readini(%wave-statuse,Stats,Item11) hadd -m Player Item12 $readini(%wave-statuse,Stats,Item12) hadd -m Player Item13 $readini(%wave-statuse,Stats,Item13) hadd -m Player Item14 $readini(%wave-statuse,Stats,Item14) hadd -m Player Item15 $readini(%wave-statuse,Stats,Item15) hadd -m Player Item16 $readini(%wave-statuse,Stats,Item16) hadd -m Player Item17 $readini(%wave-statuse,Stats,Item17) hadd -m Player Item18 $readini(%wave-statuse,Stats,Item18) hadd -m Player Item19 $readini(%wave-statuse,Stats,Item19) hadd -m Player Item20 $readini(%wave-statuse,Stats,Item20) hadd -m Player Item21 $readini(%wave-statuse,Stats,Item21) hadd -m Player Item22 $readini(%wave-statuse,Stats,Item22) hadd -m Player Item23 $readini(%wave-statuse,Stats,Item23) hadd -m Player Item24 $readini(%wave-statuse,Stats,Item24) hadd -m Player Item25 $readini(%wave-statuse,Stats,Item25) hadd -m Player Item26 $readini(%wave-statuse,Stats,Item26) hadd -m Player Item27 $readini(%wave-statuse,Stats,Item27) hadd -m Player Item28 $readini(%wave-statuse,Stats,Item28) hadd -m Player Item29 $readini(%wave-statuse,Stats,Item29) hadd -m Player Item30 $readini(%wave-statuse,Stats,Item30) hadd -m Player Item31 $readini(%wave-statuse,Stats,Item31) hadd -m Player Item32 $readini(%wave-statuse,Stats,Item32) hadd -m Player Item33 $readini(%wave-statuse,Stats,Item33) hadd -m Player Item34 $readini(%wave-statuse,Stats,Item34) hadd -m Player Item35 $readini(%wave-statuse,Stats,Item35) hadd -m Player Item36 $readini(%wave-statuse,Stats,Item36) hadd -m Player Item37 $readini(%wave-statuse,Stats,Item37) hadd -m Player Item38 $readini(%wave-statuse,Stats,Item38) hadd -m Player Item39 $readini(%wave-statuse,Stats,Item39) hadd -m Player Item40 $readini(%wave-statuse,Stats,Item40) hadd -m Player Item41 $readini(%wave-statuse,Stats,Item41) hadd -m Player Item42 $readini(%wave-statuse,Stats,Item42) hadd -m Player Item43 $readini(%wave-statuse,Stats,Item43) hadd -m Player Item44 $readini(%wave-statuse,Stats,Item44) hadd -m Player Item45 $readini(%wave-statuse,Stats,Item45) hadd -m Player Item46 $readini(%wave-statuse,Stats,Item46) hadd -m Player Item47 $readini(%wave-statuse,Stats,Item47) hadd -m Player Item48 $readini(%wave-statuse,Stats,Item48) hadd -m Player Item49 $readini(%wave-statuse,Stats,Item49) hadd -m Player Item50 $readini(%wave-statuse,Stats,Item50) hadd -m Player Item51 $readini(%wave-statuse,Stats,Item51) hadd -m Player Item52 $readini(%wave-statuse,Stats,Item52) hadd -m Player Item53 $readini(%wave-statuse,Stats,Item53) hadd -m Player Item54 $readini(%wave-statuse,Stats,Item54) hadd -m Player Item55 $readini(%wave-statuse,Stats,Item55) hadd -m Player Item56 $readini(%wave-statuse,Stats,Item56) hadd -m Player Spell1 $readini(%wave-statuse,Stats,Spell1) hadd -m Player Spell2 $readini(%wave-statuse,Stats,Spell2) hadd -m Player Spell3 $readini(%wave-statuse,Stats,Spell3) hadd -m Player Spell4 $readini(%wave-statuse,Stats,Spell4) hadd -m Player Spell5 $readini(%wave-statuse,Stats,Spell5) hadd -m Player Spell6 $readini(%wave-statuse,Stats,Spell6) hadd -m Player Spell7 $readini(%wave-statuse,Stats,Spell7) set -n %wave-statuse %wave-statuse2 wavewindowreset optionsrefresh display3 %wavechat %wave-statuse character stats loaded. } alias wave-sendstats { if ((!$hget(Player)) || (!%wave-statuse)) { return } writeini -n " $+ %wave-statuse $+ " Stats Player $hget(Player,Player) writeini -n " $+ %wave-statuse $+ " Stats Gender $hget(Player,Gender) writeini -n " $+ %wave-statuse $+ " Stats Level $hget(Player,Level) writeini -n " $+ %wave-statuse $+ " Stats Wavelength $hget(Player,Wavelength) writeini -n " $+ %wave-statuse $+ " Stats Color $hget(Player,Color) writeini -n " $+ %wave-statuse $+ " Stats HealthPoints $hget(Player,HealthPoints) writeini -n " $+ %wave-statuse $+ " Stats MagicPoints $hget(Player,MagicPoints) writeini -n " $+ %wave-statuse $+ " Stats AbilityPoints $hget(Player,AbilityPoints) writeini -n " $+ %wave-statuse $+ " Stats CurrentExperience $hget(Player,CurrentExperience) writeini -n " $+ %wave-statuse $+ " Stats NeededExperience $hget(Player,NeededExperience) writeini -n " $+ %wave-statuse $+ " Stats Credits $hget(Player,Credits) writeini -n " $+ %wave-statuse $+ " Stats Weapon $hget(Player,Weapon) writeini -n " $+ %wave-statuse $+ " Stats Weaponname $hget(Player,Weaponname) writeini -n " $+ %wave-statuse $+ " Stats Modifier $hget(Player,Modifier) writeini -n " $+ %wave-statuse $+ " Stats Modifiera $hget(Player,Modifiera) writeini -n " $+ %wave-statuse $+ " Stats Modifierb $hget(Player,Modifierb) writeini -n " $+ %wave-statuse $+ " Stats Modifierc $hget(Player,Modifierc) writeini -n " $+ %wave-statuse $+ " Stats Modifierd $hget(Player,Modifierd) writeini -n " $+ %wave-statuse $+ " Stats Modifiere $hget(Player,Modifiere) writeini -n " $+ %wave-statuse $+ " Stats Modifierf $hget(Player,Modifierf) writeini -n " $+ %wave-statuse $+ " Stats Modifierg $hget(Player,Modifierg) writeini -n " $+ %wave-statuse $+ " Stats Modifierh $hget(Player,Modifierh) writeini -n " $+ %wave-statuse $+ " Stats Modifieri $hget(Player,Modifieri) writeini -n " $+ %wave-statuse $+ " Stats Modifierj $hget(Player,Modifierj) writeini -n " $+ %wave-statuse $+ " Stats Wins $hget(Player,Wins) writeini -n " $+ %wave-statuse $+ " Stats Losses $hget(Player,Losses) writeini -n " $+ %wave-statuse $+ " Stats Item1 $hget(Player,Item1) writeini -n " $+ %wave-statuse $+ " Stats Item2 $hget(Player,Item2) writeini -n " $+ %wave-statuse $+ " Stats Item3 $hget(Player,Item3) writeini -n " $+ %wave-statuse $+ " Stats Item4 $hget(Player,Item4) writeini -n " $+ %wave-statuse $+ " Stats Item5 $hget(Player,Item5) writeini -n " $+ %wave-statuse $+ " Stats Item6 $hget(Player,Item6) writeini -n " $+ %wave-statuse $+ " Stats Item7 $hget(Player,Item7) writeini -n " $+ %wave-statuse $+ " Stats Item8 $hget(Player,Item8) writeini -n " $+ %wave-statuse $+ " Stats Item9 $hget(Player,Item9) writeini -n " $+ %wave-statuse $+ " Stats Item10 $hget(Player,Item10) writeini -n " $+ %wave-statuse $+ " Stats Item11 $hget(Player,Item11) writeini -n " $+ %wave-statuse $+ " Stats Item12 $hget(Player,Item12) writeini -n " $+ %wave-statuse $+ " Stats Item13 $hget(Player,Item13) writeini -n " $+ %wave-statuse $+ " Stats Item14 $hget(Player,Item14) writeini -n " $+ %wave-statuse $+ " Stats Item15 $hget(Player,Item15) writeini -n " $+ %wave-statuse $+ " Stats Item16 $hget(Player,Item16) writeini -n " $+ %wave-statuse $+ " Stats Item17 $hget(Player,Item17) writeini -n " $+ %wave-statuse $+ " Stats Item18 $hget(Player,Item18) writeini -n " $+ %wave-statuse $+ " Stats Item19 $hget(Player,Item19) writeini -n " $+ %wave-statuse $+ " Stats Item20 $hget(Player,Item20) writeini -n " $+ %wave-statuse $+ " Stats Item21 $hget(Player,Item21) writeini -n " $+ %wave-statuse $+ " Stats Item22 $hget(Player,Item22) writeini -n " $+ %wave-statuse $+ " Stats Item23 $hget(Player,Item23) writeini -n " $+ %wave-statuse $+ " Stats Item24 $hget(Player,Item24) writeini -n " $+ %wave-statuse $+ " Stats Item25 $hget(Player,Item25) writeini -n " $+ %wave-statuse $+ " Stats Item26 $hget(Player,Item26) writeini -n " $+ %wave-statuse $+ " Stats Item27 $hget(Player,Item27) writeini -n " $+ %wave-statuse $+ " Stats Item28 $hget(Player,Item28) writeini -n " $+ %wave-statuse $+ " Stats Item29 $hget(Player,Item29) writeini -n " $+ %wave-statuse $+ " Stats Item30 $hget(Player,Item30) writeini -n " $+ %wave-statuse $+ " Stats Item31 $hget(Player,Item31) writeini -n " $+ %wave-statuse $+ " Stats Item32 $hget(Player,Item32) writeini -n " $+ %wave-statuse $+ " Stats Item33 $hget(Player,Item33) writeini -n " $+ %wave-statuse $+ " Stats Item34 $hget(Player,Item34) writeini -n " $+ %wave-statuse $+ " Stats Item35 $hget(Player,Item35) writeini -n " $+ %wave-statuse $+ " Stats Item36 $hget(Player,Item36) writeini -n " $+ %wave-statuse $+ " Stats Item37 $hget(Player,Item37) writeini -n " $+ %wave-statuse $+ " Stats Item38 $hget(Player,Item38) writeini -n " $+ %wave-statuse $+ " Stats Item39 $hget(Player,Item39) writeini -n " $+ %wave-statuse $+ " Stats Item40 $hget(Player,Item40) writeini -n " $+ %wave-statuse $+ " Stats Item41 $hget(Player,Item41) writeini -n " $+ %wave-statuse $+ " Stats Item42 $hget(Player,Item42) writeini -n " $+ %wave-statuse $+ " Stats Item43 $hget(Player,Item43) writeini -n " $+ %wave-statuse $+ " Stats Item44 $hget(Player,Item44) writeini -n " $+ %wave-statuse $+ " Stats Item45 $hget(Player,Item45) writeini -n " $+ %wave-statuse $+ " Stats Item46 $hget(Player,Item46) writeini -n " $+ %wave-statuse $+ " Stats Item47 $hget(Player,Item47) writeini -n " $+ %wave-statuse $+ " Stats Item48 $hget(Player,Item48) writeini -n " $+ %wave-statuse $+ " Stats Item49 $hget(Player,Item49) writeini -n " $+ %wave-statuse $+ " Stats Item50 $hget(Player,Item50) writeini -n " $+ %wave-statuse $+ " Stats Item51 $hget(Player,Item51) writeini -n " $+ %wave-statuse $+ " Stats Item52 $hget(Player,Item52) writeini -n " $+ %wave-statuse $+ " Stats Item53 $hget(Player,Item53) writeini -n " $+ %wave-statuse $+ " Stats Item54 $hget(Player,Item54) writeini -n " $+ %wave-statuse $+ " Stats Item55 $hget(Player,Item55) writeini -n " $+ %wave-statuse $+ " Stats Item56 $hget(Player,Item56) writeini -n " $+ %wave-statuse $+ " Stats Spell1 $hget(Player,Spell1) writeini -n " $+ %wave-statuse $+ " Stats Spell2 $hget(Player,Spell2) writeini -n " $+ %wave-statuse $+ " Stats Spell3 $hget(Player,Spell3) writeini -n " $+ %wave-statuse $+ " Stats Spell4 $hget(Player,Spell4) writeini -n " $+ %wave-statuse $+ " Stats Spell5 $hget(Player,Spell5) writeini -n " $+ %wave-statuse $+ " Stats Spell6 $hget(Player,Spell6) writeini -n " $+ %wave-statuse $+ " Stats Spell7 $hget(Player,Spell7) wave-passencrypt if ($1 == 1) { display3 %wavechat Current stats saved. Switching characters... } else { display3 %wavechat %wave-statuse character stats saved. } } alias wave-passencrypt { set -n %wavestorm-password $+($hget(Player,Gender),$hget(Player,Level),$hget(Player,Wavelength),$hget(Player,Color),$hget(Player,HealthPoints),$hget(Player,MagicPoints),$hget(Player,AbilityPoints),$hget(Player,CurrentExperience),$hget(Player,NeededExperience),$hget(Player,Credits),$hget(Player,Weapon),$hget(Player,Weaponname),$hget(Player,Modifier)) set -n %wavestorm-password $+(%wavestorm-password,$hget(Player,Modifiera),$hget(Player,Modifierb),$hget(Player,Modifierc),$hget(Player,Modifierd),$hget(Player,Modifiere),$hget(Player,Modifierf),$hget(Player,Modifierg),$hget(Player,Modifierh),$hget(Player,Modifieri),$hget(Player,Modifierj),$hget(Player,Wins),$hget(Player,Losses),$hget(Player,Item1),$hget(Player,Item2),$hget(Player,Item3),$hget(Player,Item4),$hget(Player,Item5),$hget(Player,Item6),$hget(Player,Item7),$hget(Player,Item8),$hget(Player,Item9),$hget(Player,Item10)) set -n %wavestorm-password $+(%wavestorm-password,$hget(Player,Item11),$hget(Player,Item12),$hget(Player,Item13),$hget(Player,Item14),$hget(Player,Item15),$hget(Player,Item16),$hget(Player,Item17),$hget(Player,Item18),$hget(Player,Item19),$hget(Player,Item20),$hget(Player,Item21),$hget(Player,Item22),$hget(Player,Item23),$hget(Player,Item24),$hget(Player,Item25),$hget(Player,Item26),$hget(Player,Item27),$hget(Player,Item28),$hget(Player,Item29),$hget(Player,Item30)) set -n %wavestorm-password $+(%wavestorm-password,$hget(Player,Item31),$hget(Player,Item32),$hget(Player,Item33),$hget(Player,Item34),$hget(Player,Item35),$hget(Player,Item36),$hget(Player,Item37),$hget(Player,Item38),$hget(Player,Item39),$hget(Player,Item40),$hget(Player,Item41),$hget(Player,Item42),$hget(Player,Item43),$hget(Player,Item44),$hget(Player,Item45),$hget(Player,Item46),$hget(Player,Item47),$hget(Player,Item48),$hget(Player,Item49),$hget(Player,Item50)) set -n %wavestorm-password $+(%wavestorm-password,$hget(Player,Item51),$hget(Player,Item52),$hget(Player,Item53),$hget(Player,Item54),$hget(Player,Item55),$hget(Player,Item56),$hget(Player,Spell1),$hget(Player,Spell2),$hget(Player,Spell3),$hget(Player,Spell4),$hget(Player,Spell5),$hget(Player,Spell6),$hget(Player,Spell7)) writeini -n " $+ %wave-statuse $+ " Stats Password $right($dll(" $+ $scriptdirblowfish.dll",Encrypt,29560619 %wavestorm-password),-4) unset %wavestorm-password } alias wave-passdecrypt { set -n %wavestorm-password $+($readini($+(",$1-,"),Stats,Gender),$readini($+(",$1-,"),Stats,Level),$readini($+(",$1-,"),Stats,Wavelength),$readini($+(",$1-,"),Stats,Color),$readini($+(",$1-,"),Stats,HealthPoints),$readini($+(",$1-,"),Stats,MagicPoints),$readini($+(",$1-,"),Stats,AbilityPoints),$readini($+(",$1-,"),Stats,CurrentExperience),$readini($+(",$1-,"),Stats,NeededExperience),$readini($+(",$1-,"),Stats,Credits),$readini($+(",$1-,"),Stats,Weapon),$readini($+(",$1-,"),Stats,Weaponname),$readini($+(",$1-,"),Stats,Modifier)) set -n %wavestorm-password $+(%wavestorm-password,$readini($+(",$1-,"),Stats,Modifiera),$readini($+(",$1-,"),Stats,Modifierb),$readini($+(",$1-,"),Stats,Modifierc),$readini($+(",$1-,"),Stats,Modifierd),$readini($+(",$1-,"),Stats,Modifiere),$readini($+(",$1-,"),Stats,Modifierf),$readini($+(",$1-,"),Stats,Modifierg),$readini($+(",$1-,"),Stats,Modifierh),$readini($+(",$1-,"),Stats,Modifieri),$readini($+(",$1-,"),Stats,Modifierj),$readini($+(",$1-,"),Stats,Wins),$readini($+(",$1-,"),Stats,Losses),$readini($+(",$1-,"),Stats,Item1),$readini($+(",$1-,"),Stats,Item2),$readini($+(",$1-,"),Stats,Item3),$readini($+(",$1-,"),Stats,Item4),$readini($+(",$1-,"),Stats,Item5),$readini($+(",$1-,"),Stats,Item6),$readini($+(",$1-,"),Stats,Item7),$readini($+(",$1-,"),Stats,Item8),$readini($+(",$1-,"),Stats,Item9),$readini($+(",$1-,"),Stats,Item10)) set -n %wavestorm-password $+(%wavestorm-password,$readini($+(",$1-,"),Stats,Item11),$readini($+(",$1-,"),Stats,Item12),$readini($+(",$1-,"),Stats,Item13),$readini($+(",$1-,"),Stats,Item14),$readini($+(",$1-,"),Stats,Item15),$readini($+(",$1-,"),Stats,Item16),$readini($+(",$1-,"),Stats,Item17),$readini($+(",$1-,"),Stats,Item18),$readini($+(",$1-,"),Stats,Item19),$readini($+(",$1-,"),Stats,Item20),$readini($+(",$1-,"),Stats,Item21),$readini($+(",$1-,"),Stats,Item22),$readini($+(",$1-,"),Stats,Item23),$readini($+(",$1-,"),Stats,Item24),$readini($+(",$1-,"),Stats,Item25),$readini($+(",$1-,"),Stats,Item26),$readini($+(",$1-,"),Stats,Item27),$readini($+(",$1-,"),Stats,Item28),$readini($+(",$1-,"),Stats,Item29),$readini($+(",$1-,"),Stats,Item30)) set -n %wavestorm-password $+(%wavestorm-password,$readini($+(",$1-,"),Stats,Item31),$readini($+(",$1-,"),Stats,Item32),$readini($+(",$1-,"),Stats,Item33),$readini($+(",$1-,"),Stats,Item34),$readini($+(",$1-,"),Stats,Item35),$readini($+(",$1-,"),Stats,Item36),$readini($+(",$1-,"),Stats,Item37),$readini($+(",$1-,"),Stats,Item38),$readini($+(",$1-,"),Stats,Item39),$readini($+(",$1-,"),Stats,Item40),$readini($+(",$1-,"),Stats,Item41),$readini($+(",$1-,"),Stats,Item42),$readini($+(",$1-,"),Stats,Item43),$readini($+(",$1-,"),Stats,Item44),$readini($+(",$1-,"),Stats,Item45),$readini($+(",$1-,"),Stats,Item46),$readini($+(",$1-,"),Stats,Item47),$readini($+(",$1-,"),Stats,Item48),$readini($+(",$1-,"),Stats,Item49),$readini($+(",$1-,"),Stats,Item50)) set -n %wavestorm-password $+(%wavestorm-password,$readini($+(",$1-,"),Stats,Item51),$readini($+(",$1-,"),Stats,Item52),$readini($+(",$1-,"),Stats,Item53),$readini($+(",$1-,"),Stats,Item54),$readini($+(",$1-,"),Stats,Item55),$readini($+(",$1-,"),Stats,Item56),$readini($+(",$1-,"),Stats,Spell1),$readini($+(",$1-,"),Stats,Spell2),$readini($+(",$1-,"),Stats,Spell3),$readini($+(",$1-,"),Stats,Spell4),$readini($+(",$1-,"),Stats,Spell5),$readini($+(",$1-,"),Stats,Spell6),$readini($+(",$1-,"),Stats,Spell7)) if (%wavestorm-password == $right($dll(" $+ $scriptdirblowfish.dll",Decrypt,29560619 $readini($+(",$1-,"),Stats,Password)),-4)) { unset %wavestorm-password return 1 } else { unset %wavestorm-password return 2 } }