1 print"{clear}{white}":poke36879,8:f=30720:dimi(11),x(11)
2 fori=0to8:reada:p(i)=a:next:fori=0to11:reada:x(i)=a:next:data7683,7689,7695,7815,7821
3 data7827,7947,7953,7959,0,23,23,23,21,21,21,-23,-23,-23,-21,-21:fort=0to8
4 fori=0to11:b=b+x(i):pokep(t)+b,42:pokep(t)+b+f,1:next:b=0:next:poke198,0:wait198,1