UEBG91

FILE INFORMATION

FILENAME(S): UEBG91

FILE TYPE(S): SEQ

FILE SIZE: 619b

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

APPEARS ON: 6 disk(s)

FILE HASH

939d128969e03f3501374bb2c0bc3af225c03f075a183763de26494b9dfb5c64

FOUND ON DISKS (6 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C OMAL	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	21	16	DOWNLOAD FILE
FREEWARE DISK NR	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	21	16	DOWNLOAD FILE
COMAL 0 14	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	14	1	DOWNLOAD FILE
C OMAL 0 14	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	14	1	DOWNLOAD FILE
C OMAL	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	21	16	DOWNLOAD FILE
FREESOFT DISK NR	UEBG91	SEQ	Treasure Chest - Wolfgang Rauprich	21	16	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 30 30 31 30 20 50 52 49  4E 54 20 43 48 52 24 28  |0010 PRINT CHR$(|
00000010: 31 34 37 29 20 2F 2F 41  42 4C 4F 45 53 43 48 45  |147) //ABLOESCHE|
00000020: 4E 20 44 45 53 20 42 49  4C 44 53 43 48 49 52 4D  |N DES BILDSCHIRM|
00000030: 53 2F 2F 0D 0A 30 30 32  30 20 2F 2F 0D 0A 30 30  |S//..0020 //..00|
00000040: 33 30 20 46 4F 52 20 49  3A 3D 31 20 54 4F 20 31  |30 FOR I:=1 TO 1|
00000050: 30 20 44 4F 0D 0A 30 30  34 30 20 53 50 49 45 4C  |0 DO..0040 SPIEL|
00000060: 0D 0A 30 30 35 30 20 4E  45 58 54 20 49 0D 0A 30  |..0050 NEXT I..0|
00000070: 30 36 30 20 50 52 49 4E  54 20 0D 0A 30 30 37 30  |060 PRINT ..0070|
00000080: 20 50 52 49 4E 54 20 22  44 49 45 53 45 53 20 53  | PRINT "DIESES S|
00000090: 50 49 45 4C 20 42 52 49  4E 47 54 20 4D 49 52 20  |PIEL BRINGT MIR |
000000A0: 4B 45 49 4E 45 4E 20 53  50 41 53 53 20 4D 45 48  |KEINEN SPASS MEH|
000000B0: 52 21 22 0D 0A 30 30 38  30 20 2F 2F 0D 0A 30 30  |R!"..0080 //..00|
000000C0: 39 30 20 50 52 4F 43 20  53 50 49 45 4C 20 0D 0A  |90 PROC SPIEL ..|
000000D0: 30 31 30 30 20 44 45 4E  4B 5A 41 48 4C 3A 3D 52  |0100 DENKZAHL:=R|
000000E0: 4E 44 28 31 2C 33 29 0D  0A 30 31 31 30 20 54 49  |ND(1,3)..0110 TI|
000000F0: 50 50 45 4E 0D 0A 30 31  32 30 20 45 4E 44 50 52  |PPEN..0120 ENDPR|
00000100: 4F 43 20 53 50 49 45 4C  0D 0A 30 31 33 30 20 2F  |OC SPIEL..0130 /|
00000110: 2F 0D 0A 30 31 34 30 20  50 52 4F 43 20 54 49 50  |/..0140 PROC TIP|
00000120: 50 45 4E 20 0D 0A 30 31  35 30 20 50 52 49 4E 54  |PEN ..0150 PRINT|
00000130: 20 0D 0A 30 31 36 30 20  50 52 49 4E 54 20 22 41  | ..0160 PRINT "A|
00000140: 4E 20 57 45 4C 43 48 45  20 5A 41 48 4C 20 44 45  |N WELCHE ZAHL DE|
00000150: 4E 4B 45 20 49 43 48 20  28 31 2C 32 2C 33 29 22  |NKE ICH (1,2,3)"|
00000160: 2C 0D 0A 30 31 37 30 20  49 4E 50 55 54 20 54 49  |,..0170 INPUT TI|
00000170: 50 0D 0A 30 31 38 30 20  50 52 49 4E 54 20 0D 0A  |P..0180 PRINT ..|
00000180: 30 31 39 30 20 49 46 20  54 49 50 3D 44 45 4E 4B  |0190 IF TIP=DENK|
00000190: 5A 41 48 4C 20 54 48 45  4E 0D 0A 30 32 30 30 20  |ZAHL THEN..0200 |
000001A0: 50 52 49 4E 54 20 22 42  52 41 56 4F 2C 20 44 41  |PRINT "BRAVO, DA|
000001B0: 53 20 49 53 54 20 52 49  43 48 54 49 47 2C 22 0D  |S IST RICHTIG,".|
000001C0: 0A 30 32 31 30 20 50 52  49 4E 54 20 22 44 55 20  |.0210 PRINT "DU |
000001D0: 42 49 53 54 20 49 4E 20  4F 52 44 4E 55 4E 47 21  |BIST IN ORDNUNG!|
000001E0: 22 0D 0A 30 32 32 30 20  45 4C 53 45 20 0D 0A 30  |"..0220 ELSE ..0|
000001F0: 32 33 30 20 50 52 49 4E  54 20 22 4E 45 49 4E 2C  |230 PRINT "NEIN,|
00000200: 20 44 41 53 20 49 53 54  20 4E 49 43 48 54 20 52  | DAS IST NICHT R|
00000210: 49 43 48 54 49 47 2C 22  0D 0A 30 32 34 30 20 50  |ICHTIG,"..0240 P|
00000220: 52 49 4E 54 20 22 49 43  48 20 44 41 43 48 54 45  |RINT "ICH DACHTE|
00000230: 20 41 4E 20 22 2C 44 45  4E 4B 5A 41 48 4C 0D 0A  | AN ",DENKZAHL..|
00000240: 30 32 35 30 20 45 4E 44  49 46 20 0D 0A 30 32 36  |0250 ENDIF ..026|
00000250: 30 20 45 4E 44 50 52 4F  43 20 54 49 50 50 45 4E  |0 ENDPROC TIPPEN|
00000260: 0D 0A 30 32 37 30 20 2F  2F 0D 0A                 |..0270 //..     |

0010 PRINT CHR$(147) //ABLOESCHEN DES BI
LDSCHIRMS//..0020 //..0030 FOR I:=1 TO 1
0 DO..0040 SPIEL..0050 NEXT I..0060 PRIN
T ..0070 PRINT "DIESES SPIEL BRINGT MIR 
KEINEN SPASS MEHR!"..0080 //..0090 PROC 
SPIEL ..0100 DENKZAHL:=RND(1,3)..0110 TI
PPEN..0120 ENDPROC SPIEL..0130 //..0140 
PROC TIPPEN ..0150 PRINT ..0160 PRINT "A
N WELCHE ZAHL DENKE ICH (1,2,3)",..0170 
INPUT TIP..0180 PRINT ..0190 IF TIP=DENK
ZAHL THEN..0200 PRINT "BRAVO, DAS IST RI
CHTIG,"..0210 PRINT "DU BIST IN ORDNUNG!
"..0220 ELSE ..0230 PRINT "NEIN, DAS IST
 NICHT RICHTIG,"..0240 PRINT "ICH DACHTE
 AN ",DENKZAHL..0250 ENDIF ..0260 ENDPRO
C TIPPEN..0270 //..

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL