Hearts & Bullets

 

1 a=55415:poke53281,1:poke53280,0:z=81:v=1153:poke 1154,60:n=0:ifr=1thenz=83
3 poke646,5:printchr$(147)"hearts:{space}"s"{space}fails:{space}"l:r=int(rnd(1)*2)+1:n=0
6 poke55305,0:poke55306,0:poke55307,0:poke55316,0:fori=0to12:n=n+1:ifl=3thenend
8 poke a+n,2:poke1144+i,z:poke1144+i-1,32:t=peek(197)
10 ift=7thenpoke55386,5:poke55426,5:poke1154,32:poke1114,60:goto12
11 poke55386,5:poke55426,5:poke1154,60:poke1114,32
12 ifpeek(v)=81andpeek(v+1)=60thenl=l+1:goto3
13 ifpeek(v)=83andpeek(v+1)=60thens=s+1:goto1
14 next
15 goto1

 

 

 

 

 

 

 

 

 

 

 

This site was designed with the
.com
website builder. Create your website today.
Start Now