_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

UEBG73

FILE INFORMATION

FILENAME(S): UEBG73

FILE TYPE(S): SEQ

FILE SIZE: 379b

FIRST SEEN: 2025-11-30 01:08:01

APPEARS ON: 6 disk(s)

FILE HASH

9a531312b1767739531ba3d92ba4919bf4dc059c6739a8fa32d2e141c1808c6f

FOUND ON DISKS (6 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C OMAL UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 20 18 DOWNLOAD FILE
FREEWARE DISK NR UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 20 18 DOWNLOAD FILE
COMAL 0 14 UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 15 9 DOWNLOAD FILE
C OMAL 0 14 UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 15 9 DOWNLOAD FILE
C OMAL UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 20 18 DOWNLOAD FILE
FREESOFT DISK NR UEBG73 SEQ Treasure Chest - Wolfgang Rauprich 20 18 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 30 30 31 30 20 46 4F 52  20 4E 52 3A 3D 31 20 54  |0010 FOR NR:=1 T|
00000010: 4F 20 35 20 44 4F 0D 0A  30 30 32 30 20 50 52 49  |O 5 DO..0020 PRI|
00000020: 4E 54 20 0D 0A 30 30 33  30 20 50 52 49 4E 54 20  |NT ..0030 PRINT |
00000030: 22 44 49 56 49 44 45 4E  44 20 28 47 41 4E 5A 5A  |"DIVIDEND (GANZZ|
00000040: 41 48 4C 49 47 2C 20 42  49 54 54 45 29 22 2C 0D  |AHLIG, BITTE)",.|
00000050: 0A 30 30 34 30 20 49 4E  50 55 54 20 44 49 56 49  |.0040 INPUT DIVI|
00000060: 44 45 4E 44 0D 0A 30 30  35 30 20 50 52 49 4E 54  |DEND..0050 PRINT|
00000070: 20 22 44 49 56 49 53 4F  52 20 28 50 4F 53 49 54  | "DIVISOR (POSIT|
00000080: 49 56 20 55 4E 44 20 47  41 4E 5A 5A 41 48 4C 49  |IV UND GANZZAHLI|
00000090: 47 2C 22 0D 0A 30 30 35  31 20 50 52 49 4E 54 20  |G,"..0051 PRINT |
000000A0: 22 42 49 54 54 45 29 22  2C 0D 0A 30 30 36 30 20  |"BITTE)",..0060 |
000000B0: 49 4E 50 55 54 20 44 49  56 49 53 4F 52 0D 0A 30  |INPUT DIVISOR..0|
000000C0: 30 37 30 20 50 52 49 4E  54 20 44 49 56 49 44 45  |070 PRINT DIVIDE|
000000D0: 4E 44 2C 22 20 4D 4F 44  20 22 2C 44 49 56 49 53  |ND," MOD ",DIVIS|
000000E0: 4F 52 2C 22 20 3D 20 22  2C 0D 0A 30 30 38 30 20  |OR," = ",..0080 |
000000F0: 50 52 49 4E 54 20 44 49  56 49 44 45 4E 44 20 4D  |PRINT DIVIDEND M|
00000100: 4F 44 20 44 49 56 49 53  4F 52 0D 0A 30 30 39 30  |OD DIVISOR..0090|
00000110: 20 4E 45 58 54 20 4E 52  0D 0A 30 31 30 30 20 50  | NEXT NR..0100 P|
00000120: 52 49 4E 54 20 0D 0A 30  31 31 30 20 50 52 49 4E  |RINT ..0110 PRIN|
00000130: 54 20 22 45 4E 44 45 22  0D 0A 30 31 32 30 20 50  |T "ENDE"..0120 P|
00000140: 52 49 4E 54 20 22 53 4F  4C 4C 20 45 53 20 57 45  |RINT "SOLL ES WE|
00000150: 49 54 45 52 47 45 48 45  4E 2C 22 0D 0A 30 31 33  |ITERGEHEN,"..013|
00000160: 30 20 50 52 49 4E 54 20  22 44 41 4E 4E 20 54 41  |0 PRINT "DANN TA|
00000170: 53 54 45 3A 20 52 55 4E  22 0D 0A                 |STE: RUN"..     |

0010 FOR NR:=1 TO 5 DO..0020 PRINT ..003
0 PRINT "DIVIDEND (GANZZAHLIG, BITTE)",.
.0040 INPUT DIVIDEND..0050 PRINT "DIVISO
R (POSITIV UND GANZZAHLIG,"..0051 PRINT 
"BITTE)",..0060 INPUT DIVISOR..0070 PRIN
T DIVIDEND," MOD ",DIVISOR," = ",..0080 
PRINT DIVIDEND MOD DIVISOR..0090 NEXT NR
..0100 PRINT ..0110 PRINT "ENDE"..0120 P
RINT "SOLL ES WEITERGEHEN,"..0130 PRINT 
"DANN TASTE: RUN"..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL