Ultimate Rock Paper Scissors with Botplay

Platform:  mIRC
Published  Jul 30, 2008
Updated  Jul 31, 2008
What is Ultimate Rock Paper Scissors you ask? Just take a look at the pic below :D



I got the original script from Deimius here http://www.hawkee.com/snippet/4499/

I Saw this chart on fukung one day and really wanted to write a mirc script for it so I used that as a base and heavily modified it to allow all possible outcomes, and even botplay :D. Note: If Deimius wouldn't like me posting this I will remove it without hesitation.

To install just load it into your bots remote and type '!rps <nick> <rounds>' to challenge someone rounds is optional but if you specify it, the game will last until either person wins that many times. (You cannot use rounds when playing the bot.)

Update: Fixed a few bugs, haven't noticed anymore since. on *:LOAD: {
set %!rpssel gun dynamite nuke lightning devil dragon alien water bowl air moon paper sponge wolf cockroach tree man woman monkey snake axe scissors fire sun rock
set %!rpsselection !gun, !dynamite, !nuke, !lightning, !devil, !dragon, !alien, !water, !bowl, !air, !moon, !paper, !sponge, !wolf, !cockroach, !tree, !man, !woman, !monkey, !snake, !axe, !scissors, !fire, !sun, or !rock
set %gunown.a rock.Gun targets rock.sun.Gun shoots at sun.scissors.Gun destroys scissors.axe.Gun chips axe.snake.Gun shoots snake.monkey.Gun shoots monkey.woman.Gun shoots woman.man.Gun shoots man.tree.Gun targets tree.cockroach.Gun shoots cockroach.wolf.Gun shoots wolf
set %dynamiteown.a gun.Dynamite outclasses gun.rock.Dynamite outclasses gun.sun.Smoke caused by dynamite blots out the sun.fire.Dynamite starts fire.scissors.Dynamite explodes scissors.axe.Dynamite explodes axe.snake.Dynamite explodes snake.monkey.Dynamite explodes monkey.woman.Dynamite explodes woman.man.Dynamite explodes man.tree.Dynamite explodes tree.cockroach.Dynamite explodes cockroach
set %nukeown.a dynamite.Nuke outclasses dynamite.gun.Nuke outclasses gun.rock.Nuke incinerates rock.sun.Nuke has the power of the sun and therefore results in a tie.fire.Radiation + fire > fire.scissors.Nuke incinerates scissors.snake.Nuke incinerates snake.axe.Nuke incinerates axe.monkey.Nuke incinerates monkey.woman.Nuke incinerates woman.man.Nuke incinerates man.tree.Nuke incinerates tree
set %lightningown.a nuke.Lightning difuses nuke.dynamite.Lighting ignites dynamite.gun.Lightning melts gun.rock.Lightning splits rock.sun.Lightning lives in storms which block the sun.fire.Lightning starts fire.scissors.Lightning melts scissors.axe.Lightning melts axe.snake.Lightning strikes snake.monkey.Lightning strikes monkey.woman.Lightning strikes woman.man.Lightning strikes man
set %devilown.a lightning.Devil casts lightning.nuke.Devil inspires nuke.dynamite.Devil inspires dynamite.gun.Devil inspires gun.rock.Devil hurls rock.sun.Devil curses sun.fire.Devil breathes fire.scissors.Devil is immune to scissors.axe.Devil is immune to axe.snake.Devil eats snake.monkey.Devil enrages monkey.woman.Devil tempts woman.
set %dragonown.a devil.Dragon commands devil.lightning.Dragon breathes lightning.nuke.Dragon lived before nukes.dynamite.Dragon flosses with dynamite.gun.Dragon is immune to guns.rock.Dragon rests upon rock.sun.Dragon blots out sun.fire.Dragon breathes fire.scissors.Dragon is immune to scissors.axe.Dragon is immune to axe.snake.Dragon spawns snake.monkey.Dragon chars monkey
set %alienown.a dragon.Alien vaporizes dragon.devil.Aliens are non-believers of the devil.lightning.Alien shoots lightning.nuke.Alien defuses nuke.dynamite.Alien defuses dynamite.gun.Alien force-fields gun.rock.Alien vaporizes rock.sun.Alien destroys sun.fire.Alien fuses fire.scissors.Alien force-fields scissors.axe.Alien force-fields axe.snake.Alien mutates snake
set %waterown.a alien.Water is toxic to alien.dragon.Water drowns dragon.devil.Water blesses devil.lightning.Water conducts lightning.nuke.Water short-circuits nuke.dynamite.Water douses dynamite.gun.Water rusts gun.rock.Water erodes rock.sun.Water reflects sun.fire.Water puts out fire.scissors.Water rusts scissors.axe.Water rusts axe
set %bowlown.a water.Bowl contains water.alien.Bowl shapes craft of alien.dragon.Bowl drowns dragon.devil.Bowl blesses devil.lightning.Bowl focuses lightning.nuke.Bowl encases core of nuke.dynamite.Bowl splashes dynamite.gun.Bowl splashes gun.rock.Bowl was once made of rock.sun.Bowl focuses sun.fire.Bowl snuffs out fire.scissors.Bowl covers scissors
set %airown.a bowl.Air tips over bowl.water.Air evaporates water.alien.Air chokes alien.dragon.Air freezes dragon.devil.Air chokes devil.lightning.Air creates lightning.nuke.Air blows astray nuke.dynamite.Air blows out dynamite.gun.Air tarnishes gun.rock.Air erodes rock.sun.Air cools heat of sun.fire.Air blows out fire
set %axeown.a snake.Axe chops snake.monkey.Axe cleaves monkey.man.Axe cleaves man.tree.Axe chops down tree.cockroach.Axe chops cockroach.wolf.Axe cleaves wolf.sponge.Axe chops sponge.paper.Axe slices paper.moon.Axe reflects moon.air.Axe flies through air.bowl.Axe chops bowl
set %Scissorsown.a axe.Scissors are sharper than axe.snake.Scissors stab snake.monkey.Scissors stab monkey.woman.Scissors cut woman's hair.man.Scissors cut man's hair.tree.Scissors carve tree.cockroach.Scissors stab cockroach.wolf.Scissors cut wolf's hair.sponge.Scissors cut up sponge.paper.Scissors cut paper.moon.Scissors reflect moon.air.Scissors swish through air
set %fireown.a scissors.Fire melts scissors.axe.Fire forges axe.snake.Fire burns snake.monkey.Fire burns monkey.woman.Fire burns woman.man.Fire burns man.tree.Fire burns down tree.cockroach.Fire burns cockroach.wolf.Fire burns wolf.sponge.Fire burns sponge.paper.Fire burns paper.moon.Fire campfire by moonlight
set %sunown.a fire.Sun is made of fire.scissors.Sun melts scissors.axe.Sun melts axe.snake.Sun warms snake.monkey.Sun warms monkey.woman.Sun warms woman.man.Sun warms man.tree.Sun feeds tree.cockroach.Sun warms cockroach.wolf.Sun warms wolf.sponge.Sun dries up sponge.paper.Sun shines through paper
set %rockown.a sun.Rock shades sun.fire.Rock pounds out fire.scissors.Rock smashes scissors.axe.Rock chips axe.snake.Rock crushes snake.monkey.Rock crushes monkey.woman.Rock crushes woman.man.Rock crushes man.tree.Rock blocks tree roots.cockroach.Rock squishes cockroach.wolf.Rock crushes wolf.sponge.Rock crushes sponge
set %treeown.a cockroach.Tree shelters cockroach.wolf.Tree shelters wolf.sponge.Tree outlives sponge.paper.Tree creates paper.moon.Tree blocks moon.air.Tree produces air.bowl.Tree wood creates bowl.water.Tree drinks water.alien.Tree ensnares alien ship.dragon.Tree shelters dragon.devil.Tree imprisons devil.lightning.Tree attracts lightning
set %manown.a tree.Man plants tree.cockroach.Man steps on cockroach.wolf.Man tames wolf.sponge.Man cleans with sponge.paper.Man writes paper.moon.Man travels to moon.air.Man breathes air.bowl.Man eats from bowl.water.Man drinks water.alien.Man disproves alien.dragon.Man slays dragon.devil.Man exorcises devil
set %womanown.a man.Woman tempts man.tree.Woman plants tree.cockroach.Woman steps on cockroach.wolf.Woman tames wolf.sponge.Woman cleans with sponge.paper.Woman writes paper.moon.Woman aligns with moon.air.Woman breaths air.bowl.Woman eats from bowl.water.Woman drinks water.alien.Woman disproves alien.dragon.Woman subdues dragon
set %Monkeyown.a woman.Monkey flings poop at woman.man.Monkey flings poop at man.tree.Monkey lives in tree.cockroach.Monkey eats cockroach.wolf.Monkey enrages wolf.sponge.Monkey rips up sponge.paper.Monkey rips up paper.moon.Monkey screeches at moon.air.Monkey breaths air.bowl.Monkey smashes bowl.water.Monkey drinks water.alien.Monkey infuriates alien
set %snakeown.a monkey.Snake bites monkey.woman.Snake bites woman.man.Snake bites man.tree.Snake lives in tree.cockroach.Snake eats cockroach.wolf.Snake bites wolf.sponge.Snake swallows sponge.paper.Snake nests in paper.moon.Snake nocturnal with moon.air.Snake breathes air.bowl.Snake sleeps in bowl.water.Snake drinks water
set %moonown.a air.Moon has no air.bowl.Moon shaped like bowl.water.Moon has no water.alien.Moon houses alien.dragon.Moon shines on dragon.devil.Moon terrifies devil.lightning.Moon is far above lightning.nuke.Moon is too far for nuke.dynamite.Moon suffocates dynamite.gun.Moonshine gunfight.rock.Moon shines on rock.sun.Moon eclipses sun
set %paperown.a moon.Paper uses its magic paperness to block out the moon.air.Paper fans air.bowl.Paper mache bowl.water.Paper floats on water.alien.Paper disproves alien.dragon.Paper rebukes dragon.devil.Paper rebukes devil.lightning.Paper defines lightning.nuke.Paper defines nuke.dynamite.Paper encases dynamite.Paper outlaws gun.rock.Paper covers rock
set %spongeown.a paper.Sponge soaks paper.moon.Sponge looks like moon.air.Sponge uses air pockets.bowl.Sponge cleans bowl.water.Sponge absorbs water.alien.Sponge intrigues alien.dragon.Sponge cleanses dragon.devil.Sponge cleanses devil.lightning.Sponge conducts lightning.nuke.Sponge cleans nuke.dynamite.Sponge soaks dynamite.gun.Sponge cleans gun
set %wolfown.a Sponge.Wolf chews up sponge.paper.Wolf chews up paper.moon.Wolf howls at moon.air.Wolf breaths air.bowl.Wolf drinks from bowl.water.Wolf drinks water.alien.Wolf chases alien.dragon.Wolf outruns dragon.devil.Wolf bites heiny of devil.lightning.Wolf outruns lightning.nuke."Wolf-2" launches nuke.dynamite.Wolf outruns dynamite
set %cockroachown.a wolf.Cockroach sleeps in fur of wolf.sponge.Cockroach nests in sponge.paper.Cockroach nests between papers.moon.Cockroach nocturnal with moon.air.Cockroach breaths air.bowl.Cockroach hides under bowl.water.Cockroach drinks water.alien.Cockroach stows away with alien.dragon.Cockroach eats eggs of dragon.devil.Cockroach makes men devils.lightning.Cockroach hides from lightning.nuke.Cockroach survives nuke
}

