PRINT USING
FILE INFORMATION
FILENAME(S): PRINT USING
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-02 16:38:53
APPEARS ON: 1 disk(s)
FILE HASH
02096edc3a69cad128a6fdaf2599dc2d448470558366f235c1c6cb9bf61c7848
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DRUCK 3B | PRINT USING | PRG | Treasure Chest - Plattfuss | 3 | 9 |
⚠ CORRUPT DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 50 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..P.... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000050: 00 9F 08 0B 00 8F 20 2A 20 20 20 20 20 20 20 20 |...... * | 00000060: 20 20 20 20 20 20 20 20 20 46 20 4F 20 52 20 4D | F O R M| 00000070: 20 41 20 54 20 52 20 4F 20 55 20 54 20 49 20 4E | A T R O U T I N| 00000080: 20 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | E | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 000000A0: EE 08 0C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3D |**************.=| 000000F0: 09 0D 00 8F 20 2A 20 43 4F 50 59 52 49 47 48 54 |.... * COPYRIGHT| 00000100: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |: | 00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 8C 09 | *...| 00000140: 0E 00 8F 20 2A 20 20 44 52 2E 4D 2E 49 52 53 4B |... * DR.M.IRSK| 00000150: 45 4E 53 20 20 20 20 20 20 20 20 20 20 20 20 20 |ENS | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000180: 20 20 20 20 20 20 20 20 20 20 20 2A 00 DB 09 0F | *....| 00000190: 00 8F 20 2A 20 20 4C 45 56 45 53 45 52 20 41 4C |.. * LEVESER AL| 000001A0: 4C 45 45 20 31 33 20 20 20 20 20 20 20 20 20 20 |LEE 13 | 000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001D0: 20 20 20 20 20 20 20 20 20 20 2A 00 2A 0A 10 00 | *.*...| 000001E0: 8F 20 2A 20 20 33 30 36 31 20 48 45 53 50 45 20 |. * 3061 HESPE | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000220: 20 20 20 20 20 20 20 20 20 2A 00 79 0A 11 00 8F | *.y....| 00000230: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 00000240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000260: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C8 0A 12 00 8F 20 |*********...... | 00000280: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* | 00000290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002C0: 20 20 20 20 20 20 20 2A 00 17 0B 13 00 8F 20 2A | *...... *| 000002D0: 20 41 55 46 52 55 46 3A 20 20 20 20 20 20 20 20 | AUFRUF: | 000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000310: 20 20 20 20 20 20 2A 00 66 0B 14 00 8F 20 2A 20 | *.f.... * | 00000320: 20 55 53 52 28 58 29 2C 46 4C 2C 4E 4B 20 20 20 | USR(X),FL,NK | 00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000360: 20 20 20 20 20 2A 00 B5 0B 15 00 8F 20 2A 20 20 | *...... * | 00000370: 20 20 58 20 20 3D 20 5A 55 20 46 4F 52 4D 41 54 | X = ZU FORMAT| 00000380: 49 45 52 45 4E 44 45 52 20 4E 55 4D 45 52 49 53 |IERENDER NUMERIS| 00000390: 43 48 45 52 20 57 45 52 54 20 20 20 20 20 20 20 |CHER WERT | 000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003B0: 20 20 20 20 2A 00 04 0C 16 00 8F 20 2A 20 20 20 | *...... * | 000003C0: 20 46 4C 20 3D 20 46 45 4C 44 4C 41 45 4E 47 45 | FL = FELDLAENGE| 000003D0: 20 44 45 52 20 46 4F 52 4D 41 54 49 45 52 54 45 | DER FORMATIERTE| 000003E0: 4E 20 5A 41 48 4C 20 20 20 20 20 20 20 20 20 20 |N ZAHL | 000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000400: 20 20 20 2A 00 53 0C 17 00 8F 20 2A 20 20 20 20 | *.S.... * | 00000410: 4E 4B 20 3D 20 41 4E 5A 41 48 4C 20 4E 41 43 48 |NK = ANZAHL NACH| 00000420: 4B 4F 4D 4D 41 53 54 45 4C 4C 45 4E 20 44 45 52 |KOMMASTELLEN DER| 00000430: 20 46 4F 52 4D 41 54 49 45 52 54 45 4E 20 5A 41 | FORMATIERTEN ZA| 00000440: 48 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |HL | 00000450: 20 20 2A 00 A2 0C 18 00 8F 20 2A 20 20 44 41 53 | *...... * DAS| 00000460: 20 45 52 47 45 42 4E 49 53 20 44 45 52 20 55 53 | ERGEBNIS DER US| 00000470: 52 2D 46 55 4E 4B 54 49 4F 4E 20 49 53 54 20 44 |R-FUNKTION IST D| 00000480: 45 52 20 46 4F 52 4D 41 54 49 45 52 54 45 20 53 |ER FORMATIERTE S| 00000490: 54 52 49 4E 47 2E 20 44 49 45 53 45 52 20 20 20 |TRING. DIESER | 000004A0: 20 2A 00 F1 0C 19 00 8F 20 2A 20 20 4B 41 4E 4E | *...... * KANN| 000004B0: 20 45 49 4E 45 52 20 53 54 52 49 4E 47 56 41 52 | EINER STRINGVAR| 000004C0: 49 41 42 4C 45 4E 20 5A 55 47 45 57 49 45 53 45 |IABLEN ZUGEWIESE| 000004D0: 4E 20 4F 44 45 52 20 41 55 53 47 45 44 52 55 43 |N ODER AUSGEDRUC| 000004E0: 4B 54 20 57 45 52 44 45 4E 2E 20 20 20 20 20 20 |KT WERDEN. | 000004F0: 2A 00 40 0D 1A 00 8F 20 2A 20 42 45 49 53 50 49 |*.@.... * BEISPI| 00000500: 45 4C 45 3A 20 20 20 20 20 20 20 20 20 20 20 20 |ELE: | 00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *| 00000540: 00 8F 0D 1B 00 8F 20 2A 20 20 41 24 3D 28 55 53 |...... * A$=(US| 00000550: 52 28 58 59 29 2C 31 30 2C 32 29 2B 22 22 20 20 |R(XY),10,2)+"" | 00000560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000590: DE 0D 1C 00 8F 20 2A 20 20 50 52 49 4E 54 20 55 |..... * PRINT U| 000005A0: 53 52 28 58 59 29 2C 31 30 2C 32 3B 22 20 44 4D |SR(XY),10,2;" DM| 000005B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 2D | *.-| 000005E0: 0E 1D 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 |.... * | 000005F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000620: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 7C 0E | *.|.| 00000630: 1E 00 8F 20 2A 20 42 45 53 4F 4E 44 45 52 48 45 |... * BESONDERHE| 00000640: 49 54 45 4E 3A 20 20 20 20 20 20 20 20 20 20 20 |ITEN: | 00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000670: 20 20 20 20 20 20 20 20 20 20 20 2A 00 CB 0E 1F | *....| 00000680: 00 8F 20 2A 20 20 57 45 4E 4E 20 4E 41 43 48 4B |.. * WENN NACHK| 00000690: 4F 4D 4D 41 53 54 45 4C 4C 45 4E 20 44 55 52 43 |OMMASTELLEN DURC| 000006A0: 48 20 44 41 53 20 46 4F 52 4D 41 54 49 45 52 45 |H DAS FORMATIERE| 000006B0: 4E 20 41 42 47 45 53 43 48 4E 49 54 54 45 4E 20 |N ABGESCHNITTEN | 000006C0: 57 45 52 44 45 4E 2C 20 20 20 2A 00 1A 0F 20 00 |WERDEN, *... .| 000006D0: 8F 20 2A 20 20 53 4F 20 57 49 52 44 20 44 49 45 |. * SO WIRD DIE| 000006E0: 20 5A 41 48 4C 20 47 45 52 55 4E 44 45 54 2E 20 | ZAHL GERUNDET. | 000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000710: 20 20 20 20 20 20 20 20 20 2A 00 69 0F 21 00 8F | *.i.!..| 00000720: 20 2A 20 20 5A 41 48 4C 45 4E 44 41 52 53 54 45 | * ZAHLENDARSTE| 00000730: 4C 4C 55 4E 47 45 4E 20 49 4D 20 45 2D 46 4F 52 |LLUNGEN IM E-FOR| 00000740: 4D 41 54 20 57 45 52 44 45 4E 20 45 42 45 4E 46 |MAT WERDEN EBENF| 00000750: 41 4C 4C 53 20 56 45 52 41 52 42 45 49 54 45 54 |ALLS VERARBEITET| 00000760: 2E 20 20 20 20 20 20 20 2A 00 B8 0F 22 00 8F 20 |. *...".. | 00000770: 2A 20 20 57 45 4E 4E 20 44 49 45 20 5A 41 48 4C |* WENN DIE ZAHL| 00000780: 20 49 4E 20 44 45 52 20 41 4E 47 45 47 45 42 45 | IN DER ANGEGEBE| 00000790: 4E 45 4E 20 46 45 4C 44 4C 41 45 4E 47 45 20 4E |NEN FELDLAENGE N| 000007A0: 49 43 48 54 20 44 41 52 47 45 53 54 45 4C 4C 54 |ICHT DARGESTELLT| 000007B0: 20 20 20 20 20 20 20 2A 00 07 10 23 00 8F 20 2A | *...#.. *| 000007C0: 20 20 57 45 52 44 45 4E 20 4B 41 4E 4E 2C 20 44 | WERDEN KANN, D| 000007D0: 41 4E 4E 20 57 49 52 44 20 44 49 45 20 5A 41 48 |ANN WIRD DIE ZAH| 000007E0: 4C 20 49 4E 20 44 45 52 20 4E 4F 54 57 45 4E 44 |L IN DER NOTWEND| 000007F0: 49 47 45 4E 20 46 45 4C 44 4C 41 45 4E 47 45 20 |IGEN FELDLAENGE | 00000800: 44 41 52 2D 20 20 2A 00 56 10 24 00 8F 20 2A 20 |DAR- *.V.$.. * | 00000810: 20 47 45 53 54 45 4C 4C 54 2C 20 55 4D 20 45 49 | GESTELLT, UM EI| 00000820: 4E 45 4E 20 5A 49 46 46 45 52 56 45 52 4C 55 53 |NEN ZIFFERVERLUS| 00000830: 54 20 5A 55 20 56 45 52 4D 45 49 44 45 4E 2E 20 |T ZU VERMEIDEN. | 00000840: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000850: 20 20 20 20 20 2A 00 A5 10 25 00 8F 20 2A 20 20 | *...%.. * | 00000860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000880: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000008A0: 20 20 20 20 2A 00 F4 10 26 00 8F 20 2A 20 56 4F | *...&.. * VO| 000008B0: 52 20 41 55 46 52 55 46 20 44 45 52 20 46 55 4E |R AUFRUF DER FUN| 000008C0: 4B 54 49 4F 4E 20 4D 55 45 53 53 45 4E 20 46 4F |KTION MUESSEN FO| 000008D0: 4C 47 45 4E 44 45 20 42 45 46 45 48 4C 45 20 45 |LGENDE BEFEHLE E| 000008E0: 49 4E 4D 41 4C 49 47 20 44 55 52 43 48 47 45 2D |INMALIG DURCHGE-| 000008F0: 20 20 20 2A 00 43 11 27 00 8F 20 2A 20 46 55 45 | *.C.'.. * FUE| 00000900: 48 52 54 20 57 45 52 44 45 4E 3A 20 20 20 20 20 |HRT WERDEN: | 00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000940: 20 20 2A 00 92 11 28 00 8F 20 2A 20 20 20 50 4F | *...(.. * PO| 00000950: 4B 45 20 37 38 35 2C 30 20 20 20 3A 20 4C 4F 57 |KE 785,0 : LOW| 00000960: 2D 42 59 54 45 20 44 45 52 20 53 54 41 52 54 41 |-BYTE DER STARTA| 00000970: 44 52 45 53 53 45 20 20 20 20 20 20 20 20 20 20 |DRESSE | 00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000990: 20 2A 00 E1 11 29 00 8F 20 2A 20 20 20 50 4F 4B | *...).. * POK| 000009A0: 45 20 37 38 36 2C 31 39 32 20 3A 20 48 49 47 48 |E 786,192 : HIGH| 000009B0: 2D 42 59 54 45 20 44 45 52 20 53 54 41 52 54 41 |-BYTE DER STARTA| 000009C0: 44 52 45 53 53 45 20 3D 20 34 39 31 35 32 20 20 |DRESSE = 49152 | 000009D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009E0: 2A 00 30 12 2A 00 8F 20 2A 20 20 20 20 20 20 20 |*.0.*.. * | 000009F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *| 00000A30: 00 7F 12 2B 00 8F 20 2A 20 44 49 45 20 52 4F 55 |...+.. * DIE ROU| 00000A40: 54 49 4E 45 20 49 53 54 20 56 4F 4C 4C 20 56 45 |TINE IST VOLL VE| 00000A50: 52 53 43 48 49 45 42 4C 49 43 48 20 55 4E 44 20 |RSCHIEBLICH UND | 00000A60: 4B 41 4E 4E 20 44 41 48 45 52 20 41 4E 20 4A 45 |KANN DAHER AN JE| 00000A70: 44 45 52 20 53 54 45 4C 4C 45 20 49 4D 20 2A 00 |DER STELLE IM *.| 00000A80: CE 12 2C 00 8F 20 2A 20 53 50 45 49 43 48 45 52 |..,.. * SPEICHER| 00000A90: 20 4C 49 45 47 45 4E 2E 20 44 49 45 20 41 44 52 | LIEGEN. DIE ADR| 00000AA0: 45 53 53 45 4E 20 44 45 52 20 55 53 52 2D 46 55 |ESSEN DER USR-FU| 00000AB0: 4E 4B 54 49 4F 4E 20 53 49 4E 44 20 44 41 4E 4E |NKTION SIND DANN| 00000AC0: 20 45 4E 54 53 50 52 45 43 48 45 4E 44 2A 00 1D | ENTSPRECHEND*..| 00000AD0: 13 2D 00 8F 20 2A 20 41 4E 5A 55 50 41 53 53 45 |.-.. * ANZUPASSE| 00000AE0: 4E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |N. | 00000AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B10: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 6C 13 | *.l.| 00000B20: 2E 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |... * | 00000B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B60: 20 20 20 20 20 20 20 20 20 20 20 2A 00 BB 13 2F | *.../| 00000B70: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 00000B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000BA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000BB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D6 13 64 00 |***********...d.| 00000BC0: 53 B2 30 3A 85 20 22 53 54 41 52 54 41 44 52 45 |S.0:. "STARTADRE| 00000BD0: 53 53 45 22 3B 42 00 E8 13 6E 00 81 20 49 B2 42 |SSE";B...n.. I.B| 00000BE0: 20 A4 20 42 AA 33 33 35 00 F0 13 78 00 87 20 41 | . B.335...x.. A| 00000BF0: 00 00 14 82 00 53 B2 53 AA 41 3A 97 20 49 2C 41 |.....S.S.A:. I,A| 00000C00: 00 08 14 8C 00 82 20 49 00 3C 14 96 00 8B 20 53 |...... I.<.... S| 00000C10: B3 B1 33 36 39 38 36 20 A7 20 99 20 22 12 20 46 |..36986 . . ". F| 00000C20: 45 48 4C 45 52 20 49 4E 20 44 45 4E 20 44 41 54 |EHLER IN DEN DAT| 00000C30: 41 5A 45 49 4C 45 4E 20 92 22 3A 90 00 61 14 A0 |AZEILEN .":..a..| 00000C40: 00 97 20 37 38 35 2C 42 AB 32 35 36 AC B5 28 42 |.. 785,B.256..(B| 00000C50: AD 32 35 36 29 3A 97 20 37 38 36 2C 42 AD 32 35 |.256):. 786,B.25| 00000C60: 36 00 75 14 AA 00 99 20 22 20 41 4C 4C 45 53 20 |6.u.... " ALLES | 00000C70: 4F 4B 2E 20 22 00 89 14 C7 00 8F 20 54 45 53 54 |OK. "...... TEST| 00000C80: 42 45 49 53 50 49 45 4C 45 00 97 14 C8 00 81 20 |BEISPIELE...... | 00000C90: 45 B2 30 20 A4 20 39 00 A4 14 D2 00 46 B2 FF AC |E.0 . 9.....F...| 00000CA0: 31 30 AE 45 00 BA 14 DC 00 41 24 B2 28 B7 28 46 |10.E.....A$.(.(F| 00000CB0: 29 2C 31 31 2C 30 29 AA 22 22 00 D7 14 E6 00 99 |),11,0).""......| 00000CC0: 20 41 24 3B B7 28 46 29 2C 31 33 2C 31 3B B7 28 | A$;.(F),13,1;.(| 00000CD0: 46 29 2C 31 34 2C 32 00 DF 14 F0 00 82 20 45 00 |F),14,2...... E.| 00000CE0: E5 14 FA 00 80 00 F6 14 2B 01 8F 20 44 41 54 41 |........+.. DATA| 00000CF0: 5A 45 49 4C 45 4E 00 3C 15 2C 01 83 33 32 2C 31 |ZEILEN.<.,..32,1| 00000D00: 34 31 2C 31 37 33 2C 33 32 2C 32 32 31 2C 31 38 |41,173,32,221,18| 00000D10: 39 2C 33 32 2C 32 35 33 2C 31 37 34 2C 33 32 2C |9,32,253,174,32,| 00000D20: 31 35 38 2C 31 38 33 2C 31 33 34 2C 38 38 2C 33 |158,183,134,88,3| 00000D30: 32 2C 32 35 33 2C 31 37 34 2C 33 32 00 85 15 2D |2,253,174,32...-| 00000D40: 01 83 31 35 38 2C 31 38 33 2C 31 33 34 2C 38 37 |..158,183,134,87| 00000D50: 2C 31 30 34 2C 31 30 34 2C 31 36 32 2C 32 35 35 |,104,104,162,255| 00000D60: 2C 31 36 30 2C 30 2C 32 33 32 2C 31 38 39 2C 30 |,160,0,232,189,0| 00000D70: 2C 31 2C 32 34 30 2C 31 31 37 2C 32 30 31 2C 36 |,1,240,117,201,6| 00000D80: 39 2C 32 34 30 00 CB 15 2E 01 83 38 2C 32 30 31 |9,240......8,201| 00000D90: 2C 34 36 2C 32 30 38 2C 32 34 32 2C 31 33 38 2C |,46,208,242,138,| 00000DA0: 31 36 38 2C 32 30 38 2C 32 33 38 2C 31 37 33 2C |168,208,238,173,| 00000DB0: 32 2C 31 2C 32 30 31 2C 34 36 2C 32 30 38 2C 31 |2,1,201,46,208,1| 00000DC0: 32 2C 32 30 32 2C 31 36 30 2C 31 00 13 16 2F 01 |2,202,160,1.../.| 00000DD0: 83 32 30 30 2C 31 38 35 2C 31 2C 31 2C 31 35 33 |.200,185,1,1,153| 00000DE0: 2C 30 2C 31 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |,0,1M.M.M.M.M.M.| 00000DF0: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E00: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E10: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E20: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E30: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E40: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E50: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E60: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E70: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E80: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000E90: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000EA0: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000EB0: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000EC0: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000ED0: 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 4D B7 |M.M.M.M.M.M.M.M.| 00000EE0: 4D B7 |M. |
..P.... ********************************
****************************************
...... * F O R M A T R O
U T I N E *.
..... **********************************
**************************************.=
.... * COPYRIGHT:
*...
... * DR.M.IRSKENS
*....
.. * LEVESER ALLEE 13
*.*...
. * 3061 HESPE
*.Y....
***************************************
*********************************.H....
*
*...... *
AUFRUF:
*.F.... *
USR(X),FL,NK
*...... *
X = ZU FORMATIERENDER NUMERISCHER WER
T *...... *
FL = FELDLAENGE DER FORMATIERTEN ZAHL
*.S.... *
NK = ANZAHL NACHKOMMASTELLEN DER FORMATI
ERTEN ZAHL *...... * DAS
ERGEBNIS DER USR-FUNKTION IST DER FORMA
TIERTE STRING. DIESER *...... * KANN
EINER STRINGVARIABLEN ZUGEWIESEN ODER A
USGEDRUCKT WERDEN. *.@.... * BEISPI
ELE:
*...... * A$=(US
R(XY),10,2)+""
*...... * PRINT U
SR(XY),10,2;" DM"
*.-.... *
*.|.... * BESONDERHE
ITEN:
*.K.... * WENN NACHK
OMMASTELLEN DURCH DAS FORMATIEREN ABGESC
HNITTEN WERDEN, *... .. * SO WIRD DIE
ZAHL GERUNDET.
*.I.!.. * ZAHLENDARSTE
LLUNGEN IM E-FORMAT WERDEN EBENFALLS VER
ARBEITET. *...".. * WENN DIE ZAHL
IN DER ANGEGEBENEN FELDLAENGE NICHT DAR
GESTELLT *...#.. * WERDEN KANN, D
ANN WIRD DIE ZAHL IN DER NOTWENDIGEN FEL
DLAENGE DAR- *.V.$.. * GESTELLT, UM EI
NEN ZIFFERVERLUST ZU VERMEIDEN.
*...%.. *
*...&.. * VOR AUFRUF DER FUN
KTION MUESSEN FOLGENDE BEFEHLE EINMALIG
DURCHGE- *.C.'.. * FUEHRT WERDEN:
*...(.. * POKE 785,0 : LOW
-BYTE DER STARTADRESSE
*...).. * POKE 786,192 : HIGH
-BYTE DER STARTADRESSE = 49152
*.0.*.. *
*..+.. * DIE ROUTINE IST VOLL VE
RSCHIEBLICH UND KANN DAHER AN JEDER STEL
LE IM *.N.,.. * SPEICHER LIEGEN. DIE ADR
ESSEN DER USR-FUNKTION SIND DANN ENTSPRE
CHEND*...-.. * ANZUPASSEN.
*.L.... *
*.../.. *****************************
****************************************
***.V.D.S.0:. "STARTADRESSE";B...N.. I.B
. B.335...X.. A.....S.S.A:. I,A...... I
.<.... S..36986 . . ". FEHLER IN DEN DAT
AZEILEN .":..A. .. 785,B.256..(B.256):.
786,B.256.U.... " ALLES OK. "...G.. TEST
BEISPIELE...H.. E.0 . 9...R.F...10.E....
.A$.(.(F),11,0)."".W.... A$;.(F),13,1;.(
F),14,2...... E.........+.. DATAZEILEN.<
.,..32,141,173,32,221,189,32,253,174,32,
158,183,134,88,32,253,174,32...-..158,18
3,134,87,104,104,162,255,160,0,232,189,0
,1,240,117,201,69,240.K....8,201,46,208,
242,138,168,208,238,173,2,1,201,46,208,1
2,202,160,1.../..200,185,1,1,153,0,1M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.M.
M.M.M.M.M.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL