Advertisement
Guest User

LGTB-MSX Pride!

a guest
Jun 28th, 2013
183
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 10 SCREEN2:COLOR15,1,1
  2. 20 FORN=0TO5:READD:P(N)=N+1:C(N)=D:LINE(0,N*32)-(255,(N*32)+31),D,BF:NEXT:P(5)=0
  3. 30 N=P(N):F=C(N):COLOR,,F:GOTO30
  4. 40 DATA 8,9,10,12,4,13
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement