Advertisement
EmanueleBonin

GDM - Auto Mini Pong - Pratiche OnanisticoInformatiche

Jan 29th, 2020
2,630
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 0b=53248:a=2040:pOa,192:pOa+1,194:pOa+2,193:dIm(99,1):m(49,0)=b:m(50,0)=b:?"{clear}"
  2. 1m(49,1)=-5:m(50,1)=5:m(56,0)=b+2:m(57,0)=b+2:m(56,1)=-4:m(57,1)=4:y=99:s=54272
  3. 2pOb,y:pOb+2,y:pO650,128:pOs+1,69:pOs,99:pOs+4,33:pOs+5,25:pOs+6,68:pOb+16,0
  4. 3v=3:pOb+1,50:pOb+3,210:pO53269,7:fOi=0to191:pO12288+i,0:nE:x$="{17}{01*2}{125}{01*2}{125}{01*2}{255}":w=24
  5. 4fOi=1to10:p=aS(mI(x$,i,1))-1:pO12351+i,p:pO12374-i,p:nE:x=rN(ti)*100+30:pOb+4,x
  6. 5S=54296:y=140:pOb+5,y:fOi=0to5:pO12315+i,255:pO12416+i,255:nE:d=203:h=3
  7. 6gEa$:a=aS(a$+" "):k=m(a,0):l=pE(k)+m(a,1):x=x+h:y=y+v:ifl>0aNl<256tHpOk,l
  8. 7on(abs(x<256aNx>24))gO8:h=-h:x=x+h+h:pOb+4,x:pOb+5,y:gO6
  9. 8j=x-pE(b+aB(y>d)*2):if(y>dory<60)aNj>-10aNj<28tHv=-v:y=y+v+v:pOs,15:pOs,0:gO6
  10. 9on(abs(y>203ory<60))gO4:pOb+4,x:pOb+5,y:gO6
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement