...I just noticed that for some reason PushGUIStack as defined as $41DF4
Im assuming it shouldn't be because 1) address should only be 4 hex characters long and 2) any line that uses PushGUIStack has an error.... about missing data in MS Byte of argument
[edit]
I messed around a little. the following code does this
Code: .nolist
#include "dcs6.inc"
.list
.org progstart
#IFDEF TI83P
.db $BB,$6D
#ENDIF
INIT:
xor d
#IFDEF TI83P
.db $C9
#ENDIF
jr Start
.dw $0000
.db $06,$00
.dw Icon
.dw $0000
.dw Apstart ;the routine to open files. DCS will start you here instead of at $9D95
;if a file is pending
.db $31,$7F ;argh, this be an APMain
.db $01 ;number of accepted filetypes
.db $00,$01,$00 ;filetype 1 [arbitary - but I need to standardize these]
Icon: ;a 16x16 icon
.db $3C,$09,$66,$3F,$C3,$7E,$C1,$10,$60,$00,$3C,$3E,$06,$63,$83,$41
.db $C3,$40,$66,$40,$3C,$C1,$01,$63,$76,$3E,$FF,$81,$FF,$8E,$63,$1F
IconAP: ;a 16x16 icon
.db $FF,$F8,$E6,$34,$C3,$72,$C1,$1F,$E0,$01,$BC,$3F,$86,$63,$83,$41
.db $C3,$41,$E6,$47,$BC,$C1,$81,$63,$F6,$3F,$FF,$81,$FF,$8F,$FF,$FE
START:
bcall(_ClrLcdf) ;main routines
call OpenGUIStack
ld a,$00 ;null window
call $41DF
call RenderGUI
call Pause
ret
Apstart:
ld hl,0
ld (pencol),hl
push ix
pop hl
bcall(_vputs)
call Pause
ret
txt:
.db "no text.",0
txt2:
.db "yay.",0
.end
END
however changing it to this:
Code: .nolist
#include "dcs6.inc"
.list
.org progstart
#IFDEF TI83P
.db $BB,$6D
#ENDIF
INIT:
xor d
#IFDEF TI83P
.db $C9
#ENDIF
jr Start
.dw $0000
.db $06,$00
.dw Icon
.dw $0000
.dw Apstart ;the routine to open files. DCS will start you here instead of at $9D95
;if a file is pending
.db $31,$7F ;argh, this be an APMain
.db $01 ;number of accepted filetypes
.db $00,$01,$00 ;filetype 1 [arbitary - but I need to standardize these]
Icon: ;a 16x16 icon
.db $3C,$09,$66,$3F,$C3,$7E,$C1,$10,$60,$00,$3C,$3E,$06,$63,$83,$41
.db $C3,$40,$66,$40,$3C,$C1,$01,$63,$76,$3E,$FF,$81,$FF,$8E,$63,$1F
IconAP: ;a 16x16 icon
.db $FF,$F8,$E6,$34,$C3,$72,$C1,$1F,$E0,$01,$BC,$3F,$86,$63,$83,$41
.db $C3,$41,$E6,$47,$BC,$C1,$81,$63,$F6,$3F,$FF,$81,$FF,$8F,$FF,$FE
START:
bcall(_ClrLcdf) ;main routines
call OpenGUIStack
ld a,$00 ;null window
call $41D4
call RenderGUI
call Pause
ret
Apstart:
ld hl,0
ld (pencol),hl
push ix
pop hl
bcall(_vputs)
call Pause
ret
txt:
.db "no text.",0
txt2:
.db "yay.",0
.end
END
does this: