Not the GUI as such, but the finishing touches to the UI library I started writing for the SDX FDISK app for MyIDE:
[url="http://www.youtube.com/watch?v=R7J2oWnuZFs"]http://www.youtube.c...h?v=R7J2oWnuZFs[/url]
The code which sets up the dialogue box is shown below:
show_help ; dialogue box test
jsr open_dialogue
.byte 30,10
.byte 'Dialogue Box',0
.byte 3 ; 3 controls
.word check_box1
.word text_box1
.word list_box1
rts
;
check_box1 ; definition for check box 1
.byte DLG_CHECK_BOX ; control type
.byte 12,1 ; control coordinates
.byte 1,1 ; label coordinates
.word cb1_label
.word option_1
cb1_label
.byte 'Check Box:',0
option_1
.byte 128
text_box1 ; definition for text box 1
.byte DLG_TEXT_BOX
.byte 12,3
.byte 2,3
.word tb1_label
.word text_1
.byte 16,1 ; width and height
.byte 64 ; max input length
.byte 0 ; numeric mask fla
tb1_label
.byte 'Text Box:',0
text_1
.byte 'Example string',0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
;
list_box1 ; definition for list box 1
.byte DLG_DROP_LIST
.byte 12,5
.byte 2,5
.word dl1_label
.word list_1
.byte 6,3 ; width and height
.byte 5 ; # items
.byte 0 ; selected item
.word list_1 ; pointer to selected item
.byte 0 ; first displayed item
.word list_1 ; pointer to first displayed item
dl1_label
.byte 'List Box:',0
list_1
.byte 'Item 1'
.byte 'Item 2'
.byte 'Item 3'
.byte 'Item 4'
.byte 'Item 5'
;
Edited by flashjazzcat, Thu Dec 30, 2010 12:20 PM.