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

DIALOGBOX.SRC

FILE INFORMATION

FILENAME(S): DIALOGBOX.SRC

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-11-30 01:13:15

APPEARS ON: 1 disk(s)

FILE HASH

c57e83d887f08236114d744fb32cab7fa707c30538716246aaf9b58af37c3e4e

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10403 SEITE A DIALOGBOX.SRC PRG C64er 27 11 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 16 08 64 00 A9 22  44 49 41 4C 4F 47 42 4F  |....d.."DIALOGBO|
00000010: 58 2C 50 2C 57 22 00 21  08 6E 00 AA 24 30 34 30  |X,P,W".!.n..$040|
00000020: 32 00 37 08 78 00 A3 53  45 54 50 41 54 54 45 52  |2.7.x..SETPATTER|
00000030: 4E 3D 24 43 31 33 39 00  4D 08 82 00 A3 49 52 45  |N=$C139.M....IRE|
00000040: 43 54 41 4E 47 4C 45 3D  24 43 31 39 46 00 60 08  |CTANGLE=$C19F.`.|
00000050: 8C 00 A3 4D 4F 55 53 45  55 50 3D 24 43 31 38 41  |...MOUSEUP=$C18A|
00000060: 00 72 08 96 00 A3 44 4F  4D 45 4E 55 3D 24 43 31  |.r....DOMENU=$C1|
00000070: 35 31 00 86 08 A0 00 A3  52 45 44 4F 4D 45 4E 55  |51......REDOMENU|
00000080: 3D 24 43 31 39 33 00 9A  08 AA 00 A3 44 4F 44 4C  |=$C193......DODL|
00000090: 47 42 4F 58 3D 24 43 32  35 36 00 AF 08 B4 00 A3  |GBOX=$C256......|
000000A0: 45 4E 44 44 4C 47 42 4F  58 3D 24 43 32 42 46 00  |ENDDLGBOX=$C2BF.|
000000B0: C2 08 B5 00 A3 44 45 53  4B 54 4F 50 3D 24 43 32  |.....DESKTOP=$C2|
000000C0: 32 43 00 CE 08 BE 00 A4  52 45 47 30 3D 32 00 DA  |2C......REG0=2..|
000000D0: 08 C8 00 A4 52 45 47 31  3D 34 00 E6 08 D2 00 A4  |....REG1=4......|
000000E0: 52 45 47 32 3D 36 00 F2  08 DC 00 A4 52 45 47 33  |REG2=6......REG3|
000000F0: 3D 38 00 FF 08 E6 00 A4  52 45 47 34 3D 31 30 00  |=8......REG4=10.|
00000100: 0C 09 F0 00 A4 52 45 47  35 3D 31 32 00 19 09 FA  |.....REG5=12....|
00000110: 00 A4 52 45 47 36 3D 31  34 00 26 09 04 01 A4 52  |..REG6=14.&....R|
00000120: 45 47 37 3D 31 36 00 33  09 0E 01 A4 52 45 47 38  |EG7=16.3....REG8|
00000130: 3D 31 38 00 40 09 18 01  A4 52 45 47 39 3D 32 30  |=18.@....REG9=20|
00000140: 00 4E 09 22 01 A4 52 45  47 31 30 3D 32 32 00 5C  |.N."..REG10=22.\|
00000150: 09 2C 01 20 D6 4D 4F 55  53 45 55 50 00 67 09 36  |.,. .MOUSEUP.g.6|
00000160: 01 20 CA 23 24 30 32 00  78 09 40 01 20 D6 53 45  |. .#$02.x.@. .SE|
00000170: 54 50 41 54 54 45 52 4E  00 89 09 4A 01 20 D6 49  |TPATTERN...J. .I|
00000180: 52 45 43 54 41 4E 47 4C  45 00 90 09 54 01 A5 30  |RECTANGLE...T..0|
00000190: 00 99 09 5E 01 A5 31 39  39 00 A0 09 68 01 A6 30  |...^..199...h..0|
000001A0: 00 A9 09 72 01 A6 33 31  39 00 B9 09 7C 01 20 CA  |...r..319...|. .|
000001B0: 23 3C 28 4D 45 4E 55 45  29 00 C4 09 86 01 20 D2  |#<(MENUE)..... .|
000001C0: 52 45 47 30 00 D4 09 90  01 20 CA 23 3E 28 4D 45  |REG0..... .#>(ME|
000001D0: 4E 55 45 29 00 E1 09 9A  01 20 D2 52 45 47 30 2B  |NUE)..... .REG0+|
000001E0: 31 00 EE 09 A4 01 20 D6  44 4F 4D 45 4E 55 00 F5  |1..... .DOMENU..|
000001F0: 09 AE 01 20 E3 00 02 0A  B8 01 4D 45 4E 55 45 20  |... ......MENUE |
00000200: A5 30 00 0A 0A C2 01 A5  31 34 00 12 0A CC 01 A6  |.0......14......|
00000210: 38 30 00 1B 0A D6 01 A6  32 34 30 00 26 0A E0 01  |80......240.&...|
00000220: A5 30 2B 33 2B 30 00 31  0A EA 01 A6 4E 41 4D 45  |.0+3+0.1....NAME|
00000230: 31 00 38 0A F4 01 A5 30  00 43 0A FE 01 A6 54 41  |1.8....0.C....TA|
00000240: 53 4B 31 00 4E 0A 08 02  A6 4E 41 4D 45 32 00 55  |SK1.N....NAME2.U|
00000250: 0A 12 02 A5 30 00 60 0A  1C 02 A6 54 41 53 4B 32  |....0.`....TASK2|
00000260: 00 6B 0A 1D 02 A6 4E 41  4D 45 33 00 72 0A 1E 02  |.k....NAME3.r...|
00000270: A5 30 00 7D 0A 1F 02 A6  54 41 53 4B 33 00 91 0A  |.0.}....TASK3...|
00000280: 26 02 54 41 53 4B 31 20  D6 52 45 44 4F 4D 45 4E  |&.TASK1 .REDOMEN|
00000290: 55 00 A6 0A 30 02 54 41  53 4B 31 31 20 CA 23 3C  |U...0.TASK11 .#<|
000002A0: 28 42 4F 58 31 29 00 B1  0A 3A 02 20 D2 52 45 47  |(BOX1)...:. .REG|
000002B0: 30 00 C0 0A 44 02 20 CA  23 3E 28 42 4F 58 31 29  |0...D. .#>(BOX1)|
000002C0: 00 CD 0A 4E 02 20 D2 52  45 47 30 2B 31 00 E0 0A  |...N. .REG0+1...|
000002D0: 58 02 20 CA 23 3C 28 46  49 4C 45 4E 41 4D 45 29  |X. .#<(FILENAME)|
000002E0: 00 EB 0A 62 02 20 D2 52  45 47 35 00 FE 0A 6C 02  |...b. .REG5...l.|
000002F0: 20 CA 23 3E 28 46 49 4C  45 4E 41 4D 45 29 00 0B  | .#>(FILENAME)..|
00000300: 0B 76 02 20 D2 52 45 47  35 2B 31 00 16 0B 80 02  |.v. .REG5+1.....|
00000310: 20 CA 23 24 30 36 00 21  0B 8A 02 20 D2 52 45 47  | .#$06.!... .REG|
00000320: 37 00 35 0B 94 02 20 CA  23 3C 28 43 4C 41 53 53  |7.5... .#<(CLASS|
00000330: 4E 41 4D 45 29 00 41 0B  9E 02 20 D2 52 45 47 31  |NAME).A... .REG1|
00000340: 30 00 55 0B A8 02 20 CA  23 3E 28 43 4C 41 53 53  |0.U... .#>(CLASS|
00000350: 4E 41 4D 45 29 00 63 0B  B2 02 20 D2 52 45 47 31  |NAME).c... .REG1|
00000360: 30 2B 31 00 72 0B BC 02  20 D6 44 4F 44 4C 47 42  |0+1.r... .DODLGB|
00000370: 4F 58 00 79 0B C6 02 20  E3 00 8D 0B D0 02 54 41  |OX.y... ......TA|
00000380: 53 4B 32 20 D6 52 45 44  4F 4D 45 4E 55 00 9C 0B  |SK2 .REDOMENU...|
00000390: DA 02 20 CA 23 3C 28 42  4F 58 32 29 00 A7 0B E4  |.. .#<(BOX2)....|
000003A0: 02 20 D2 52 45 47 30 00  B6 0B EE 02 20 CA 23 3E  |. .REG0..... .#>|
000003B0: 28 42 4F 58 32 29 00 C3  0B F8 02 20 D2 52 45 47  |(BOX2)..... .REG|
000003C0: 30 2B 31 00 D6 0B 02 03  20 CA 23 3C 28 46 49 4C  |0+1..... .#<(FIL|
000003D0: 45 4E 41 4D 45 29 00 E1  0B 0C 03 20 D2 52 45 47  |ENAME)..... .REG|
000003E0: 35 00 F4 0B 16 03 20 CA  23 3E 28 46 49 4C 45 4E  |5..... .#>(FILEN|
000003F0: 41 4D 45 29 00 01 0C 20  03 20 D2 52 45 47 35 2B  |AME)... . .REG5+|
00000400: 31 00 10 0C 2A 03 20 D6  44 4F 44 4C 47 42 4F 58  |1...*. .DODLGBOX|
00000410: 00 1B 0C 34 03 20 CA 52  45 47 30 00 26 0C 3E 03  |...4. .REG0.&.>.|
00000420: 20 C4 23 24 30 34 00 33  0C 48 03 20 F7 54 41 53  | .#$04.3.H. .TAS|
00000430: 4B 31 31 00 3A 0C 52 03  20 E3 00 4D 0C 53 03 54  |K11.:.R. ..M.S.T|
00000440: 41 53 4B 33 20 D5 44 45  53 4B 54 4F 50 00 5D 0C  |ASK3 .DESKTOP.].|
00000450: 5C 03 42 4F 58 31 20 A5  31 32 38 2B 32 00 64 0C  |\.BOX1 .128+2.d.|
00000460: 66 03 A5 31 00 6C 0C 70  03 A5 31 37 00 74 0C 7A  |f..1.l.p..17.t.z|
00000470: 03 A5 37 32 00 7C 0C 84  03 A5 31 31 00 85 0C 8E  |..72.|....11....|
00000480: 03 A5 31 33 35 00 8D 0C  98 03 A5 31 36 00 98 0C  |..135......16...|
00000490: A2 03 A6 4E 41 4D 45 31  00 A0 0C AC 03 A5 31 36  |...NAME1......16|
000004A0: 00 A7 0C B6 03 A5 31 00  AE 0C C0 03 A5 34 00 B5  |......1......4..|
000004B0: 0C CA 03 A5 30 00 F1 0C  D4 03 46 49 4C 45 4E 41  |....0.....FILENA|
000004C0: 4D 45 20 A5 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |ME .0,0,0,0,0,0,|
000004D0: 30 2C 30 2C 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |0,0,0,0,0,0,0,0,|
000004E0: 30 2C 30 2C 30 3B 50 4C  41 54 5A 48 41 4C 54 45  |0,0,0;PLATZHALTE|
000004F0: 52 00 02 0D DE 03 43 4C  41 53 53 4E 41 4D 45 20  |R.....CLASSNAME |
00000500: A5 30 00 17 0D E8 03 4E  41 4D 45 31 20 A8 22 41  |.0.....NAME1 ."A|
00000510: 55 53 57 41 48 4C 22 00  2F 0D F2 03 4E 41 4D 45  |USWAHL"./...NAME|
00000520: 32 20 A8 22 46 49 4C 45  2D 43 48 45 43 4B 22 00  |2 ."FILE-CHECK".|
00000530: 44 0D F3 03 4E 41 4D 45  33 20 A8 22 44 45 53 4B  |D...NAME3 ."DESK|
00000540: 54 4F 50 22 00 61 0D FC  03 55 4E 54 45 52 4E 41  |TOP".a...UNTERNA|
00000550: 4D 45 31 20 A8 22 44 41  54 45 49 4E 41 4D 45 3A  |ME1 ."DATEINAME:|
00000560: 22 00 6F 0D 06 04 42 4F  58 32 20 A5 30 2B 32 00  |".o...BOX2 .0+2.|
00000570: 77 0D 10 04 A5 35 30 00  80 0D 1A 04 A5 31 30 30  |w....50......100|
00000580: 00 88 0D 24 04 A6 38 30  00 91 0D 2E 04 A6 32 33  |...$..80......23|
00000590: 30 00 99 0D 38 04 A5 31  31 00 A1 0D 42 04 A5 35  |0...8..11...B..5|
000005A0: 30 00 A9 0D 4C 04 A5 31  34 00 B9 0D 56 04 A6 55  |0...L..14...V..U|
000005B0: 4E 54 45 52 4E 41 4D 45  31 00 C1 0D 60 04 A5 31  |NTERNAME1...`..1|
000005C0: 32 00 C9 0D 6A 04 A5 35  30 00 D1 0D 74 04 A5 32  |2...j..50...t..2|
000005D0: 38 00 D9 0D 7E 04 A5 31  32 00 E0 0D 88 04 A5 33  |8...~..12......3|
000005E0: 00 E7 0D 92 04 A5 31 00  EF 0D 9C 04 A5 33 32 00  |......1......32.|
000005F0: F6 0D A6 04 A5 34 00 FE  0D B0 04 A5 31 32 00 06  |.....4......12..|
00000600: 0E BA 04 A5 33 32 00 0D  0E C4 04 A5 30 00 13 0E  |....32......0...|
00000610: CE 04 B3 00 00 00                                 |......          |
....D.."DIALOGBOX,P,W".!.N..$0402.7.X..S
ETPATTERN=$C139.M....IRECTANGLE=$C19F.`.
...MOUSEUP=$C18A.R....DOMENU=$C151... ..
REDOMENU=$C193......DODLGBOX=$C256......
ENDDLGBOX=$C2BF.B....DESKTOP=$C22C.N....
REG0=2.Z.H..REG1=4...R..REG2=6......REG3
=8......REG4=10......REG5=12......REG6=1
4.&....REG7=16.3....REG8=18.@....REG9=20
.N."..REG10=22.\.,. VMOUSEUP.G.6. J#$02.
X.@. VSETPATTERN...J. VIRECTANGLE...T..0
...^..199. .H..0...R..319...|. J#<(MENUE
).D... RREG0.T... J#>(MENUE)..... RREG0+
1..... VDOMENU..... ......MENUE .0...B..
14...L..80...V..240.&....0+3+0.1....NAME
1.8....0.C....TASK1.N....NAME2.U....0.`.
...TASK2.K....NAME3.R....0.}....TASK3...
&.TASK1 VREDOMENU...0.TASK11 J#<(BOX1)..
.:. RREG0...D. J#>(BOX1).M.N. RREG0+1...
X. J#<(FILENAME)...B. RREG5...L. J#>(FIL
ENAME)...V. RREG5+1..... J#$06.!... RREG
7.5... J#<(CLASSNAME).A... RREG10.U... J
#>(CLASSNAME).C... RREG10+1.R... VDODLGB
OX.Y.F. ....P.TASK2 VREDOMENU...Z. J#<(B
OX2)..... RREG0..... J#>(BOX2).C... RREG
0+1.V... J#<(FILENAME)..... RREG5..... J
#>(FILENAME)... . RREG5+1...*. VDODLGBOX
...4. JREG0.&.>. D#$04.3.H. .TASK11.:.R.
 ..M.S.TASK3 UDESKTOP.].\.BOX1 .128+2.D.
F..1.L.P..17.T.Z..72.|....11......135...
...16......NAME1. ....16......1......4..
.J..0...T.FILENAME .0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0;PLATZHALTER.....CLASSNAME 
.0.....NAME1 ."AUSWAHL"./...NAME2 ."FILE
-CHECK".D...NAME3 ."DESKTOP".A...UNTERNA
ME1 ."DATEINAME:".O...BOX2 .0+2.W....50.
.....100...$..80......230...8..11...B..5
0...L..14...V..UNTERNAME1.A.`..12.I.J..5
0.Q.T..28.Y.~..12......3......1......32.
.....4......12......32...D..0...N.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL