Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-25 05:29:34 +00:00
Code Issues Projects Releases Wiki Activity

portal: ugh, bug was forgetting to set SCALE= to a sane value

Browse Source
This commit is contained in:
Vince Weaver 2017-01-06 23:00:53 -05:00
parent 9aaf181571
commit e20b314631
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
glados3.3/portal.bas
View File

@ -1,6 +1,6 @@
10 HOME:HGR 10 HOME:HGR:SCALE=2:ROT=0
11 POKE 232,0:POKE 233,28 11 POKE 232,0:POKE 233,29
12 PRINT CHR$(4)+"BLOAD OBJECTS.SHAPE,A$1C00" 12 PRINT CHR$(4)+"BLOAD OBJECTS.SHAPE,A$1D00"
15 GOSUB 1000 15 GOSUB 1000
20 CX=20:CY=100:VX=0:VY=0:SX=140:SY=80:BO=0:GO=0 20 CX=20:CY=100:VX=0:VY=0:SX=140:SY=80:BO=0:GO=0
22 XDRAW 1 AT SX,SY 22 XDRAW 1 AT SX,SY