on *:TEXT:!*:#: {
if ($1 == !RPS) || ($1 == !PSR) || ($1 == !PRS) || ($1 == !SRP) || ($1 == !SPR) || ($1 == !RSP) {
if (%RPS1 == $null) {
if ($2 == $nick) { msg $chan You cannot play Rock Paper Scissors, by yourself, $nick $+ . | halt }
if ($2 == $me) {
set %RPS1 $nick
set %RPS2 $2
set %RPS.chan $chan
msg $chan $nick has challenged $2 to a game of Rock Paper Scissors!
msg $chan The Challenge from %RPS1 has been accepted by %RPS2 $+ .
notice %RPS1 You have 60 seconds to choose either %!rpsselection $+ . Syntax: /notice $me [!choicehere]
.timerRPS1limit1 1 40 msg $chan 20 seconds left, %RPS1 $+ .
.timerRPS1limit2 1 60 rpstimeup 1
.timerRPS2* off
set %RPS2.P 1
halt
}
if ($2 == $null) { msg $chan Who do you wish to challenge, $nick $+ ? | halt }
if ($2 ison $chan) {
if ($3 isnum) {
if ($3 < 11) {
%rpsrow = $3
%rps1.m = 0
%rps2.m = 0
msg $chan $nick has challenged $2 to a first to %rpsrow game of Rock Paper Scissors!
notice $2 You have been challenged by $nick to a game of Paper scissors Rock. Type: '!accept' or '!decline'.
.timerRPSChal1 1 60 rpsreject
}
else { msg $chan Please choose an amount of rounds no greator than 10. | halt }
}
else {
msg $chan $nick has challenged $2 to a game of Rock Paper Scissors!
notice $2 You have been challenged by $nick to a game of Paper scissors Rock. Type: '!accept' or '!decline'.
.timerRPSChal1 1 60 rpsreject
}
set %RPS1 $nick
set %RPSW $2
set %RPS.chan $chan
halt
}
else { msg $chan $2 is not on the channel, $nick $+ . | halt }
}
else { msg $chan Please be Patient, $nick $+ . There is already a game of rock paper scissors in progress. | halt }
}
if ($1 == !accept) {
if (%RPS1) {
if ($nick == %RPSW) {
.timerRPSchal* off
unset %RPSW
set %RPS2 $nick
msg $chan The Challenge from %RPS1 has been accepted by %RPS2 $+ .
notice %RPS1 You have 60 seconds to choose either %!rpsselection $+ . Syntax: /notice $me [!choicehere]
notice %RPS2 You have 60 seconds to choose either %!rpsselection $+ . Syntax: /notice $me [!choicehere]
.timerRPS1limit1 1 40 msg $chan 20 seconds left, %RPS1 $+ .
.timerRPS1limit2 1 40 rpstimeup 1
.timerRPS2limit1 1 40 msg $chan 20 seconds left, %RPS2 $+ .
.timerRPS2limit2 1 60 rpstimeup 2
halt
}
else {
msg $chan %rps1 did not challenge you, $nick $+ .
halt
}
}
else { msg $chan There is no game of rock paper scissors to accept. To challenge someone, type: !RPS [nicktochallenge] | halt }
}
if ($1 == !decline) {
if ($nick == %RPSW) {
.timerRPSchal* off
msg $chan %RPSw has declined %RPS1 $+ 's challenge.
unset %RPS*
halt
}
else {
msg $chan %rps1 did not challenge you, $nick $+ .
halt
}
}
if ($replace($1,!, ) isin %!rpssel) {
if ($nick == %Rps1) { msg %RPS.chan Correct Syntax is: '/notice $me [!choicehere]' It wouldn't be a bad idea to change your choice now. | halt }
if ($nick == %Rps2) { msg %RPS.chan Correct Syntax is: '/notice $me [!choicehere]' It wouldn't be a bad idea to change your choice now. | halt }
else { return }
}
else { halt }
}

on *:notice:*:?: {
if (($findtok(%!rpssel,$replace($1,!, ),32) != $null) && ($mid($1,1,1) == !)) {
if (%RPS2.P == 1) {
if ($nick == %RPS1) {
set %rps2.c $gettok(%!rpssel,$rand(1,25),32)
.timerRPS1* off
set %RPS1.C $replace($1,!, )
notice %RPS1 You have chosen %RPS1.c $+ .
rpsshow
halt
}
}
if ($nick == %RPS1) {
.timerRPS1* off
set %RPS1.C $replace($1,!, )
notice %RPS1 You have chosen %RPS1.c $+ .
if (%RPS2.c != $null) {
rpsshow
halt
}
if (%RPS2.C == $null) {
notice %RPS1 Please wait for %RPS2 to decide what to pick.
halt
}
}
if ($nick == %RPS2) {
.timerRPS2* off
set %RPS2.C $replace($1,!, )
notice %RPS2 You have chosen %RPS2.c $+ .
if (%RPS1.C != $null) {
rpsshow
halt
}
if (%RPS1.c == $null) { notice %RPS2 Please wait for %RPS1 to decide what to pick. | halt }
}
}
elseif ($nick == %RPS1) {
if ($mid($1,1,1) == !) notice %RPS1 Please decide on either %!rpsselection $+ .
halt
}
elseif ($nick == %RPS2) {
if ($mid($1,1,1) == !) notice %RPS2 Please decide on either %!rpsselection $+ .
halt
}
}

alias rpsreject {
msg %rps.chan %RPSW doesn't appear to be there right now. Try challenging %RPSW again later.
unset %RPS*
}

alias rpstimeup {
if ($1 == 1) {
msg %rps.chan You took far too long, %RPS1 $+ .
%rps1.r = lose
%rps2.r = win
rpsresult
}
if ($1 == 2) {
msg %rps.chan You took far too long, %RPS2 $+ .
%rps1.r = win
%rps2.r = lose
rpsresult
}
}

alias rpsshow {
if (%rps1.c == gun) {
if (%rps2.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == dynamite) {
if (%rps2.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

echo -a a

if (%rps1.c == nuke) {
if (%rps2.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps2.c,1,46)+1),46)
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == lightning) {
if (%rps2.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == devil) {
if (%rps2.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == dragon) {
if (%rps2.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == alien) {
if (%rps2.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == water) {
if (%rps2.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == bowl) {
if (%rps2.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == air) {
if (%rps2.c == $gettok(%airown.a,$findtok(%airown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

echo -a %rps1.c is not air.

if (%rps1.c == moon) {
if (%rps2.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

echo -a rps1.c is not air nor moon.

if (%rps1.c == paper) {
if (%rps2.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == sponge) {
if (%rps2.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == wolf) {
if (%rps2.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == cockroach) {
if (%rps2.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == tree) {
if (%rps2.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == man) {
if (%rps2.c == $gettok(%manown.a,$findtok(%manown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == woman) {
if (%rps2.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == monkey) {
if (%rps2.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == snake) {
if (%rps2.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == axe) {
if (%rps2.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == scissors) {
if (%rps2.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == fire) {
if (%rps2.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == sun) {
if (%rps2.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
%rps1.r = tie
%rps2.r = tie
}
else if (%rps2.c == rock) {
if (%rps1.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
}

if (%rps1.c == rock) {
if (%rps2.c == $gettok(%rockown.a,$findtok(%rockown.a,%rps2.c,1,46),46)) {
%rpsout = $gettok(%rockown.a,$calc($findtok(%rockown.a,%rps2.c,1,46)+1),46)
%rps1.r = win
%rps2.r = lose
}
else if (%rps2.c == gun) {
if (%rps1.c == $gettok(%gunown.a,$findtok(%gunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%gunown.a,$calc($findtok(%gunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dynamite) {
if (%rps1.c == $gettok(%dynamiteown.a,$findtok(%dynamiteown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dynamiteown.a,$calc($findtok(%dynamiteown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == lightning) {
if (%rps1.c == $gettok(%lightningown.a,$findtok(%lightningown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%lightningown.a,$calc($findtok(%lightningown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == devil) {
if (%rps1.c == $gettok(%devilown.a,$findtok(%devilown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%devilown.a,$calc($findtok(%devilown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == dragon) {
if (%rps1.c == $gettok(%dragonown.a,$findtok(%dragonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%dragonown.a,$calc($findtok(%dragonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == alien) {
if (%rps1.c == $gettok(%alienown.a,$findtok(%alienown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%alienown.a,$calc($findtok(%alienown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == water) {
if (%rps1.c == $gettok(%waterown.a,$findtok(%waterown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%waterown.a,$calc($findtok(%waterown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == bowl) {
if (%rps1.c == $gettok(%bowlown.a,$findtok(%bowlown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%bowlown.a,$calc($findtok(%bowlown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == air) {
if (%rps1.c == $gettok(%airown.a,$findtok(%airown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%airown.a,$calc($findtok(%airown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == moon) {
if (%rps1.c == $gettok(%moonown.a,$findtok(%moonown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%moonown.a,$calc($findtok(%moonown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == paper) {
if (%rps1.c == $gettok(%paperown.a,$findtok(%paperown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%paperown.a,$calc($findtok(%paperown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sponge) {
if (%rps1.c == $gettok(%spongeown.a,$findtok(%spongeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%spongeown.a,$calc($findtok(%spongeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == wolf) {
if (%rps1.c == $gettok(%wolfown.a,$findtok(%wolfown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%wolfown.a,$calc($findtok(%wolfown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == cockroach) {
if (%rps1.c == $gettok(%cockroachown.a,$findtok(%cockroachown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%cockroachown.a,$calc($findtok(%cockroachown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == tree) {
if (%rps1.c == $gettok(%treeown.a,$findtok(%treeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%treeown.a,$calc($findtok(%treeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == man) {
if (%rps1.c == $gettok(%manown.a,$findtok(%manown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%manown.a,$calc($findtok(%manown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == woman) {
if (%rps1.c == $gettok(%womanown.a,$findtok(%womanown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%womanown.a,$calc($findtok(%womanown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == monkey) {
if (%rps1.c == $gettok(%monkeyown.a,$findtok(%monkeyown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%monkeyown.a,$calc($findtok(%monkeyown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == snake) {
if (%rps1.c == $gettok(%snakeown.a,$findtok(%snakeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%snakeown.a,$calc($findtok(%snakeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == axe) {
if (%rps1.c == $gettok(%axeown.a,$findtok(%axeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%axeown.a,$calc($findtok(%axeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == scissors) {
if (%rps1.c == $gettok(%scissorsown.a,$findtok(%scissorsown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%scissorsown.a,$calc($findtok(%scissorsown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == fire) {
if (%rps1.c == $gettok(%fireown.a,$findtok(%fireown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%fireown.a,$calc($findtok(%fireown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}
else if (%rps2.c == rock) {
%rps1.r = tie
%rps2.r = tie
}
}
rpsresult
}

alias rpsresult {
if (%rps1.r == tie || %rps2.r == tie) {
msg %RPS.chan %RPS1 chose %RPS1.c - %RPS2 chose %RPS2.c $+ .
if (%rpsout != $null) { msg %rps.chan %rpsout $+ ! We all know, here in %rps.chan $+ , there are no losers. | unset %RPS* | halt }
msg %rps.chan This Game ends in a draw! We all know, here in %rps.chan $+ , there are no losers.
if (%rpsrow != $null) rematch
else { unset %RPS* }
halt
}
else if (%rps1.r == win && %rps2.r == lose) {
if (%rps1.c != $null && %rps2.c != $null) msg %RPS.chan %RPS1 chose %RPS1.c - %RPS2 chose %RPS2.c $+ .
msg %RPS.chan Congratulations, %rps1 $+ !! %rpsout $+ !
if (%rpsrow != $null) { inc %rps1.m | inc %rpscount | rematch }
else { unset %RPS* }
unset %RPS*
halt
}
else if (%rps1.r == lose && %rps2.r == win) {
if (%rps1.c != $null && %rps2.c != $null) msg %RPS.chan %RPS1 chose %RPS1.c - %RPS2 chose %RPS2.c $+ .
msg %RPS.chan Congratulations, %rps2 $+ !! %rpsout $+ !
if (%rpsrow != $null) { inc %rps2.m | inc %rpscount | rematch }
else { unset %RPS* }
unset %RPS*
halt
}
else {
msg %rps.chan Sorry, an error has occured. %access has been notified of the error.
msg %access An error has occured with RPS at $time $+ . It seems there was some confusion of who won. rps1.c = %rps1.c rps2.c = %rps2.c rps1.r = %rps1.r rps2.r = %rps2.r rpsout = %rpsout rpscount = %rpscount rpsrow = %rpsrow rps1.m = %rps1.m rps2.m = %rps2.m
unset %RPS*
}
}

alias rematch {
if (%rps1.m == %rpsrow) {
msg %rps.chan Congratulations %rps1 you win the game!
unset %RPS*
halt
}
else if (%rps2.m == %rpsrow) {
msg %rps.chan Congratulations %rps2 you win the game!
unset %RPS*
halt
}
else if (%rps1.m < %rpsrow && %rps2.m < %rpsrow) {
msg %rps.chan %rps1 has won %rps1.m round(s), and %rps2 has won %rps2.m round(s)!
if (%rps1.m > %rps2.m) msg %rps.chan Only $calc(%rpsrow - %rps1.m) more rounds to win, %rps1 $+ !
if (%rps1.m < %rps2.m) msg %rps.chan Only $calc(%rpsrow - %rps2.m) more rounds to win, %rps2 $+ !
unset %rps1.c
unset %rps2.c
unset %rps1.r
unset %rps2.r
unset %rpsout
notice %RPS1 You have 60 seconds to choose either %!rpsselection $+ . Syntax: /notice $me [!choicehere]
notice %RPS2 You have 60 seconds to choose either %!rpsselection $+ . Syntax: /notice $me [!choicehere]
.timerRPS1limit1 1 40 msg %rps.chan 20 seconds left, %RPS1 $+ .
.timerRPS1limit2 1 60 rpstimeup 1
.timerRPS2limit1 1 40 msg %rps.chan 20 seconds left, %RPS2 $+ .
.timerRPS2limit2 1 60 rpstimeup 2
halt
}
else {
msg %rps.chan Sorry, an error has occured.
unset %RPS*
}
}

Comments

Sign in to comment.
NIGathan   -  Apr 01, 2009
Purplebeard   -  Mar 31, 2009
sweet i look foward to it
 Respond  
NIGathan   -  Mar 30, 2009
Thanks for your input, I actually just recently ported this to C++, and found a much better method. So Ill be rewriting the entire script, I also had changed the nuke and sun results in the new version.

Expect an update sometime within the next two days
 Respond  
Purplebeard   -  Mar 29, 2009
found another problem anytime GUN and FIRE are used together i get an error


Sorry, an error has occured. has been notified of the error.


and who is being notified of the error?
 Respond  
Purplebeard   -  Mar 29, 2009
hey ok i want to set it up so that NUKE Beats SUN

this is what i did

i changed
set %nukeown.a dynamite.Nuke outclasses dynamite.gun.Nuke outclasses gun.rock.Nuke incinerates rock.sun.Nuke has the power of the sun and therefore results in a tie.fire.Radiation + fire > fire.scissors.Nuke incinerates scissors.snake.Nuke incinerates snake.axe.Nuke incinerates axe.monkey.Nuke incinerates monkey.woman.Nuke incinerates woman.man.Nuke incinerates man.tree.Nuke incinerates tree

TO

set %nukeown.a dynamite.Nuke outclasses dynamite.gun.Nuke outclasses gun.rock.Nuke incinerates rock.sun.Nuke has the power of the sun.fire.Radiation + fire > fire.scissors.Nuke incinerates scissors.snake.Nuke incinerates snake.axe.Nuke incinerates axe.monkey.Nuke incinerates monkey.woman.Nuke incinerates woman.man.Nuke incinerates man.tree.Nuke incinerates tree

under the if == sun one i made the nuke one

else if (%rps2.c == nuke) {
if (%rps1.c == $gettok(%nukeown.a,$findtok(%nukeown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%nukeown.a,$calc($findtok(%nukeown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}


and under the if == Nuke one i changed sun to
else if (%rps2.c == sun) {
if (%rps1.c == $gettok(%sunown.a,$findtok(%sunown.a,%rps1.c,1,46),46)) {
%rpsout = $gettok(%sunown.a,$calc($findtok(%sunown.a,%rps1.c,1,46)+1),46)
%rps1.r = lose
%rps2.r = win
}
}


Now my results were as followed

if the first one in was a NUKE and the 2nd dude picked SUN

Congratulations, Purplebeard!! Nuke has the power of the sun and therefore results in a tie!
Purplebeard has won 1 round(s), and Test_Dude has won 0 round(s)!

why is it still saying tie? yet giving Purplebeard (1st in and picked NUKE) the point

now i tried reversing it i made Purplebeard pick SUN first and test_dude picked NUKE my results were as followed

Congratulations, Test_Dude!! Nuke has the power of the sun and therefore results in a tie!
Purplebeard has won 0 round(s), and Test_Dude has won 1 round(s)!


so the person who should be winning IS but how do i ditch the "Nuke has the power of the sun and therefore results in a tie!" Message

i thought i fixed that up top

PLEASE HELP!

-Thanks,
Purplebeard

P.S. Besides the nuke and sun tie I LOVE your script
 Respond  
NIGathan   -  Oct 28, 2008
Mirccoder, careful what you say... I once changed the first to "n" limit from 10 to 100 and it was the most boring few hours ever... But it was an epic !@#$ game, the final score was 100 - 99, I won.

I actually have an updated version with a few bug fixes AND a cheat blocker for the bot owner so they cant see what people choose. Ill post it in a bit after I clean it up :D
 Respond  
Mirccoder   -  Oct 06, 2008
very very nice i like it i could play all day
 Respond  
NIGathan   -  Aug 10, 2008
Thanks.

Haha, I dont necessarily agree with all of how what beats what, I just simply based it off the chart.
 Respond  
Eugenio   -  Aug 03, 2008
rofl
omfg nice code mate
dayum
ROFL @ \"woman\" ! should be in the kitchen ffs not playing RPS
 Respond  
zarukas   -  Aug 03, 2008
awesome script!! loads of fun and laughter and how the hell does this beat that? LOL
 Respond  
NIGathan   -  Jul 31, 2008
Oh you know what?

I was so tired when I posted this I completely forgot about all the variables for it.

Ill edit it with the update now. Thanks for letting me know

Alright just make sure you add the on LOAD event and reload it, and it should work fine.
 Respond  
Wizjany   -  Jul 30, 2008
whenever I try to play against my bot, i get this:

-Wormhole- You have 60 seconds to choose either . Syntax: /notice Wormhole [!choicehere]
and then whatever i type to it...
-Wormhole- Please decide on either .
there\'s a problem with the %!rpsselection i think...it\'s not set at that point
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.