;redcode-tiny ;author Lukasz Grabun ;name Tiny Stone-paper ; CORESIZE==800 ;assert 1 soff equ 537 boot: mov tBmb , soff sPtr spl 1 , tLoop+1 spl 1 , 0 mov pap1 mov {pap1, s2 ;stone from The Wasp tStep equ 586 tTime equ 156 spl #0 , #0 tMov mov tBmb , @tLoop add #tStep , tLoop tLoop djn.f tMov , {-1-(tTime*tStep) tBmb dat {4 , >1