UEBG46
FILE INFORMATION
FILENAME(S): UEBG46
FILE TYPE(S): SEQ
FILE SIZE: 347b
FIRST SEEN: 2025-11-30 01:08:01
APPEARS ON: 6 disk(s)
FILE HASH
aa23eb61a7fad4d0bf253156353542896e6f224974a02356b97d943f137ff1f7
FOUND ON DISKS (6 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C OMAL | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 20 | 10 | DOWNLOAD FILE |
| FREEWARE DISK NR | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 20 | 10 | DOWNLOAD FILE |
| COMAL 0 14 | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 15 | 0 | DOWNLOAD FILE |
| C OMAL 0 14 | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 15 | 0 | DOWNLOAD FILE |
| C OMAL | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 20 | 10 | DOWNLOAD FILE |
| FREESOFT DISK NR | UEBG46 | SEQ | Treasure Chest - Wolfgang Rauprich | 20 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 30 30 31 30 20 50 52 49 4E 54 20 22 47 49 42 20 |0010 PRINT "GIB | 00000010: 44 49 45 20 41 4E 5A 41 48 4C 20 44 45 52 20 45 |DIE ANZAHL DER E| 00000020: 49 4E 48 45 49 54 45 4E 20 45 49 4E 22 2C 0D 0A |INHEITEN EIN",..| 00000030: 30 30 32 30 20 49 4E 50 55 54 20 41 4E 5A 41 48 |0020 INPUT ANZAH| 00000040: 4C 0D 0A 30 30 33 30 20 50 52 49 4E 54 20 22 47 |L..0030 PRINT "G| 00000050: 49 42 20 44 45 4E 20 50 52 45 49 53 20 50 52 4F |IB DEN PREIS PRO| 00000060: 20 45 49 4E 48 45 49 54 20 45 49 4E 20 20 20 22 | EINHEIT EIN "| 00000070: 2C 0D 0A 30 30 34 30 20 49 4E 50 55 54 20 50 52 |,..0040 INPUT PR| 00000080: 45 49 53 0D 0A 30 30 35 30 20 49 46 20 41 4E 5A |EIS..0050 IF ANZ| 00000090: 41 48 4C 3C 32 30 20 54 48 45 4E 0D 0A 30 30 36 |AHL<20 THEN..006| 000000A0: 30 20 42 45 54 52 41 47 3A 3D 41 4E 5A 41 48 4C |0 BETRAG:=ANZAHL| 000000B0: 2A 50 52 45 49 53 2B 31 35 0D 0A 30 30 37 30 20 |*PREIS+15..0070 | 000000C0: 50 52 49 4E 54 20 22 56 45 52 4B 41 55 46 53 50 |PRINT "VERKAUFSP| 000000D0: 52 45 49 53 20 50 4C 55 53 20 47 45 42 55 45 48 |REIS PLUS GEBUEH| 000000E0: 52 3A 20 20 20 20 20 22 2C 42 45 54 52 41 47 0D |R: ",BETRAG.| 000000F0: 0A 30 30 38 30 20 45 4C 53 45 20 0D 0A 30 30 39 |.0080 ELSE ..009| 00000100: 30 20 42 45 54 52 41 47 3A 3D 41 4E 5A 41 48 4C |0 BETRAG:=ANZAHL| 00000110: 2A 50 52 45 49 53 0D 0A 30 31 30 30 20 50 52 49 |*PREIS..0100 PRI| 00000120: 4E 54 20 22 56 45 52 4B 41 55 46 53 50 52 45 49 |NT "VERKAUFSPREI| 00000130: 53 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S: | 00000140: 20 20 20 20 22 2C 42 45 54 52 41 47 0D 0A 30 31 | ",BETRAG..01| 00000150: 31 30 20 45 4E 44 49 46 20 0D 0A |10 ENDIF .. |
0010 PRINT "GIB DIE ANZAHL DER EINHEITEN
EIN",..0020 INPUT ANZAHL..0030 PRINT "G
IB DEN PREIS PRO EINHEIT EIN ",..0040
INPUT PREIS..0050 IF ANZAHL<20 THEN..006
0 BETRAG:=ANZAHL*PREIS+15..0070 PRINT "V
ERKAUFSPREIS PLUS GEBUEHR: ",BETRAG.
.0080 ELSE ..0090 BETRAG:=ANZAHL*PREIS..
0100 PRINT "VERKAUFSPREIS:
",BETRAG..0110 ENDIF ..
> CLICK IMAGE PREVIEW FOR FULL MODAL