📄 in.asm
字号:
SACL DATT20
SUB #250
BCND INARN,LT
SPLK #250,DATT20
RET
DATT21ADD:
LDP #7
LACL CT
BCND INAR,NEQ
LACL DATT21
ADD #1
SACL DATT21
SUB #100
BCND INARN,LEQ
SPLK #100,DATT21
RET
DATT22ADD:
LDP #7
LACL DATT22
ADD ADD_SUB
SACL DATT22
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT22
RET
DATT23ADD:
LDP #7
LACL DATT23
ADD ADD_SUB
SACL DATT23
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT23
RET
DATT24ADD:
LDP #7
LACL DATT24
ADD ADD_SUB
SACL DATT24
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT24
RET
DATT25ADD:
LDP #7
LACL DATT25
ADD ADD_SUB
SACL DATT25
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT25
RET
DATT26ADD:
LDP #7
LACL DATT26
ADD ADD_SUB
SACL DATT26
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT26
RET
DATT27ADD:
LDP #7
LACL DATT27
ADD ADD_SUB
SACL DATT27
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT27
RET
DATT28ADD:
LDP #7
LACL DATT28
ADD ADD_SUB
SACL DATT28
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT28
RET
DATT29ADD:
LDP #7
LACL DATT29
ADD ADD_SUB
SACL DATT29
SUB DAT23
BCND INARN,LEQ
LACL DAT23
SACL DATT29
RET
DATT30ADD:
LDP #7
BIT CT,15-15
BCND INAR,TC
LACL DATT30
ADD #1
SACL DATT30
SUB #120
BCND INARN,LEQ
SPLK #120,DATT30
RET
DATT31ADD:
LDP #7
LACL DATT31
ADD #10
SACL DATT31
SUB #1000
BCND INARN,LEQ
SPLK #1000,DATT31
RET
DATT32ADD:
LDP #7
LACL DATT32
ADD #10
SACL DATT32
SUB #1000
BCND INARN,LEQ
LACL #1000
SACL DATT32
RET
DATT33ADD:
LDP #7
LACL DATT33
ADD DATT31
SACL DATT33
SUB #30000
BCND INARN,LEQ
LACL #30000
SACL DATT33
RET
DATT34ADD:
LDP #7
LACL DATT34
ADD DATT32
SACL DATT34
SUB #60000
BCND INARN,LEQ
LACL #60000
SACL DATT34
RET
DATT35ADD:
LDP #7
LACL DATT35
ADD #10
SACL DATT35
SUB #2000
BCND INARN,LEQ
SPLK #2000,DATT35
RET
DATT36ADD:
LDP #7
LACL DATT36
ADD #1
SACL DATT36
SUB #200
BCND INARN,LEQ
SPLK #200,DATT36
RET
DATT37ADD:
LDP #7
LACL DATT37
ADD #1
SACL DATT37
SUB #200
BCND INARN,LEQ
SPLK #200,DATT37
RET
DATT38ADD:
LDP #7
LACL DATT38
ADD #2
SACL DATT38
SUB #174
BCND INARN,LEQ
SPLK #174,DATT38
RET
DATT39ADD:
LDP #7
LACL DATT39
ADD #1
SACL DATT39
SUB #200
BCND INARN,LEQ
SPLK #200,DATT39
RET
DATT40ADD:
LDP #7
LACL DATT40
ADD #100
SACL DATT40
SUB #20000
BCND INARN,LEQ
SPLK #20000,DATT40
RET
DATT41ADD:
LDP #7
LACL DATT41
ADD #10
SACL DATT41
SUB #5000
BCND INARN,LEQ
SPLK #5000,DATT41
RET
DATT42ADD:
LDP #7
LACL DATT42
ADD #10
SACL DATT42
SUB #5000
BCND INARN,LEQ
SPLK #5000,DATT42
RET
DATT43ADD:
LDP #7
LACL DATT43
ADD #10
SACL DATT43
SUB #5000
BCND INARN,LEQ
SPLK #5000,DATT43
RET
DATT44ADD:
LDP #7
LACL DATT44
ADD #10
SACL DATT44
SUB #5000
BCND INARN,LEQ
SPLK #5000,DATT44
RET
DATT45ADD:
LDP #7
LACL DATT45
ADD #1
SACL DATT45
SUB #1000
BCND INARN,LEQ
SPLK #1000,DATT45
RET
DATT46ADD:
LDP #7
LACL DATT46
ADD #1
SACL DATT46
SUB #100
BCND INARN,LEQ
SPLK #100,DATT46
RET
DATT47ADD:
LDP #7
LACL CT
BCND INAR,NEQ
LACL DATT47
ADD #1
SACL DATT47
SUB #100
BCND INARN,LEQ
SPLK #100,DATT47
RET
DATTSUB:
LDP #6
LACL INK
BCND SUBEND,LT
SUB #50
BCND SUBEND,GEQ
LACC #DATTSUBX
ADD INK
TBLR TEMP
LACC TEMP
BACC
SUBEND:
RET
;DASUB
DATT5SUB:
LDP #7
LACL DATT5
SUB #500
SACL DATT5
BCND INARN,GEQ
SPLK #0,DATT5
RET
DATT6SUB:
LDP #7
LACL DATT6
SUB #500
SACL DATT6
BCND INARN,GEQ
SPLK #0,DATT6
RET
DATT7SUB:
LDP #7
LACL DATT7
SUB #1
SACL DATT7
SUB #10
BCND INARN,GT
SPLK #10,DATT7
RET
DATT8SUB:
LDP #7
LACL DATT8
SUB #5
SACL DATT8
SUB #5
BCND INARN,GEQ
SPLK #5,DATT8
RET
DATT9SUB:
LDP #7
LACL DATT9
SUB #10
SACL DATT9
SUB #50
BCND INARN,GEQ
SPLK #50,DATT9
RET
DATT10SUB:
LDP #7
LACL DATT10
SUB #10
SACL DATT10
SUB #100
BCND INARN,GEQ
SPLK #100,DATT10
RET
DATT11SUB:
LDP #7
LACL DATT11
SUB #1
SACL DATT11
SUB #100
BCND INARN,GEQ
SPLK #100,DATT11
RET
DATT12SUB:
LDP #7
LACL DATT12
SUB ADD_SUB
SACL DATT12
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT12
RET
DATT13SUB:
LDP #7
LACL DATT13
SUB ADD_SUB
SACL DATT13
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT13
RET
DATT14SUB:
LDP #7
LACL DATT14
SUB ADD_SUB
SACL DATT14
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT14
RET
DATT15SUB:
LDP #7
LACL DATT15
SUB ADD_SUB
SACL DATT15
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT15
RET
DATT16SUB:
LDP #7
LACL DATT16
SUB ADD_SUB
SACL DATT16
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT16
RET
DATT17SUB:
LDP #7
LACL DATT17
SUB ADD_SUB
SACL DATT17
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT17
RET
DATT18SUB:
LDP #7
LACL DATT18
SUB ADD_SUB
SACL DATT18
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT18
RET
DATT19SUB:
LDP #7
LACL DATT19
SUB ADD_SUB
SACL DATT19
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT19
RET
DA20SUB:
LDP #7
LACL DA20
SUB #1
SACL DA20
BCND INARN,GT
SPLK #0,DA20
RET
DA21SUB:
LDP #7
LACL DA21
SUB #1
SACL DA21
BCND INARN,GT
SPLK #0,DA21
RET
DATT20SUB:
LDP #7
LACL DATT20
SUB #1
SACL DATT20
SUB #150
BCND INARN,GT
SPLK #150,DATT20
RET
DATT21SUB:
LDP #7
LACL CT
BCND INAR,NEQ
LACL DATT21
SUB #1
SACL DATT21
BCND INARN,GT
SPLK #0,DATT21
RET
DATT22SUB:
LDP #7
LACL DATT22
SUB ADD_SUB
SACL DATT22
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT22
RET
DATT23SUB:
LDP #7
LACL DATT23
SUB ADD_SUB
SACL DATT23
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT23
RET
DATT24SUB:
LDP #7
LACL DATT24
SUB ADD_SUB
SACL DATT24
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT24
RET
DATT25SUB:
LDP #7
LACL DATT25
SUB ADD_SUB
SACL DATT25
SUB DAT24
BCND INARN,GEQ
LACL DAT24
SACL DATT25
RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -