Kernel 0.9.2

This commit is contained in:
Rémy GIBERT 2018-09-03 17:24:54 +02:00
parent d3f7005c41
commit 77f5b08ba9
3 changed files with 17 additions and 4 deletions

Binary file not shown.

Binary file not shown.

View File

@ -469,7 +469,7 @@ COUT.IACMode inc IACBuf
ldy IACBuf+1 get back VERB
cpy #SB
bne .7 not a SB/SE....end of SEQ
bne .2 not a SB/SE....
cmp #SE
bne .8 wait for ending SE....keep bIACMode
@ -489,11 +489,24 @@ COUT.IACMode inc IACBuf
iny
cpy #SB.IS.TTYPE.LEN
bne .1
bra .7
.7
.2 cpy #DO
bne .6
cmp #TELOPT.TTYPE
bne .7
lda #IAC
jsr Char.Out.Put
lda #WILL
jsr Char.Out.Put
lda #TELOPT.TTYPE
jsr Char.Out.Put
bra .7
stz bIACMode
.6
.7 stz bIACMode
.8 clc
rts