UHR

FILE INFORMATION

FILENAME(S): UHR

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-12-02 22:47:31

APPEARS ON: 1 disk(s)

FILE HASH

3e4b28f3ab35a58562e8679a633ab42fb0c32f04acf39ff835bc531981af1050

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
KASSETTEN TOOLS	UHR	PRG	swasti, charly	16	10	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1A 08 64 00 8F 20  2A 2A 2A 20 48 41 55 50  |....d.. *** HAUP|
00000010: 54 4D 45 4E 55 45 20 2A  2A 2A 00 20 08 6E 00 3A  |TMENUE ***. .n.:|
00000020: 00 29 08 78 00 99 22 93  22 00 58 08 82 00 8D 32  |.).x..".".X....2|
00000030: 30 30 30 3A 99 22 20 20  20 2A 2A 2A 20 48 41 55  |000:."   *** HAU|
00000040: 50 54 4D 45 4E 55 45 20  2A 2A 2A 20 20 20 20 20  |PTMENUE ***     |
00000050: 20 20 20 20 20 20 22 3B  00 8A 08 83 00 99 22 20  |      ";......" |
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000070: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000080: 20 20 20 20 20 20 20 92  22 3B 00 B1 08 8C 00 99  |       .";......|
00000090: 22 11 11 11 11 11 11 20  20 20 20 20 20 20 20 20  |"......         |
000000A0: 20 20 20 20 20 50 55 4E  4B 54 20 31 20 20 3C 31  |     PUNKT 1  <1|
000000B0: 3E 00 D3 08 96 00 99 22  11 20 20 20 20 20 20 20  |>......".       |
000000C0: 20 20 20 20 20 20 20 50  55 4E 4B 54 20 32 20 20  |       PUNKT 2  |
000000D0: 3C 32 3E 00 F5 08 A0 00  99 22 11 20 20 20 20 20  |<2>......".     |
000000E0: 20 20 20 20 20 20 20 20  20 50 55 4E 4B 54 20 33  |         PUNKT 3|
000000F0: 20 20 3C 33 3E 00 17 09  AA 00 99 22 11 20 20 20  |  <3>......".   |
00000100: 20 20 20 20 20 20 20 20  20 20 20 50 55 4E 4B 54  |           PUNKT|
00000110: 20 34 20 20 3C 34 3E 00  39 09 B4 00 99 22 11 20  | 4  <4>.9....". |
00000120: 20 20 20 20 20 20 20 20  20 20 20 20 20 55 48 52  |             UHR|
00000130: 5A 45 49 54 20 20 3C 55  3E 00 6C 09 B9 00 99 22  |ZEIT  <U>.l...."|
00000140: 11 11 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: 20 20 20 20 20 20 20 20  20 20 22 3B 00 98 09 BE  |          ";....|
00000170: 00 99 22 11 11 11 11 20  20 20 20 20 20 20 20 20  |.."....         |
00000180: 20 12 20 42 49 54 54 45  20 57 41 45 48 4C 45 4E  | . BITTE WAEHLEN|
00000190: 20 53 49 45 20 92 22 3B  00 CD 09 C8 00 A1 41 24  | SIE .";......A$|
000001A0: 3A 8B 41 24 B2 22 22 A7  31 33 30 3A 8F 20 2A 2A  |:.A$."".130:. **|
000001B0: 2A 20 52 55 45 43 4B 53  50 52 55 4E 47 20 49 53  |* RUECKSPRUNG IS|
000001C0: 54 20 57 49 43 48 54 49  47 20 2A 2A 2A 00 DF 09  |T WICHTIG ***...|
000001D0: D2 00 8B 41 24 B2 22 55  22 A7 8D 31 30 30 30 00  |...A$."U"..1000.|
000001E0: F8 09 DC 00 8F 20 49 46  41 24 3D 22 31 22 20 45  |..... IFA$="1" E|
000001F0: 54 43 2E 20 54 48 45 4E  00 2B 0A E6 00 89 31 33  |TC. THEN.+....13|
00000200: 30 3A 8F 20 2A 2A 2A 20  46 41 4C 53 43 48 45 20  |0:. *** FALSCHE |
00000210: 45 49 4E 47 41 42 45 20  3D 3E 20 4E 45 55 45 20  |EINGABE => NEUE |
00000220: 41 42 46 52 41 47 45 20  2A 2A 2A 00 31 0A E5 03  |ABFRAGE ***.1...|
00000230: 3A 00 4B 0A E6 03 8F 20  2A 2A 2A 20 55 48 52 20  |:.K.... *** UHR |
00000240: 53 54 45 4C 4C 45 4E 20  2A 2A 2A 00 51 0A E7 03  |STELLEN ***.Q...|
00000250: 3A 00 8A 0A E8 03 85 22  13 11 11 11 11 11 11 11  |:......"........|
00000260: 11 11 11 11 11 11 11 11  11 11 11 11 20 20 20 42  |............   B|
00000270: 49 54 54 45 20 55 48 52  5A 45 49 54 20 45 49 4E  |ITTE UHRZEIT EIN|
00000280: 47 45 42 45 4E 22 3B 54  49 24 00 90 0A F2 03 8E  |GEBEN";TI$......|
00000290: 00 96 0A CD 07 3A 00 AC  0A CE 07 8F 20 2A 2A 2A  |.....:...... ***|
000002A0: 20 55 48 52 5A 45 49 54  20 2A 2A 2A 00 B2 0A CF  | UHRZEIT ***....|
000002B0: 07 3A 00 DF 0A D0 07 5A  31 24 B2 C8 28 54 49 24  |.:.....Z1$..(TI$|
000002C0: 2C 32 29 3A 5A 32 24 B2  CA 28 54 49 24 2C 33 2C  |,2):Z2$..(TI$,3,|
000002D0: 32 29 3A 5A 33 24 B2 C9  28 54 49 24 2C 32 29 00  |2):Z3$..(TI$,2).|
000002E0: F9 0A DA 07 99 22 13 12  22 5A 31 24 22 3A 22 5A  |.....".."Z1$":"Z|
000002F0: 32 24 22 3A 22 5A 33 24  3B 00 FF 0A E4 07 8E 00  |2$":"Z3$;.......|
00000300: 05 0B B8 0B 3A 00 0B 0B  C2 0B 80 00 11 0B CC 0B  |....:...........|
00000310: 3A 00 60 0B CD 0B 44 49  45 20 55 48 52 5A 45 49  |:.`...DIE UHRZEI|
00000320: 54 20 4B 41 4E 4E 20 4A  45 44 45 52 5A 45 49 54  |T KANN JEDERZEIT|
00000330: 20 49 4E 20 45 49 4E 45  4D 20 20 20 20 55 4E 54  | IN EINEM    UNT|
00000340: 45 52 4D 45 4E 55 45 2C  20 4F 44 45 52 20 49 4E  |ERMENUE, ODER IN|
00000350: 20 45 49 4E 45 52 20 54  45 58 54 53 45 49 54 45  | EINER TEXTSEITE|
00000360: 00 AB 0B CE 0B 44 41 52  47 45 53 54 45 4C 4C 54  |.....DARGESTELLT|
00000370: 20 57 45 52 44 45 4E 2C  20 53 4F 4C 41 4E 47 45  | WERDEN, SOLANGE|
00000380: 20 45 49 4E 45 20 20 20  20 20 20 20 20 54 41 53  | EINE        TAS|
00000390: 54 45 4E 41 42 46 52 41  47 45 20 56 B0 47 45 4E  |TENABFRAGE V.GEN|
000003A0: 4F 4D 4D 45 4E 20 57 49  52 44 2E 00 F3 0B CF 0B  |OMMEN WIRD......|
000003B0: 57 41 45 48 52 80 20 45  49 4E 45 53 20 53 50 49  |WAEHR. EINES SPI|
000003C0: 45 4C 45 53 20 57 41 45  52 45 4E 20 44 49 45 20  |ELES WAEREN DIE |
000003D0: 20 20 20 20 20 20 4E 4F  45 54 49 47 45 4E 20 8D  |      NOETIGEN .|
000003E0: 32 30 30 30 20 45 49 4E  46 41 43 48 20 5A 55 56  |2000 EINFACH ZUV|
000003F0: 49 45 4C 00 3E 0C D0 0B  41 42 45 52 20 45 53 20  |IEL.>...ABER ES |
00000400: 57 41 45 52 45 20 45 49  4E 46 41 43 48 20 45 49  |WAERE EINFACH EI|
00000410: 4E 45 20 41 42 46 52 41  47 45 20 20 20 20 20 20  |NE ABFRAGE      |
00000420: 45 49 4E 5A 55 42 41 55  45 4E 2C 20 4F 42 20 4D  |EINZUBAUEN, OB M|
00000430: 41 4E 20 44 49 45 20 55  48 52 5A 45 49 54 00 4E  |AN DIE UHRZEIT.N|
00000440: 0C D1 0B 53 45 48 45 4E  20 57 49 4C 4C 2E 00 9C  |...SEHEN WILL...|
00000450: 0C D2 0B 44 49 45 20 55  48 52 5A 45 49 54 20 4D  |...DIE UHRZEIT M|
00000460: 55 53 53 20 4E 41 54 55  45 52 4C 49 43 48 20 49  |USS NATUERLICH I|
00000470: 4D 4D 45 52 20 20 20 20  20 20 20 41 4C 53 20 53  |MMER       ALS S|
00000480: 45 43 48 53 53 54 45 4C  4C 49 47 45 20 5A 41 48  |ECHSSTELLIGE ZAH|
00000490: 4C 20 45 49 4E 47 45 47  45 42 45 4E 00 DD 0C D3  |L EINGEGEBEN....|
000004A0: 0B 57 45 52 44 45 4E 20  42 45 49 4D 20 53 54 45  |.WERDEN BEIM STE|
000004B0: 4C C3 2C 20 4E 41 43 48  20 44 45 4D 20 4D 55 53  |L., NACH DEM MUS|
000004C0: 54 AB 20 20 20 20 20 54  45 52 20 53 54 44 53 54  |T.     TER STDST|
000004D0: 44 4D 49 4E 4D 49 4E 53  45 4B 53 45 4B 00 00 00  |DMINMINSEKSEK...|

....D.. *** HAUPTMENUE ***. .N.:.).X..".
".X....2000:."   *** HAUPTMENUE ***     
      ";......"                         
               .";......"......         
     PUNKT 1  <1>.S....".              P
UNKT 2  <2>... ..".              PUNKT 3
  <3>......".              PUNKT 4  <4>.
9....".              UHRZEIT  <U>.L...."
..                                      
  ";......"....          . BITTE WAEHLEN
 SIE .";.M.H..A$:.A$."".130:. *** RUECKS
PRUNG IST WICHTIG ***...R..A$."U"..1000.
..... IFA$="1" ETC. THEN.+....130:. *** 
FALSCHE EINGABE => NEUE ABFRAGE ***.1...
:.K.... *** UHR STELLEN ***.Q...:......"
....................   BITTE UHRZEIT EIN
GEBEN";TI$.........M.:...N.. *** UHRZEIT
 ***...O.:...P.Z1$.H(TI$,2):Z2$.J(TI$,3,
2):Z3$.I(TI$,2)...Z..".."Z1$":"Z2$":"Z3$
;...........:...B.....L.:.`.M.DIE UHRZEI
T KANN JEDERZEIT IN EINEM    UNTERMENUE,
 ODER IN EINER TEXTSEITE...N.DARGESTELLT
 WERDEN, SOLANGE EINE        TASTENABFRA
GE V.GENOMMEN WIRD....O.WAEHR. EINES SPI
ELES WAEREN DIE       NOETIGEN .2000 EIN
FACH ZUVIEL.>.P.ABER ES WAERE EINFACH EI
NE ABFRAGE      EINZUBAUEN, OB MAN DIE U
HRZEIT.N.Q.SEHEN WILL....R.DIE UHRZEIT M
USS NATUERLICH IMMER       ALS SECHSSTEL
LIGE ZAHL EINGEGEBEN...S.WERDEN BEIM STE
LC, NACH DEM MUST.     TER STDSTDMINMINS
EKSEK...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL