Groups > comp.sys.apple2.programmer > #365

Re: mario!

From	BLuRry <brendan.robert@gmail.com>
Newsgroups	comp.sys.apple2.programmer
Subject	Re: mario!
Date	2012-08-09 07:26 -0700
Organization	http://groups.google.com
Message-ID	<34ac6faa-20da-4ecb-91ab-6d8d4dc4cf7f@googlegroups.com> (permalink)
References	<mmphosis-1344475679@macgui.com>

Show all headers | View raw

Like!

On Wednesday, August 8, 2012 8:28:01 PM UTC-5, mmphosis wrote:
> 0 H = 2:V = 2:M = 130:N = 70
> 
> 1 HGR : HCOLOR= 6: HPLOT 0,0
> 
> 2 CALL 62454: FOR Y = 0 TO 191
> 
> 3 READ A$:L = LEN (A$):X = 0
> 
> 4 IF L = 0 THEN 80
> 
> 5 B = Y * V + N: FOR I = 1 TO L
> 
> 6 C$ = MID$ (A$,I,1)
> 
> 7 P = X * H + M:E = P + H - 1
> 
> 10 IF C$ = "." THEN 70
> 
> 20 IF C$ = "O" THEN HCOLOR= 5
> 
> 30 IF C$ = ";" THEN HCOLOR= 4
> 
> 40 IF C$ = "@" THEN HCOLOR= 7
> 
> 50 FOR Z = B TO B + V - 1
> 
> 60 HPLOT P,Z TO E,Z: NEXT Z
> 
> 70 X = X + 1: NEXT I,Y
> 
> 80 DATA.....OOOOOO
> 
> 82 DATA....OOOOOOOOOO
> 
> 84 DATA....;;;@@;@@
> 
> 86 DATA...;@;@@@;@@@@
> 
> 88 DATA...;@;;@@@;@@@@
> 
> 90 DATA...;;@@@@;;;;;
> 
> 92 DATA.....@@@@@@@@
> 
> 94 DATA....;;;O;;;
> 
> 96 DATA...;;;;O;;;
> 
> 98 DATA.@;;;;OO;;;,@@@;;OO@OO
> 
> 100 DATA.;;OOOOOOO,...;;OOOO
> 
> 102 DATA..;;;;,..;;;,

Back to comp.sys.apple2.programmer | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

mario!  mmphosis <mmphosis@macgui.com> - 2012-08-09 01:28 +0000
  Re: mario! aiiadict@gmail.com - 2012-08-08 19:25 -0700
  Re: mario! BLuRry <brendan.robert@gmail.com> - 2012-08-09 07:26 -0700
  Re: mario! Neo Winston <mariosergio7@gmail.com> - 2012-12-06 07:22 -0800

csiph-web