📄 jget.s
字号:
f = r5.globl j,n.globl input.globl classtab.globl jgetjget: inc jgetc3: mov j(f),r1 mov r1,r0 bic $inpt-1,r0 bic r0,r1 cmp r0,inpr beq 1f inc readc mov r0,inpr mov input,r0 sys seekinpr: 1;0 sys read;inpb;inpt2: cmp r0,$inpt bge 1f clrb inpb(r0) inc r0 br 2b1: movb inpb(r1),r0 asl r0 bit n(f),classtab(r0) beq 1f inc j(f) inc r1 cmp r1,$inpt blt 1b br 3b1: asr r0 rts pcinpt = 128..bssinpb: . = .+inpt.datajgetc: 0readc: 0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -