00000000: F7 2F 53 50 52 49 54 45 20 30 2C 31 2C 37 0D 4D |./SPRITE 0,1,7.M|
00000010: 4F 56 53 50 52 20 30 2C 31 30 30 2C 31 30 30 0D |OVSPR 0,100,100.|
00000020: 53 50 52 47 45 54 20 30 2C 53 50 52 49 54 45 0D |SPRGET 0,SPRITE.|
00000030: 44 4F 20 57 48 49 4C 45 20 58 24 3D 22 22 0D 4A |DO WHILE X$="".J|
00000040: 4F 59 0D 58 3D 50 45 45 4B 28 33 33 31 37 33 29 |OY.X=PEEK(33173)|
00000050: 2B 31 0D 59 3D 50 45 45 4B 28 33 33 31 37 35 29 |+1.Y=PEEK(33175)|
00000060: 2B 31 0D 43 55 52 53 4F 52 20 58 2C 59 0D 50 52 |+1.CURSOR X,Y.PR|
00000070: 49 4E 54 20 22 2A 22 0D 47 45 54 20 58 24 0D 4C |INT "*".GET X$.L|
00000080: 4F 4F 50 0D 45 4E 44 2E 0D 3A 53 50 52 49 54 45 |OOP.END..:SPRITE|
00000090: 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.---------------|
000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D |---------.------|
000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000C0: 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |--.-------------|
000000D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D |-----------.----|
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000F0: 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----.-----------|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D |-------------.--|
00000110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000120: 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D |------.---------|
00000130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.|
00000140: 2D 2D 2D 2D 2D 2D 2D 2D 2A 2D 2D 2D 2D 2D 2D 2A |--------*------*|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D |--------.-------|
00000160: 2D 2D 2A 2D 2D 2D 2D 2A 2D 2D 2D 2D 2D 2D 2D 2D |--*----*--------|
00000170: 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A 2A 2A 2A |-.----------****|
00000180: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D |----------.-----|
00000190: 2D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2D 2D 2D |-************---|
000001A0: 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A 2A |---.----------**|
000001B0: 2A 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D |**----------.---|
000001C0: 2D 2D 2D 2D 2D 2D 2A 2D 2D 2D 2D 2A 2D 2D 2D 2D |------*----*----|
000001D0: 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2A 2D |-----.--------*-|
000001E0: 2D 2D 2D 2D 2D 2A 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D |-----*--------.-|
000001F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000200: 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D |-------.--------|
00000210: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000220: 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.---------------|
00000230: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D |---------.------|
00000240: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000250: 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |--.-------------|
00000260: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 2D 2D 2D 2D |-----------.----|
00000270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000280: 2D 2D 2D 2D 0D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----.-----------|
00000290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 00 |-------------...|
000002A0: 58 |X |
./SPRITE 0,1,7.MOVSPR 0,100,100.SPRGET 0
,SPRITE.DO WHILE X$="".JOY.X=PEEK(33173)
+1.Y=PEEK(33175)+1.CURSOR X,Y.PRINT "*".
GET X$.LOOP.END..:SPRITE.---------------
---------.------------------------.-----
-------------------.--------------------
----.------------------------.----------
--------------.------------------------.
--------*------*--------.---------*----*
---------.----------****----------.-----
-************------.----------****------
----.---------*----*---------.--------*-
-----*--------.------------------------.
------------------------.---------------
---------.------------------------.-----
-------------------.--------------------
----.------------------------...X
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL