codepad
[
create a new paste
]
login
|
about
Language:
C
C++
D
Haskell
Lua
OCaml
PHP
Perl
Plain Text
Python
Ruby
Scheme
Tcl
<?php $f='FAT,BANANA';$w=explode(',',$f);$a=$ao=$w[0];$b=$bo=$w[1];$c=''; function splice($a,$t){$s=$h=0;$y=array();$x=str_split($a); foreach($x as $k=>$v){$s=$s+ord($v)-64;if($v>$h){$h=$k;}} $y[0]=$s;if($t==1){unset($x[$h1]);$y[1]=$x;}return $y;} while($c==''){$y1=splice($a,0);$y2=splice($b,0);$y3=splice($y1[0],1); $y4=splice($y2[0],1);if($y3[0]>$y4[0]){$c=$ao;}else if($y3[0]<$y4[0]){$c=$bo; }else if((strlen($a)<1)OR(strlen($b)<1)){if(strlen($a)<strlen($b)){$c=$ao;} else if(strlen($b)<strlen($a)){$c=$bo;}else{$c='STALEMATE';}}} echo $c; ?>
Private
[
?
]
Run code
Submit