29.PRINT USING
FILE INFORMATION
FILENAME(S): 29.PRINT USING
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-11-30 01:08:27
APPEARS ON: 2 disk(s)
FILE HASH
9ea94fb903af3d07322ae823f6dc397b011684b52cc4507ae8b31baba9ba5a4f
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREEWARE DISK NR | 29.PRINT USING | PRG | Treasure Chest - Wolfgang Rauprich | 1 | 0 | DOWNLOAD FILE |
| U TILITIES | 29.PRINT USING | PRG | Treasure Chest - Wolfgang Rauprich | 1 | 0 | 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 74 08 0B 00 8F 20 2A 20 20 20 46 20 4F 20 52 |.t.... * F O R| 00000060: 20 4D 20 41 20 54 20 52 20 4F 20 55 20 54 20 49 | M A T R O U T I| 00000070: 20 4E 20 45 00 C3 08 0C 00 8F 20 2A 2A 2A 2A 2A | N E...... *****| 00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000A0: 2A 2A 2A 2A 2A 2A 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 00 12 09 11 00 8F 20 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 2A 2A |****************| 000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000110: 2A 2A 00 61 09 12 00 8F 20 2A 20 20 20 20 20 20 |**.a.... * | 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 20 20 20 20 | | 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 2A 00 B0 09 13 00 8F 20 2A 20 41 55 46 52 55 46 |*...... * AUFRUF| 00000170: 3A 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 20 20 20 20 20 | | 00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *| 000001B0: 00 FF 09 14 00 8F 20 2A 20 20 55 53 52 28 58 29 |...... * USR(X)| 000001C0: 2C 46 4C 2C 4E 4B 20 20 20 20 20 20 20 20 20 20 |,FL,NK | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000200: 4E 0A 15 00 8F 20 2A 20 20 20 20 58 20 20 3D 20 |N.... * X = | 00000210: 5A 55 20 46 4F 52 4D 41 54 49 45 52 45 4E 44 45 |ZU FORMATIERENDE| 00000220: 52 20 4E 55 4D 45 52 49 53 43 48 45 52 20 57 45 |R NUMERISCHER WE| 00000230: 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |RT | 00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 9D | *..| 00000250: 0A 16 00 8F 20 2A 20 20 20 20 46 4C 20 3D 20 46 |.... * FL = F| 00000260: 45 4C 44 4C 41 45 4E 47 45 20 44 45 52 20 46 4F |ELDLAENGE DER FO| 00000270: 52 4D 41 54 49 45 52 54 45 4E 20 5A 41 48 4C 20 |RMATIERTEN ZAHL | 00000280: 20 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 2A 00 EC 0A | *...| 000002A0: 17 00 8F 20 2A 20 20 20 20 4E 4B 20 3D 20 41 4E |... * NK = AN| 000002B0: 5A 41 48 4C 20 4E 41 43 48 4B 4F 4D 4D 41 53 54 |ZAHL NACHKOMMAST| 000002C0: 45 4C 4C 45 4E 20 44 45 52 20 46 4F 52 4D 41 54 |ELLEN DER FORMAT| 000002D0: 49 45 52 54 45 4E 20 5A 41 48 4C 20 20 20 20 20 |IERTEN ZAHL | 000002E0: 20 20 20 20 20 20 20 20 20 20 20 2A 00 3B 0B 18 | *.;..| 000002F0: 00 8F 20 2A 20 20 44 41 53 20 45 52 47 45 42 4E |.. * DAS ERGEBN| 00000300: 49 53 20 44 45 52 20 55 53 52 2D 46 55 4E 4B 54 |IS DER USR-FUNKT| 00000310: 49 4F 4E 20 49 53 54 20 44 45 52 20 46 4F 52 4D |ION IST DER FORM| 00000320: 41 54 49 45 52 54 45 20 53 54 52 49 4E 47 2E 20 |ATIERTE STRING. | 00000330: 44 49 45 53 45 52 20 20 20 20 2A 00 8A 0B 19 00 |DIESER *.....| 00000340: 8F 20 2A 20 20 4B 41 4E 4E 20 45 49 4E 45 52 20 |. * KANN EINER | 00000350: 53 54 52 49 4E 47 56 41 52 49 41 42 4C 45 4E 20 |STRINGVARIABLEN | 00000360: 5A 55 47 45 57 49 45 53 45 4E 20 4F 44 45 52 20 |ZUGEWIESEN ODER | 00000370: 41 55 53 47 45 44 52 55 43 4B 54 20 57 45 52 44 |AUSGEDRUCKT WERD| 00000380: 45 4E 2E 20 20 20 20 20 20 2A 00 D9 0B 1A 00 8F |EN. *......| 00000390: 20 2A 20 42 45 49 53 50 49 45 4C 45 3A 20 20 20 | * BEISPIELE: | 000003A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003D0: 20 20 20 20 20 20 20 20 2A 00 28 0C 1B 00 8F 20 | *.(.... | 000003E0: 2A 20 20 41 24 3D 28 55 53 52 28 58 59 29 2C 31 |* A$=(USR(XY),1| 000003F0: 30 2C 32 29 2B 22 22 20 20 20 20 20 20 20 20 20 |0,2)+"" | 00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000420: 20 20 20 20 20 20 20 2A 00 77 0C 1C 00 8F 20 2A | *.w.... *| 00000430: 20 20 50 52 49 4E 54 20 55 53 52 28 58 59 29 2C | PRINT USR(XY),| 00000440: 31 30 2C 32 3B 22 20 44 4D 22 20 20 20 20 20 20 |10,2;" DM" | 00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000470: 20 20 20 20 20 20 2A 00 C6 0C 1D 00 8F 20 2A 20 | *...... * | 00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004C0: 20 20 20 20 20 2A 00 15 0D 1E 00 8F 20 2A 20 42 | *...... * B| 000004D0: 45 53 4F 4E 44 45 52 48 45 49 54 45 4E 3A 20 20 |ESONDERHEITEN: | 000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000510: 20 20 20 20 2A 00 64 0D 1F 00 8F 20 2A 20 20 57 | *.d.... * W| 00000520: 45 4E 4E 20 4E 41 43 48 4B 4F 4D 4D 41 53 54 45 |ENN NACHKOMMASTE| 00000530: 4C 4C 45 4E 20 44 55 52 43 48 20 44 41 53 20 46 |LLEN DURCH DAS F| 00000540: 4F 52 4D 41 54 49 45 52 45 4E 20 41 42 47 45 53 |ORMATIEREN ABGES| 00000550: 43 48 4E 49 54 54 45 4E 20 57 45 52 44 45 4E 2C |CHNITTEN WERDEN,| 00000560: 20 20 20 2A 00 B3 0D 20 00 8F 20 2A 20 20 53 4F | *... .. * SO| 00000570: 20 57 49 52 44 20 44 49 45 20 5A 41 48 4C 20 47 | WIRD DIE ZAHL G| 00000580: 45 52 55 4E 44 45 54 2E 20 20 20 20 20 20 20 20 |ERUNDET. | 00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005B0: 20 20 2A 00 02 0E 21 00 8F 20 2A 20 20 5A 41 48 | *...!.. * ZAH| 000005C0: 4C 45 4E 44 41 52 53 54 45 4C 4C 55 4E 47 45 4E |LENDARSTELLUNGEN| 000005D0: 20 49 4D 20 45 2D 46 4F 52 4D 41 54 20 57 45 52 | IM E-FORMAT WER| 000005E0: 44 45 4E 20 45 42 45 4E 46 41 4C 4C 53 20 56 45 |DEN EBENFALLS VE| 000005F0: 52 41 52 42 45 49 54 45 54 2E 20 20 20 20 20 20 |RARBEITET. | 00000600: 20 2A 00 51 0E 22 00 8F 20 2A 20 20 57 45 4E 4E | *.Q.".. * WENN| 00000610: 20 44 49 45 20 5A 41 48 4C 20 49 4E 20 44 45 52 | DIE ZAHL IN DER| 00000620: 20 41 4E 47 45 47 45 42 45 4E 45 4E 20 46 45 4C | ANGEGEBENEN FEL| 00000630: 44 4C 41 45 4E 47 45 20 4E 49 43 48 54 20 44 41 |DLAENGE NICHT DA| 00000640: 52 47 45 53 54 45 4C 4C 54 20 20 20 20 20 20 20 |RGESTELLT | 00000650: 2A 00 A0 0E 23 00 8F 20 2A 20 20 57 45 52 44 45 |*...#.. * WERDE| 00000660: 4E 20 4B 41 4E 4E 2C 20 44 41 4E 4E 20 57 49 52 |N KANN, DANN WIR| 00000670: 44 20 44 49 45 20 5A 41 48 4C 20 49 4E 20 44 45 |D DIE ZAHL IN DE| 00000680: 52 20 4E 4F 54 57 45 4E 44 49 47 45 4E 20 46 45 |R NOTWENDIGEN FE| 00000690: 4C 44 4C 41 45 4E 47 45 20 44 41 52 2D 20 20 2A |LDLAENGE DAR- *| 000006A0: 00 EF 0E 24 00 8F 20 2A 20 20 47 45 53 54 45 4C |...$.. * GESTEL| 000006B0: 4C 54 2C 20 55 4D 20 45 49 4E 45 4E 20 5A 49 46 |LT, UM EINEN ZIF| 000006C0: 46 45 52 56 45 52 4C 55 53 54 20 5A 55 20 56 45 |FERVERLUST ZU VE| 000006D0: 52 4D 45 49 44 45 4E 2E 20 20 20 20 20 20 20 20 |RMEIDEN. | 000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 000006F0: 3E 0F 25 00 8F 20 2A 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 20 20 20 20 20 20 20 | | 00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 8D | *..| 00000740: 0F 26 00 8F 20 2A 20 56 4F 52 20 41 55 46 52 55 |.&.. * VOR AUFRU| 00000750: 46 20 44 45 52 20 46 55 4E 4B 54 49 4F 4E 20 4D |F DER FUNKTION M| 00000760: 55 45 53 53 45 4E 20 46 4F 4C 47 45 4E 44 45 20 |UESSEN FOLGENDE | 00000770: 42 45 46 45 48 4C 45 20 45 49 4E 4D 41 4C 49 47 |BEFEHLE EINMALIG| 00000780: 20 44 55 52 43 48 47 45 2D 20 20 20 2A 00 DC 0F | DURCHGE- *...| 00000790: 27 00 8F 20 2A 20 46 55 45 48 52 54 20 57 45 52 |'.. * FUEHRT WER| 000007A0: 44 45 4E 3A 20 20 20 20 20 20 20 20 20 20 20 20 |DEN: | 000007B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007D0: 20 20 20 20 20 20 20 20 20 20 20 2A 00 2B 10 28 | *.+.(| 000007E0: 00 8F 20 2A 20 20 20 50 4F 4B 45 20 37 38 35 2C |.. * POKE 785,| 000007F0: 30 20 20 20 3A 20 4C 4F 57 2D 42 59 54 45 20 44 |0 : LOW-BYTE D| 00000800: 45 52 20 53 54 41 52 54 41 44 52 45 53 53 45 20 |ER STARTADRESSE | 00000810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000820: 20 20 20 20 20 20 20 20 20 20 2A 00 7A 10 29 00 | *.z.).| 00000830: 8F 20 2A 20 20 20 50 4F 4B 45 20 37 38 36 2C 31 |. * POKE 786,1| 00000840: 39 32 20 3A 20 48 49 47 48 2D 42 59 54 45 20 44 |92 : HIGH-BYTE D| 00000850: 45 52 20 53 54 41 52 54 41 44 52 45 53 53 45 20 |ER STARTADRESSE | 00000860: 3D 20 34 39 31 35 32 20 20 20 20 20 20 20 20 20 |= 49152 | 00000870: 20 20 20 20 20 20 20 20 20 2A 00 C9 10 2A 00 8F | *...*..| 00000880: 20 2A 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 20 20 20 20 20 20 20 20 20 20 20 20 | | 000008B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000008C0: 20 20 20 20 20 20 20 20 2A 00 18 11 2B 00 8F 20 | *...+.. | 000008D0: 2A 20 44 49 45 20 52 4F 55 54 49 4E 45 20 49 53 |* DIE ROUTINE IS| 000008E0: 54 20 56 4F 4C 4C 20 56 45 52 53 43 48 49 45 42 |T VOLL VERSCHIEB| 000008F0: 4C 49 43 48 20 55 4E 44 20 4B 41 4E 4E 20 44 41 |LICH UND KANN DA| 00000900: 48 45 52 20 41 4E 20 4A 45 44 45 52 20 53 54 45 |HER AN JEDER STE| 00000910: 4C 4C 45 20 49 4D 20 2A 00 67 11 2C 00 8F 20 2A |LLE IM *.g.,.. *| 00000920: 20 53 50 45 49 43 48 45 52 20 4C 49 45 47 45 4E | SPEICHER LIEGEN| 00000930: 2E 20 44 49 45 20 41 44 52 45 53 53 45 4E 20 44 |. DIE ADRESSEN D| 00000940: 45 52 20 55 53 52 2D 46 55 4E 4B 54 49 4F 4E 20 |ER USR-FUNKTION | 00000950: 53 49 4E 44 20 44 41 4E 4E 20 45 4E 54 53 50 52 |SIND DANN ENTSPR| 00000960: 45 43 48 45 4E 44 2A 00 B6 11 2D 00 8F 20 2A 20 |ECHEND*...-.. * | 00000970: 41 4E 5A 55 50 41 53 53 45 4E 2E 20 20 20 20 20 |ANZUPASSEN. | 00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009B0: 20 20 20 20 20 2A 00 05 12 2E 00 8F 20 2A 20 20 | *...... * | 000009C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A00: 20 20 20 20 2A 00 54 12 2F 00 8F 20 2A 2A 2A 2A | *.T./.. ****| 00000A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A50: 2A 2A 2A 2A 00 6F 12 64 00 53 B2 30 3A 85 20 22 |****.o.d.S.0:. "| 00000A60: 53 54 41 52 54 41 44 52 45 53 53 45 22 3B 42 00 |STARTADRESSE";B.| 00000A70: 81 12 6E 00 81 20 49 B2 42 20 A4 20 42 AA 33 33 |..n.. I.B . B.33| 00000A80: 35 00 89 12 78 00 87 20 41 00 99 12 82 00 53 B2 |5...x.. A.....S.| 00000A90: 53 AA 41 3A 97 20 49 2C 41 00 A1 12 8C 00 82 20 |S.A:. I,A...... | 00000AA0: 49 00 D5 12 96 00 8B 20 53 B3 B1 33 36 39 38 36 |I...... S..36986| 00000AB0: 20 A7 20 99 20 22 12 20 46 45 48 4C 45 52 20 49 | . . ". FEHLER I| 00000AC0: 4E 20 44 45 4E 20 44 41 54 41 5A 45 49 4C 45 4E |N DEN DATAZEILEN| 00000AD0: 20 92 22 3A 90 00 FA 12 A0 00 97 20 37 38 35 2C | .":....... 785,| 00000AE0: 42 AB 32 35 36 AC B5 28 42 AD 32 35 36 29 3A 97 |B.256..(B.256):.| 00000AF0: 20 37 38 36 2C 42 AD 32 35 36 00 0E 13 AA 00 99 | 786,B.256......| 00000B00: 20 22 20 41 4C 4C 45 53 20 4F 4B 2E 20 22 00 22 | " ALLES OK. "."| 00000B10: 13 C7 00 8F 20 54 45 53 54 42 45 49 53 50 49 45 |.... TESTBEISPIE| 00000B20: 4C 45 00 30 13 C8 00 81 20 45 B2 30 20 A4 20 39 |LE.0.... E.0 . 9| 00000B30: 00 3D 13 D2 00 46 B2 FF AC 31 30 AE 45 00 53 13 |.=...F...10.E.S.| 00000B40: DC 00 41 24 B2 28 B7 28 46 29 2C 31 31 2C 30 29 |..A$.(.(F),11,0)| 00000B50: AA 22 22 00 70 13 E6 00 99 20 41 24 3B B7 28 46 |."".p.... A$;.(F| 00000B60: 29 2C 31 33 2C 31 3B B7 28 46 29 2C 31 34 2C 32 |),13,1;.(F),14,2| 00000B70: 00 78 13 F0 00 82 20 45 00 7E 13 FA 00 80 00 8F |.x.... E.~......| 00000B80: 13 2B 01 8F 20 44 41 54 41 5A 45 49 4C 45 4E 00 |.+.. DATAZEILEN.| 00000B90: D5 13 2C 01 83 33 32 2C 31 34 31 2C 31 37 33 2C |..,..32,141,173,| 00000BA0: 33 32 2C 32 32 31 2C 31 38 39 2C 33 32 2C 32 35 |32,221,189,32,25| 00000BB0: 33 2C 31 37 34 2C 33 32 2C 31 35 38 2C 31 38 33 |3,174,32,158,183| 00000BC0: 2C 31 33 34 2C 38 38 2C 33 32 2C 32 35 33 2C 31 |,134,88,32,253,1| 00000BD0: 37 34 2C 33 32 00 1E 14 2D 01 83 31 35 38 2C 31 |74,32...-..158,1| 00000BE0: 38 33 2C 31 33 34 2C 38 37 2C 31 30 34 2C 31 30 |83,134,87,104,10| 00000BF0: 34 2C 31 36 32 2C 32 35 35 2C 31 36 30 2C 30 2C |4,162,255,160,0,| 00000C00: 32 33 32 2C 31 38 39 2C 30 2C 31 2C 32 34 30 2C |232,189,0,1,240,| 00000C10: 31 31 37 2C 32 30 31 2C 36 39 2C 32 34 30 00 64 |117,201,69,240.d| 00000C20: 14 2E 01 83 38 2C 32 30 31 2C 34 36 2C 32 30 38 |....8,201,46,208| 00000C30: 2C 32 34 32 2C 31 33 38 2C 31 36 38 2C 32 30 38 |,242,138,168,208| 00000C40: 2C 32 33 38 2C 31 37 33 2C 32 2C 31 2C 32 30 31 |,238,173,2,1,201| 00000C50: 2C 34 36 2C 32 30 38 2C 31 32 2C 32 30 32 2C 31 |,46,208,12,202,1| 00000C60: 36 30 2C 31 00 AC 14 2F 01 83 32 30 30 2C 31 38 |60,1.../..200,18| 00000C70: 35 2C 31 2C 31 2C 31 35 33 2C 30 2C 31 2C 32 30 |5,1,1,153,0,1,20| 00000C80: 38 2C 32 34 37 2C 31 38 39 2C 32 2C 31 2C 34 31 |8,247,189,2,1,41| 00000C90: 2C 31 35 2C 31 30 2C 31 33 33 2C 32 2C 31 30 2C |,15,10,133,2,10,| 00000CA0: 31 30 2C 31 30 31 2C 32 2C 31 32 35 00 F3 14 30 |10,101,2,125...0| 00000CB0: 01 83 33 2C 31 2C 32 33 33 2C 34 37 2C 31 38 38 |..3,1,233,47,188| 00000CC0: 2C 31 2C 31 2C 31 39 32 2C 34 35 2C 32 34 30 2C |,1,1,192,45,240,| 00000CD0: 32 33 2C 31 30 35 2C 33 2C 31 33 34 2C 32 2C 32 |23,105,3,134,2,2| 00000CE0: 32 39 2C 32 2C 31 36 38 2C 31 36 39 2C 34 38 2C |29,2,168,169,48,| 00000CF0: 31 35 37 00 3A 15 31 01 83 30 2C 31 2C 32 33 32 |157.:.1..0,1,232| 00000D00: 2C 31 33 36 2C 32 30 38 2C 32 34 39 2C 31 36 39 |,136,208,249,169| 00000D10: 2C 30 2C 31 35 37 2C 30 2C 31 2C 32 34 30 2C 31 |,0,157,0,1,240,1| 00000D20: 36 38 2C 31 33 33 2C 32 2C 31 36 39 2C 30 2C 31 |68,133,2,169,0,1| 00000D30: 35 37 2C 30 2C 31 2C 31 33 38 00 80 15 32 01 83 |57,0,1,138...2..| 00000D40: 32 34 2C 31 30 31 2C 32 2C 31 36 38 2C 31 38 39 |24,101,2,168,189| 00000D50: 2C 30 2C 31 2C 32 34 30 2C 38 2C 32 30 31 2C 34 |,0,1,240,8,201,4| 00000D60: 38 2C 31 37 36 2C 34 2C 31 36 39 2C 34 38 2C 32 |8,176,4,169,48,2| 00000D70: 30 38 2C 31 2C 32 30 32 2C 31 35 33 2C 30 2C 31 |08,1,202,153,0,1| 00000D80: 00 C8 15 33 01 83 31 33 36 2C 32 30 38 2C 32 33 |...3..136,208,23| 00000D90: 36 2C 31 36 39 2C 34 36 2C 31 34 31 2C 31 2C 31 |6,169,46,141,1,1| 00000DA0: 2C 32 30 38 2C 31 32 39 2C 31 35 32 2C 32 34 30 |,208,129,152,240| 00000DB0: 2C 31 38 2C 31 36 35 2C 38 37 2C 32 30 38 2C 37 |,18,165,87,208,7| 00000DC0: 2C 31 35 32 2C 31 37 30 00 0E 16 34 01 83 31 38 |,152,170...4..18| 00000DD0: 39 2C 31 2C 31 2C 32 30 38 2C 31 31 39 2C 31 36 |9,1,1,208,119,16| 00000DE0: 39 2C 34 34 2C 31 35 33 2C 30 2C 31 2C 32 30 38 |9,44,153,0,1,208| 00000DF0: 2C 31 32 2C 31 39 36 2C 38 37 2C 32 34 30 2C 34 |,12,196,87,240,4| 00000E00: 30 2C 31 36 39 2C 34 34 2C 31 35 37 2C 30 00 55 |0,169,44,157,0.U| 00000E10: 16 35 01 83 31 2C 32 33 32 2C 32 30 38 2C 31 36 |.5..1,232,208,16| 00000E20: 2C 31 33 32 2C 32 2C 35 36 2C 31 33 38 2C 32 32 |,132,2,56,138,22| 00000E30: 39 2C 32 2C 35 36 2C 32 33 33 2C 31 2C 31 39 37 |9,2,56,233,1,197| 00000E40: 2C 38 37 2C 32 34 30 2C 31 39 2C 31 37 36 2C 37 |,87,240,19,176,7| 00000E50: 32 2C 31 36 38 00 9D 16 36 01 83 31 36 39 2C 34 |2,168...6..169,4| 00000E60: 38 2C 31 35 37 2C 30 2C 31 2C 32 33 32 2C 32 30 |8,157,0,1,232,20| 00000E70: 30 2C 31 39 36 2C 38 37 2C 32 30 38 2C 32 34 37 |0,196,87,208,247| 00000E80: 2C 31 36 39 2C 30 2C 31 35 37 2C 30 2C 31 2C 31 |,169,0,157,0,1,1| 00000E90: 37 33 2C 31 2C 31 2C 32 30 31 2C 34 38 00 E6 16 |73,1,1,201,48...| 00000EA0: 37 01 83 31 37 36 2C 31 37 2C 32 33 32 2C 31 33 |7..176,17,232,13| 00000EB0: 38 2C 31 36 38 2C 31 38 35 2C 32 35 35 2C 30 2C |8,168,185,255,0,| 00000EC0: 31 35 33 2C 30 2C 31 2C 31 33 36 2C 32 30 38 2C |153,0,1,136,208,| 00000ED0: 32 34 37 2C 31 36 39 2C 34 38 2C 31 34 31 2C 31 |247,169,48,141,1| 00000EE0: 2C 31 2C 32 32 38 00 2E 17 38 01 83 38 38 2C 31 |,1,228...8..88,1| 00000EF0: 37 36 2C 32 30 2C 31 36 34 2C 38 38 2C 31 38 39 |76,20,164,88,189| 00000F00: 2C 30 2C 31 2C 31 35 33 2C 30 2C 31 2C 31 33 36 |,0,1,153,0,1,136| 00000F10: 2C 32 30 32 2C 31 36 2C 32 34 36 2C 31 36 39 2C |,202,16,246,169,| 00000F20: 33 32 2C 31 35 33 2C 30 2C 31 2C 31 33 36 00 76 |32,153,0,1,136.v| 00000F30: 17 39 01 83 31 36 2C 32 35 30 2C 31 36 39 2C 30 |.9..16,250,169,0| 00000F40: 2C 31 36 30 2C 31 2C 37 36 2C 31 33 35 2C 31 38 |,160,1,76,135,18| 00000F50: 30 2C 35 36 2C 32 32 39 2C 38 37 2C 31 33 33 2C |0,56,229,87,133,| 00000F60: 32 2C 31 33 38 2C 35 36 2C 32 32 39 2C 32 2C 31 |2,138,56,229,2,1| 00000F70: 37 30 2C 31 38 39 00 BF 17 3A 01 83 30 2C 31 2C |70,189...:..0,1,| 00000F80: 32 30 31 2C 35 33 2C 31 34 34 2C 31 37 39 2C 31 |201,53,144,179,1| 00000F90: 33 38 2C 31 36 38 2C 31 33 36 2C 32 34 30 2C 32 |38,168,136,240,2| 00000FA0: 34 2C 31 38 35 2C 30 2C 31 2C 32 30 31 2C 34 38 |4,185,0,1,201,48| 00000FB0: 2C 31 34 34 2C 32 34 36 2C 32 34 2C 31 30 35 00 |,144,246,24,105.| 00000FC0: 08 18 3B 01 83 31 2C 32 30 31 2C 35 38 2C 31 35 |..;..1,201,58,15| 00000FD0: 33 2C 30 2C 31 2C 32 30 38 2C 31 35 37 2C 31 36 |3,0,1,208,157,16| 00000FE0: 39 2C 34 38 2C 31 35 33 2C 30 2C 31 2C 32 30 38 |9,48,153,0,1,208| 00000FF0: 2C 32 32 39 2C 31 33 38 2C 31 36 38 2C 31 38 35 |,229,138,168,185| 00001000: 2C 30 2C 31 2C 31 35 33 00 38 18 3C 01 83 31 2C |,0,1,153.8.<..1,| 00001010: 31 2C 31 33 36 2C 32 30 38 2C 32 34 37 2C 31 36 |1,136,208,247,16| 00001020: 39 2C 34 39 2C 31 34 31 2C 31 2C 31 2C 32 33 32 |9,49,141,1,1,232| 00001030: 2C 32 30 38 2C 31 33 31 00 00 00 58 |,208,131...X |
..P.... ********************************
****************************************
.T.... * F O R M A T R O U T I N E.C..
.. *************************************
***********************************.....
. **************************************
**********************************.A....
*
*......
* AUFRUF:
*...... *
USR(X),FL,NK
*.N.... *
X = ZU FORMATIERENDER NUMERISCHER WE
RT *...... *
FL = FELDLAENGE DER FORMATIERTEN ZAHL
*...... *
NK = ANZAHL NACHKOMMASTELLEN DER FORMAT
IERTEN ZAHL *.;.... * DA
S ERGEBNIS DER USR-FUNKTION IST DER FORM
ATIERTE STRING. DIESER *...... * KAN
N EINER STRINGVARIABLEN ZUGEWIESEN ODER
AUSGEDRUCKT WERDEN. *.Y.... * BEISP
IELE:
*.(.... * A$=(U
SR(XY),10,2)+""
*.W.... * PRINT
USR(XY),10,2;" DM"
*.F.... *
*...... * BESONDERH
EITEN:
*.D.... * WENN NACH
KOMMASTELLEN DURCH DAS FORMATIEREN ABGES
CHNITTEN WERDEN, *... .. * SO WIRD DI
E ZAHL GERUNDET.
*...!.. * ZAHLENDARST
ELLUNGEN IM E-FORMAT WERDEN EBENFALLS VE
RARBEITET. *.Q.".. * WENN DIE ZAH
L IN DER ANGEGEBENEN FELDLAENGE NICHT DA
RGESTELLT *. .#.. * WERDEN KANN,
DANN WIRD DIE ZAHL IN DER NOTWENDIGEN FE
LDLAENGE DAR- *...$.. * GESTELLT, UM E
INEN ZIFFERVERLUST ZU VERMEIDEN.
*.>.%.. *
*...&.. * VOR AUFRUF DER FU
NKTION MUESSEN FOLGENDE BEFEHLE EINMALIG
DURCHGE- *...'.. * FUEHRT WERDEN:
*.+.(.. * POKE 785,0 : LO
W-BYTE DER STARTADRESSE
*.Z.).. * POKE 786,192 : HIG
H-BYTE DER STARTADRESSE = 49152
*.I.*.. *
*...+.. * DIE ROUTINE IST VOLL V
ERSCHIEBLICH UND KANN DAHER AN JEDER STE
LLE IM *.G.,.. * SPEICHER LIEGEN. DIE AD
RESSEN DER USR-FUNKTION SIND DANN ENTSPR
ECHEND*...-.. * ANZUPASSEN.
*...... *
*.T./.. ****************************
****************************************
****.O.D.S.0:. "STARTADRESSE";B...N.. I.
B . B.335...X.. A.....S.S.A:. I,A......
I.U.... S..36986 . . ". FEHLER IN DEN DA
TAZEILEN .":.... .. 785,B.256..(B.256):.
786,B.256...... " ALLES OK. ".".G.. TES
TBEISPIELE.0.H.. E.0 . 9.=.R.F...10.E.S.
..A$.(.(F),11,0)."".P.... A$;.(F),13,1;.
(F),14,2.X.... E.~.......+.. DATAZEILEN.
U.,..32,141,173,32,221,189,32,253,174,32
,158,183,134,88,32,253,174,32...-..158,1
83,134,87,104,104,162,255,160,0,232,189,
0,1,240,117,201,69,240.D....8,201,46,208
,242,138,168,208,238,173,2,1,201,46,208,
12,202,160,1.../..200,185,1,1,153,0,1,20
8,247,189,2,1,41,15,10,133,2,10,10,101,2
,125...0..3,1,233,47,188,1,1,192,45,240,
23,105,3,134,2,229,2,168,169,48,157.:.1.
.0,1,232,136,208,249,169,0,157,0,1,240,1
68,133,2,169,0,157,0,1,138...2..24,101,2
,168,189,0,1,240,8,201,48,176,4,169,48,2
08,1,202,153,0,1.H.3..136,208,236,169,46
,141,1,1,208,129,152,240,18,165,87,208,7
,152,170...4..189,1,1,208,119,169,44,153
,0,1,208,12,196,87,240,40,169,44,157,0.U
.5..1,232,208,16,132,2,56,138,229,2,56,2
33,1,197,87,240,19,176,72,168...6..169,4
8,157,0,1,232,200,196,87,208,247,169,0,1
57,0,1,173,1,1,201,48...7..176,17,232,13
8,168,185,255,0,153,0,1,136,208,247,169,
48,141,1,1,228...8..88,176,20,164,88,189
,0,1,153,0,1,136,202,16,246,169,32,153,0
,1,136.V.9..16,250,169,0,160,1,76,135,18
0,56,229,87,133,2,138,56,229,2,170,189..
.:..0,1,201,53,144,179,138,168,136,240,2
4,185,0,1,201,48,144,246,24,105...;..1,2
01,58,153,0,1,208,157,169,48,153,0,1,208
,229,138,168,185,0,1,153.8.<..1,1,136,20
8,247,169,49,141,1,1,232,208,131...X
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL