Mercurial > hg > Members > kono > nitros9-code

comparison level1/modules/vtio.asm @ 2966:e84a638d1c16

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cohr: Support both COVDG control codes and COHR Esc codes $0B is the only control character that is used by both protocols. I decided to keep the the COVDG command as this protocol is more common. So far I've been able to find only 3 OS9 applications that are using the CoHR drivers, all by Dragon Data: Stylograph, Dynacalc and RMS. Only RMS seems to use the $0B (Home) control code, but it is easy to patch the RMS.trm file to replace $0B with the $01 CoVDG Home command. So this seems like a reasonable sacrifice.
author Ken H. <dragon.atv@gmail.com>
date Mon, 10 Feb 2014 10:10:40 +0200
parents 999159b0e7c0
children adcbab1e0f36 8f5a6fe2d09e
comparison
equal deleted inserted replaced
2965:9edca3e61b66 2966:e84a638d1c16
601 * B = error code 601 * B = error code
602 * 602 *
603 Write ldb <V.NGChr,u are we in the process of getting parameters? 603 Write ldb <V.NGChr,u are we in the process of getting parameters?
604 bne PrmHandl yes, go process 604 bne PrmHandl yes, go process
605 sta <V.WrChr,u save character to write 605 sta <V.WrChr,u save character to write
606 ldb V.51EscSeq,u * in Escape sequence?
607 bne GoCo * yes, send to COHR
606 cmpa #C$SPAC space or higher? 608 cmpa #C$SPAC space or higher?
607 bcc GoCo yes, normal write 609 bcc GoCo yes, normal write
610 cmpa #$1B * COHR Escape Code?
611 beq GoCo
608 cmpa #$1E escape sequence $1E or $1F? 612 cmpa #$1E escape sequence $1E or $1F?
609 bcc Escape yes, go process 613 bcc Escape yes, go process
610 cmpa #$0F GFX codes? 614 cmpa #$0F GFX codes?
611 lbcc GfxDispatch branch if so 615 lbcc GfxDispatch branch if so
612 cmpa #C$BELL bell? 616 cmpa #C$BELL bell?