gdyby jednak jakis programista chcial sie wypowiedziec to mysle, ze chyba znalazlem kroszy sposob niz ten z posta nr 1.:
os_graphics equ $ef9c
GRAPHICS_0_WINDOWED
ldy #$0b
@ lda tab,y
sta $20,y
dey
bpl @-
lda #0
jmp os_graphics
tab .HE FF 00 03 01 69 BA DB E4 00 00 3C 3C ; 12+32+16
program testowy:
os_graphics equ $ef9c
os_plot equ $f1a4
org $c00
jsr GRAPHICS_0_WINDOWED
lda #'A'
jsr os_plot
@ jsr _print
.byte c'Okno tekstowe w trybie graficznym 0, ',$00
jmp @-
GRAPHICS_0_WINDOWED
ldy #$0b
@ lda tab,y
sta $20,y
dey
bpl @-
lda #0
jmp os_graphics
tab .HE FF 00 03 01 69 BA DB E4 00 00 3C 3C ; 12+32+16
_print tsx
lda $101,x
sta $80
lda $102,x
sta $81
_printnext inc $80
bne @+
inc $81
@ ldx #$00
lda ($80,x)
beq _printquit
jsr _putchar
jmp _printnext
_printquit tsx
lda $80
sta $101,x
lda $81
sta $102,x
rts
_putchar tay
lda $347
pha
lda $346
pha
tya
rts
run $c00
Post's attachmentsgr0windowed.obx 144 b, liczba pobrań: 1 (od 2018-01-11)
Tylko zalogowani mogą pobierać załączniki.