SPRITE-GENERATOR
FILE INFORMATION
FILENAME(S): SPRITE-GENERATOR
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-11-30 18:06:07
APPEARS ON: 1 disk(s)
FILE HASH
3bad56e26d5d423dd40b1f7fce76f586389f4a9a12adefd84949e78b00bf71c3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGER DISK NR | SPRITE-GENERATOR | PRG | Xii | 28 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 0A 00 99 22 93 12 45 52 53 54 45 4C |.. ...."..ERSTEL|
00000010: 4C 45 4E 20 56 4F 4E 20 53 50 52 49 54 45 53 21 |LEN VON SPRITES!|
00000020: 00 3E 08 14 00 99 22 11 57 49 45 56 49 45 4C 20 |.>....".WIEVIEL |
00000030: 53 50 52 49 54 45 53 22 3B 3A 85 53 5A 24 00 5A |SPRITES";:.SZ$.Z|
00000040: 08 1E 00 8B 20 C5 28 53 5A 24 29 B3 B2 30 B0 C5 |.... .(SZ$)..0..|
00000050: 28 53 5A 24 29 B1 34 A7 31 30 00 A1 08 28 00 53 |(SZ$).4.10...(.S|
00000060: 5A B2 B5 28 C5 28 53 5A 24 29 29 3A 99 22 11 49 |Z..(.(SZ$)):.".I|
00000070: 4E 20 57 45 4C 43 48 45 20 53 50 45 49 43 48 45 |N WELCHE SPEICHE|
00000080: 52 50 4C 41 45 54 5A 45 20 53 4F 4C 4C 20 47 45 |RPLAETZE SOLL GE|
00000090: 50 4F 4B 54 20 20 20 57 45 52 44 45 4E 20 28 22 |POKT WERDEN ("|
000000A0: 3B 00 C5 08 32 00 99 22 46 52 45 49 20 53 49 4E |;...2.."FREI SIN|
000000B0: 44 3A 20 31 31 2C 20 31 33 2C 31 34 20 55 4E 44 |D: 11, 13,14 UND|
000000C0: 20 31 35 29 3F 00 F8 08 3C 00 99 3A 81 49 B2 31 | 15)?...<..:.I.1|
000000D0: A4 53 5A 3A 99 22 53 50 52 49 54 45 53 20 4E 52 |.SZ:."SPRITES NR|
000000E0: 22 49 22 92 22 3B 3A 85 53 42 3A 53 42 28 49 29 |"I".";:.SB:SB(I)|
000000F0: B2 53 42 AC 36 34 3A 82 00 2D 09 46 00 99 22 11 |.SB.64:..-.F..".|
00000100: 44 41 54 41 20 5A 45 49 4C 45 4E 20 4E 52 2E 3A |DATA ZEILEN NR.:|
00000110: 20 28 3E 31 30 30 30 29 20 20 20 20 20 20 20 9D | (>1000) .|
00000120: 9D 9D 9D 9D 9D 9D 22 3B 3A 85 44 41 24 00 57 09 |......";:.DA$.W.|
00000130: 50 00 8B C5 28 44 41 24 29 B3 B2 31 30 30 30 B0 |P...(DA$)..1000.|
00000140: C5 28 44 41 24 29 B1 36 35 30 30 30 A7 99 22 91 |.(DA$).65000..".|
00000150: 91 22 3B 3A 89 37 30 00 68 09 5A 00 44 41 B2 B5 |.";:.70.h.Z.DA..|
00000160: 28 C5 28 44 41 24 29 29 00 7A 09 64 00 86 42 53 |(.(DA$)).z.d..BS|
00000170: 28 32 31 2C 33 29 3A 49 B2 30 00 9D 09 6E 00 97 |(21,3):I.0...n..|
00000180: 36 34 36 2C 31 34 3A 97 31 39 38 2C 30 3A 49 B2 |646,14:.198,0:I.|
00000190: 49 AA 31 3A 8B 49 B1 53 5A A7 36 39 30 00 B8 09 |I.1:.I.SZ.690...|
000001A0: 78 00 99 22 93 11 12 9B 53 50 52 49 54 45 53 20 |x.."....SPRITES |
000001B0: 4E 52 3A 22 49 22 9A 22 00 ED 09 82 00 99 3A 81 |NR:"I"."......:.|
000001C0: 5A B2 31 A4 32 31 3A 99 A3 31 31 29 5A A3 31 35 |Z.1.21:..11)Z.15|
000001D0: 29 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |)"**************|
000001E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 82 00 06 0A |**********":....|
000001F0: 8C 00 99 22 13 11 11 11 11 11 11 1D 1D 1E 5A 45 |..."..........ZE|
00000200: 49 43 48 4E 45 4E 00 1B 0A 96 00 99 22 12 9E 43 |ICHNEN......"..C|
00000210: 55 52 53 4F 52 2F 53 50 41 43 45 00 2E 0A A0 00 |URSOR/SPACE.....|
00000220: 99 22 11 20 1E 20 4C 4F 45 53 43 48 45 4E 00 3E |.". . LOESCHEN.>|
00000230: 0A AA 00 99 22 20 20 20 20 9E 12 3C 40 3E 00 4F |...." ..<@>.O|
00000240: 0A B4 00 99 22 11 1D 1D 20 20 1E 45 4E 44 45 00 |...."... .ENDE.|
00000250: 61 0A BE 00 99 22 20 20 20 20 9E 12 3C 46 31 3E |a...." ..<F1>|
00000260: 9A 00 78 0A C8 00 53 50 B2 31 3A 53 B2 31 3A 5A |..x...SP.1:S.1:Z|
00000270: 5A B2 31 3A 42 53 B2 37 00 A4 0A D2 00 50 4F B2 |Z.1:BS.7.....PO.|
00000280: 31 30 32 34 AA 53 50 AA 31 34 AA 28 5A 5A AA 32 |1024.SP.14.(ZZ.2|
00000290: 29 AC 34 30 3A 8B C2 28 50 4F 29 B2 31 36 30 A7 |).40:..(PO).160.|
000002A0: 50 45 B2 31 00 BD 0A DC 00 5A 45 B2 31 37 30 3A |PE.1.....ZE.170:|
000002B0: 46 41 B2 37 3A 8D 36 35 30 3A A1 54 24 00 EE 0A |FA.7:.650:.T$...|
000002C0: E6 00 5A 45 B2 34 32 3A 46 41 B2 31 34 3A 8D 36 |..ZE.42:FA.14:.6|
000002D0: 35 30 3A 8B 50 45 B2 31 A7 5A 45 B2 31 36 30 3A |50:.PE.1.ZE.160:|
000002E0: 46 41 B2 37 3A 50 45 B2 30 3A 8D 36 35 30 00 FD |FA.7:PE.0:.650..|
000002F0: 0A F0 00 8B 54 24 B2 22 22 A7 32 31 30 00 14 0B |....T$."".210...|
00000300: FA 00 8F 20 53 50 52 49 54 45 53 20 5A 45 49 43 |... SPRITES ZEIC|
00000310: 48 4E 45 4E 00 2B 0B 0E 01 8B 54 24 B2 22 1D 22 |HNEN.+....T$."."|
00000320: B0 54 24 B2 22 20 22 A7 33 34 30 00 3B 0B 18 01 |.T$." ".340.;...|
00000330: 8B 54 24 B2 22 9D 22 A7 33 38 30 00 4B 0B 22 01 |.T$.".".380.K.".|
00000340: 8B 54 24 B2 22 91 22 A7 34 33 30 00 5B 0B 2C 01 |.T$.".".430.[.,.|
00000350: 8B 54 24 B2 22 11 22 A7 34 35 30 00 6B 0B 36 01 |.T$.".".450.k.6.|
00000360: 8B 54 24 B2 22 40 22 A7 34 37 30 00 7E 0B 40 01 |.T$."@".470.~.@.|
00000370: 8B C6 28 54 24 29 B2 31 33 33 A7 34 39 30 00 87 |..(T$).133.490..|
00000380: 0B 4A 01 89 32 31 30 00 C7 0B 54 01 8B 54 24 B2 |.J..210...T..T$.|
00000390: 22 20 22 A7 8B C2 28 50 4F 29 B3 B1 31 36 30 A7 |" "...(PO)..160.|
000003A0: 5A 45 B2 31 36 30 3A 46 41 B2 37 3A 8D 36 35 30 |ZE.160:FA.7:.650|
000003B0: 3A 42 53 28 5A 5A 2C 53 29 B2 42 53 28 5A 5A 2C |:BS(ZZ,S).BS(ZZ,|
000003C0: 53 29 AA 32 AE 42 53 00 F3 0B 5E 01 8B 53 50 B2 |S).2.BS...^..SP.|
000003D0: 32 34 AF 5A 5A B3 32 31 A7 5A 5A B2 5A 5A AA 31 |24.ZZ.21.ZZ.ZZ.1|
000003E0: 3A 53 B2 31 3A 53 50 B2 31 3A 42 53 B2 37 3A 89 |:S.1:SP.1:BS.7:.|
000003F0: 32 31 30 00 02 0C 68 01 8B 53 50 B2 32 34 A7 32 |210...h..SP.24.2|
00000400: 31 30 00 1B 0C 72 01 53 50 B2 53 50 AA 31 3A 42 |10...r.SP.SP.1:B|
00000410: 53 B2 42 53 AB 31 3A 89 34 30 30 00 29 0C 7C 01 |S.BS.1:.400.).|.|
00000420: 8B 53 50 B2 31 A7 32 31 30 00 3D 0C 86 01 53 50 |.SP.1.210.=...SP|
00000430: B2 53 50 AB 31 3A 42 53 B2 42 53 AA 31 00 58 0C |.SP.1:BS.BS.1.X.|
00000440: 90 01 8B 42 53 B2 AB 31 A7 42 53 B2 37 3A 53 B2 |...BS..1.BS.7:S.|
00000450: 53 AA 31 3A 89 32 31 30 00 6D 0C 9A 01 8B 42 53 |S.1:.210.m....BS|
00000460: B2 38 A7 42 53 B2 30 3A 53 B2 53 AB 31 00 76 0C |.8.BS.0:S.S.1.v.|
00000470: A4 01 89 32 31 30 00 89 0C AE 01 8B 5A 5A B3 B1 |...210......ZZ..|
00000480: 31 A7 5A 5A B2 5A 5A AB 31 00 92 0C B8 01 89 32 |1.ZZ.ZZ.1......2|
00000490: 31 30 00 A6 0C C2 01 8B 5A 5A B3 B1 32 31 A7 5A |10......ZZ..21.Z|
000004A0: 5A B2 5A 5A AA 31 00 AF 0C CC 01 89 32 31 30 00 |Z.ZZ.1......210.|
000004B0: E6 0C D6 01 8B C2 28 50 4F 29 B3 B1 34 32 A7 5A |......(PO)..42.Z|
000004C0: 45 B2 34 32 3A 46 41 B2 31 34 3A 8D 36 35 30 3A |E.42:FA.14:.650:|
000004D0: 42 53 28 5A 5A 2C 53 29 B2 42 53 28 5A 5A 2C 53 |BS(ZZ,S).BS(ZZ,S|
000004E0: 29 AB 32 AE 42 53 00 EF 0C E0 01 89 32 31 30 00 |).2.BS......210.|
000004F0: 09 0D EA 01 8F 20 53 50 52 49 54 45 53 20 55 45 |..... SPRITES UE|
00000500: 42 45 52 4E 45 48 4D 45 4E 00 2A 0D F4 01 46 5A |BERNEHMEN.*...FZ|
00000510: B2 44 41 3A 44 41 B2 46 5A AA B5 28 28 53 5A AA |.DA:DA.FZ..((SZ.|
00000520: 31 30 29 AD 31 30 29 AC 31 30 00 3F 0D FE 01 44 |10).10).10.?...D|
00000530: 41 24 B2 C4 28 44 41 29 AA 22 44 41 54 41 22 00 |A$..(DA)."DATA".|
00000540: 7B 0D 08 02 97 36 34 36 2C 36 3A 99 22 93 22 C4 |{....646,6:.".".|
00000550: 28 46 5A 29 AA 22 46 4F 52 4A 3D 30 54 4F 36 32 |(FZ)."FORJ=0TO62|
00000560: 3A 52 45 41 44 51 3A 50 4F 4B 45 22 53 42 28 49 |:READQ:POKE"SB(I|
00000570: 29 22 2B 4A 2C 51 3A 4E 45 58 54 00 94 0D 12 02 |)"+J,Q:NEXT.....|
00000580: 44 31 B2 30 3A 81 5A 5A B2 31 A4 32 31 3A 81 53 |D1.0:.ZZ.1.21:.S|
00000590: B2 31 A4 33 00 D1 0D 1C 02 8B C3 28 44 41 24 29 |.1.3.......(DA$)|
000005A0: B1 37 30 A7 44 41 B2 44 41 AA 31 30 3A 99 C8 28 |.70.DA.DA.10:..(|
000005B0: 44 41 24 2C C3 28 44 41 24 29 AB 31 29 3A 44 41 |DA$,.(DA$).1):DA|
000005C0: 24 B2 C4 28 44 41 AA 31 30 29 AA 22 44 41 54 41 |$..(DA.10)."DATA|
000005D0: 22 00 01 0E 26 02 44 41 24 B2 44 41 24 AA C9 28 |"...&.DA$.DA$..(|
000005E0: C4 28 42 53 28 5A 5A 2C 53 29 29 2C C3 28 C4 28 |.(BS(ZZ,S)),.(.(|
000005F0: 42 53 28 5A 5A 2C 53 29 29 29 AB 31 29 AA 22 2C |BS(ZZ,S))).1).",|
00000600: 22 00 09 0E 30 02 82 3A 82 00 26 0E 3A 02 8B 44 |"...0..:..&.:..D|
00000610: 41 24 B2 C4 28 44 41 AA 31 30 29 AA 22 44 41 54 |A$..(DA.10)."DAT|
00000620: 41 22 A7 35 34 30 00 44 0E 44 02 99 C8 28 44 41 |A".540.D.D...(DA|
00000630: 24 2C C3 28 44 41 24 29 AB 31 29 3A 44 41 B2 44 |$,.(DA$).1):DA.D|
00000640: 41 AA 31 30 00 79 0E 4E 02 99 22 39 30 44 49 4D |A.10.y.N.."90DIM|
00000650: 42 53 28 32 31 2C 33 29 2C 53 42 28 22 53 5A 22 |BS(21,3),SB("SZ"|
00000660: 29 3A 49 3D 22 49 22 3A 53 5A 3D 22 53 5A 22 3A |):I="I":SZ="SZ":|
00000670: 44 41 3D 22 44 41 AA 31 30 00 AA 0E 58 02 99 22 |DA="DA.10...X.."|
00000680: 31 30 30 22 3B 3A 81 4E B2 31 A4 53 5A 3A 99 22 |100";:.N.1.SZ:."|
00000690: 53 42 28 22 4E 22 29 3D 22 53 42 28 4E 29 22 3A |SB("N")="SB(N)":|
000006A0: 22 3B 3A 82 3A 99 22 9D 20 22 00 BC 0E 62 02 99 |";:.:.". "...b..|
000006B0: 22 35 30 30 46 5A 3D 22 46 5A AA 31 00 CA 0E 6C |"500FZ="FZ.1...l|
000006C0: 02 99 22 47 4F 54 4F 39 30 22 00 D3 0E 76 02 89 |.."GOTO90"...v..|
000006D0: 37 33 30 00 D9 0E 80 02 80 00 F3 0E 8A 02 97 50 |730............P|
000006E0: 4F 2C 5A 45 3A 97 35 34 32 37 32 AA 50 4F 2C 46 |O,ZE:.54272.PO,F|
000006F0: 41 3A 8E 00 04 0F B2 02 5A 41 B2 31 30 3A 5A 45 |A:......ZA.10:ZE|
00000700: B2 31 32 30 00 2C 0F BC 02 97 36 34 36 2C 36 3A |.120.,....646,6:|
00000710: 99 22 93 36 39 30 5A 41 3D 22 5A 45 AA 31 30 22 |.".690ZA="ZE.10"|
00000720: 3A 5A 45 3D 22 5A 45 AA 31 31 30 22 00 4C 0F C6 |:ZE="ZE.110".L..|
00000730: 02 81 49 B2 5A 41 A4 5A 45 A9 31 30 3A 99 49 3A |..I.ZA.ZE.10:.I:|
00000740: 82 3A 99 22 47 4F 54 4F 36 39 30 22 00 67 0F D0 |.:."GOTO690".g..|
00000750: 02 8B 49 B1 37 30 30 A7 99 22 91 91 50 4F 4B 45 |..I.700.."..POKE|
00000760: 36 34 36 2C 31 34 22 00 91 0F DA 02 97 36 33 31 |646,14"......631|
00000770: 2C 31 39 3A 81 49 B2 31 A4 31 34 3A 97 36 33 31 |,19:.I.1.14:.631|
00000780: AA 49 2C 31 33 3A 82 3A 97 31 39 38 2C 31 35 3A |.I,13:.:.198,15:|
00000790: 80 00 00 00 66 FF |....f. |
.. ...."..ERSTELLEN VON SPRITES!.>....".
WIEVIEL SPRITES";:.SZ$.Z.... E(SZ$)..0.E
(SZ$).4.10...(.SZ..(E(SZ$)):.".IN WELCHE
SPEICHERPLAETZE SOLL GEPOKT WERDEN ("
;.E.2.."FREI SIND: 11, 13,14 UND 15)?...
<..:.I.1.SZ:."SPRITES NR"I".";:.SB:SB(I)
.SB.64:..-.F..".DATA ZEILEN NR.: (>1000)
.......";:.DA$.W.P..E(DA$)..1000.
E(DA$).65000.."..";:.70.H.Z.DA..(E(DA$))
.Z.D..BS(21,3):I.0...N..646,14:.198,0:I.
I.1:.I.SZ.690...X.."....SPRITES NR:"I"."
......:.Z.1.21:..11)Z.15)"**************
**********":......."..........ZEICHNEN..
...."..CURSOR/SPACE... ..". . LOESCHEN.>
...." ..<@>.O...."... .ENDE.A...."
..<F1>..X.H.SP.1:S.1:ZZ.1:BS.7...R.PO.
1024.SP.14.(ZZ.2).40:.B(PO).160.PE.1....
.ZE.170:FA.7:.650:.T$.....ZE.42:FA.14:.6
50:.PE.1.ZE.160:FA.7:PE.0:.650......T$."
".210...... SPRITES ZEICHNEN.+....T$."."
.T$." ".340.;....T$.".".380.K."..T$.".".
430.[.,..T$.".".450.K.6..T$."@".470.~.@.
.F(T$).133.490...J..210.G.T..T$." "..B(P
O)..160.ZE.160:FA.7:.650:BS(ZZ,S).BS(ZZ,
S).2.BS...^..SP.24.ZZ.21.ZZ.ZZ.1:S.1:SP.
1:BS.7:.210...H..SP.24.210...R.SP.SP.1:B
S.BS.1:.400.).|..SP.1.210.=...SP.SP.1:BS
.BS.1.X....BS..1.BS.7:S.S.1:.210.M....BS
.8.BS.0:S.S.1.V....210......ZZ..1.ZZ.ZZ.
1......210...B..ZZ..21.ZZ.ZZ.1...L..210.
..V..B(PO)..42.ZE.42:FA.14:.650:BS(ZZ,S)
.BS(ZZ,S).2.BS......210...... SPRITES UE
BERNEHMEN.*...FZ.DA:DA.FZ..((SZ.10).10).
10.?...DA$.D(DA)."DATA".{....646,6:."."D
(FZ)."FORJ=0TO62:READQ:POKE"SB(I)"+J,Q:N
EXT.....D1.0:.ZZ.1.21:.S.1.3.Q....C(DA$)
.70.DA.DA.10:.H(DA$,C(DA$).1):DA$.D(DA.1
0)."DATA"...&.DA$.DA$.I(D(BS(ZZ,S)),C(D(
BS(ZZ,S))).1).","...0..:..&.:..DA$.D(DA.
10)."DATA".540.D.D..H(DA$,C(DA$).1):DA.D
A.10.Y.N.."90DIMBS(21,3),SB("SZ"):I="I":
SZ="SZ":DA="DA.10...X.."100";:.N.1.SZ:."
SB("N")="SB(N)":";:.:.". "...B.."500FZ="
FZ.1.J.L.."GOTO90".S.V..730.Y..........P
O,ZE:.54272.PO,FA:......ZA.10:ZE.120.,..
..646,6:.".690ZA="ZE.10":ZE="ZE.110".L.F
..I.ZA.ZE.10:.I:.:."GOTO690".G.P..I.700.
."..POKE646,14"...Z..631,19:.I.1.14:.631
.I,13:.:.198,15:....F.
> CLICK IMAGE PREVIEW FOR FULL MODAL