home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1994 March
/
64er_Magazin_94-03_1994_Markt__Technik_de_Side_A.d64
/
dialogbox.src
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
2KB
|
121 lines
100 step"dialogbox,p,w"
110 +$0402
120 tab(setpattern=$c139
130 tab(irectangle=$c19f
140 tab(mouseup=$c18a
150 tab(domenu=$c151
160 tab(redomenu=$c193
170 tab(dodlgbox=$c256
180 tab(enddlgbox=$c2bf
181 tab(desktop=$c22c
190 toreg0=2
200 toreg1=4
210 toreg2=6
220 toreg3=8
230 toreg4=10
240 toreg5=12
250 toreg6=14
260 toreg7=16
270 toreg8=18
280 toreg9=20
290 toreg10=22
300 (NULL)mouseup
310 mid$#$02
320 (NULL)setpattern
330 (NULL)irectangle
340 fn0
350 fn199
360 spc(0
370 spc(319
380 mid$#<(menue)
390 (NULL)reg0
400 mid$#>(menue)
410 (NULL)reg0+1
420 (NULL)domenu
430 (NULL)
440 menue fn0
450 fn14
460 spc(80
470 spc(240
480 fn0+3+0
490 spc(name1
500 fn0
510 spc(task1
520 spc(name2
530 fn0
540 spc(task2
541 spc(name3
542 fn0
543 spc(task3
550 task1 (NULL)redomenu
560 task11 mid$#<(box1)
570 (NULL)reg0
580 mid$#>(box1)
590 (NULL)reg0+1
600 mid$#<(filename)
610 (NULL)reg5
620 mid$#>(filename)
630 (NULL)reg5+1
640 mid$#$06
650 (NULL)reg7
660 mid$#<(classname)
670 (NULL)reg10
680 mid$#>(classname)
690 (NULL)reg10+1
700 (NULL)dodlgbox
710 (NULL)
720 task2 (NULL)redomenu
730 mid$#<(box2)
740 (NULL)reg0
750 mid$#>(box2)
760 (NULL)reg0+1
770 mid$#<(filename)
780 (NULL)reg5
790 mid$#>(filename)
800 (NULL)reg5+1
810 (NULL)dodlgbox
820 mid$reg0
830 str$#$04
840 (NULL)task11
850 (NULL)
851 task3 (NULL)desktop
860 box1 fn128+2
870 fn1
880 fn17
890 fn72
900 fn11
910 fn135
920 fn16
930 spc(name1
940 fn16
950 fn1
960 fn4
970 fn0
980 filename fn0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;platzhalter
990 classname fn0
1000 name1 not"auswahl"
1010 name2 not"file-check"
1011 name3 not"desktop"
1020 untername1 not"dateiname:"
1030 box2 fn0+2
1040 fn50
1050 fn100
1060 spc(80
1070 spc(230
1080 fn11
1090 fn50
1100 fn14
1110 spc(untername1
1120 fn12
1130 fn50
1140 fn28
1150 fn12
1160 fn3
1170 fn1
1180 fn32
1190 fn4
1200 fn12
1210 fn32
1220 fn0
1230 <