📄 in.asm
字号:
*************************************************
*FILE: SPI_LED6.ASM
*日期：2005年11月25日*
*************************************************
.include "SPWM.H"
************************************************
.def IN
*********************************************
****************外部开关输入*****************
*********************************************
IN:
LDP #6
LACL COUNT8
ADD #1
SACL COUNT8
SUB #50 ;2MS*50=100MS
RETC LT
SPLK #0,COUNT8
INA0: LDP #225
LACL PBDATDIR
AND #00FFH
LDP #6
SACL INAC
LACL INAC
SUB #0FFH
BCND INAR0,NEQ
SPLK #0FFH,INAA
SPLK #0,INAB
LDP #7
LACL DATT47
BCND INPA0,NEQ
LDP #225
BIT PBDATDIR,15-7
BCND INPA0,NTC
LDP #6
SPLK #0FH,INF11
;CALL STOP
B INPA0
INAR0: LDP #6
LACL INAC
SUB INAA
BCND INA1,EQ
LACL INAC
SACL INAA
B IND0 ;IND0
INA1:
LDP #6
LACL INNK
SUB #9
BCND INA2,EQ
LACL INAB
ADD #1
SACL INAB
SUB #15
BCND INAD,LT ;INAD
INA2:
LDP #6
LACL INAA
AND #0FH
SUB #12 ;#12
BCND INDAT7,EQ ;INDAT7
LACL INAA
AND #0FH
SUB #13 ;#13
BCND IND02,EQ ;IND02
LACL INAA
AND #0FH
SUB #14 ;#14
BCND IND01,EQ ;IND01
INAD:
LDP #7
LACL DATT47
BCND INPA0,NEQ
LDP #6
LACC INAA,12
SACH INF10
LACL INF10
SUB INF11
BCND INPA0,EQ
LACL INF10
SACL INF11
SUB #07H
BCND INAD0,GT
SPLK #200,FMDAT2
;CALL RUN
INAD0:
LDP #6
LACL INF10
AND #07H
SACL INF12
;CALL SET_DATT1
B INPA0
SET_DATT1:
LDP #6
LACL FMDAT2
BCND SET_DATT10,NEQ
SPLK #40,FMDAT2
SET_DATT10:
LACL INF12
BCND LOAD_DATT19,EQ ;#0
SUB #1
BCND LOAD_DATT17,EQ ;#1
SUB #1
BCND LOAD_DATT18,EQ ;#2
SUB #1
BCND LOAD_DATT16,EQ ;#3
SUB #1
BCND LOAD_DATT15,EQ ;#4
SUB #1
BCND LOAD_DATT13,EQ ;#5
SUB #1
BCND LOAD_DATT14,EQ ;#6
SUB #1
BCND LOAD_DATT12,EQ ;#7
RET
LOAD_DATT12:
LDP #7
LACL DATT12
SACL DATT1
RET
LOAD_DATT13:
LDP #7
LACL DATT13
SACL DATT1
RET
LOAD_DATT14:
LDP #7
LACL DATT14
SACL DATT1
RET
LOAD_DATT15:
LDP #7
LACL DATT15
SACL DATT1
RET
LOAD_DATT16:
LDP #7
LACL DATT16
SACL DATT1
RET
LOAD_DATT17:
LDP #7
LACL DATT17
SACL DATT1
RET
LOAD_DATT18:
LDP #7
LACL DATT18
SACL DATT1
RET
LOAD_DATT19:
LDP #7
LACL DATT19
SACL DATT1
RET
IND0: LDP #6
BIT INAA,15-0
BCND IND02,TC
IND01:
LDP #6
SPLK #0,IN17
LACL INKK
SUB #24
BCND INKADD,EQ
LACL INNK
SUB #2
BCND ADD_DATT1,EQ
LACL INNK
SUB #4
BCND ADD_DATT7,EQ
LACL INNK
SUB #5
BCND DATT21ADD,EQ
LACL INNK
SUB #7
BCND ADD_DAT2,EQ
LACL INNK
SUB #8
BCND ADD_DAT1,EQ
B DATTADD
ADD_DATT1:
LDP #7
LACL DATT47
BCND INAR,EQ
LACL DATT1
ADD ADD_SUB
SACL DATT1
ADD #5000
SUB #20000
BCND INARN,LEQ
LACL #20000
SUB #5000
SACL DATT1
B INARN
ADD_DATT7:
LDP #7
LACL DATT7
ADD #1
SACL DATT7
SUB #120
BCND INARN,LEQ
SPLK #120,DATT7
B INARN
ADD_DAT2:
LDP #7
LACL DAT2
ADD #1
SACL DAT2
SUB #23
BCND INARN,LEQ
SPLK #0,DAT2
B INARN
ADD_DAT1:
LDP #7
LACL DAT1
ADD #1
SACL DAT1
SUB #59
BCND INARN,LEQ
SPLK #0,DAT1
B INARN
IND02:
LDP #6
BIT INAA,15-1
BCND IND03,TC
SPLK #0,IN17
LACL INKK
SUB #24
BCND INKSUB,EQ
LACL INNK
SUB #2
BCND SUB_DATT1,EQ
LACL INNK
SUB #4
BCND SUB_DATT7,EQ
LACL INNK
SUB #5
BCND DATT21SUB,EQ
LACL INNK
SUB #7
BCND SUB_DAT2,EQ
LACL INNK
SUB #8
BCND SUB_DAT1,EQ
B DATTSUB
IND03: LDP #6
BIT INAA,15-2
BCND IND04,TC
SPLK #40,FMDAT2
RET
IND04: LDP #6
BIT INAA,15-3
BCND INPA0,TC
SPLK #40,FMDAT2
RET
IND05: LDP #6
BIT INAA,15-4
BCND IND06,TC
SPLK #40,FMDAT2
RET
IND06: LDP #6
BIT INAA,15-5
BCND IND07,TC
SPLK #40,FMDAT2
RET
IND07: LDP #6
BIT INAA,15-6
BCND IND08,TC
SPLK #40,FMDAT2
RET
IND08: LDP #6
BIT INAA,15-7
BCND INPA0,TC
SPLK #40,FMDAT2
LDP #7
BIT CT,15-15
BCND IND080,TC
;CALL RUN
RET
IND080:
RET
SUB_DATT1:
LDP #7
LACL DATT47
BCND INAR,EQ
LACL DATT1
SUB ADD_SUB
SACL DATT1
SUB #5000
BCND INARN,GEQ
SPLK #5000,DATT1
B INARN
SUB_DATT7:
LDP #7
LACL DATT7
SUB #1
SACL DATT7
SUB #10
BCND INARN,GEQ
SPLK #10,DATT7
B INARN
SUB_DAT2:
LDP #7
LACL DAT2
SUB #1
SACL DAT2
BCND INARN,GEQ
SPLK #23,DAT2
B INARN
SUB_DAT1:
LDP #7
LACL DAT1
SUB #1
SACL DAT1
BCND INARN,GEQ
SPLK #59,DAT1
B INARN
DATTADD:
LDP #6
LACL INK
BCND ADDEND,LT
SUB #50
BCND ADDEND,GEQ
LACC #DATTADDX
ADD INK
TBLR TEMP
LACC TEMP
BACC
ADDEND:
RET
;DAADD
DATT5ADD:
LDP #7
LACL DATT5
ADD #500
SACL DATT5
SUB #15000
BCND INARN,LEQ
SPLK #15000,DATT5
RET
DATT6ADD:
LDP #7
LACL DATT6
ADD #500
SACL DATT6
SUB #5000
BCND INARN,LEQ
SPLK #5000,DATT6
RET
DATT7ADD:
LDP #7
LACL DATT7
ADD #1
SACL DATT7
SUB #120
BCND INARN,LEQ
SPLK #120,DATT7
RET
DATT8ADD:
LDP #7
LACL DATT8
ADD #5
SACL DATT8
SUB #1000
BCND INARN,LEQ
SPLK #1000,DATT8
RET
DATT9ADD:
LDP #7
LACL DATT9
ADD #10
SACL DATT9
SUB #2000
BCND INARN,LEQ
SPLK #2000,DATT9
RET
DATT10ADD:
LDP #7
LACL DATT10
ADD #10
SACL DATT10
SUB #3000
BCND INARN,LEQ
SPLK #3000,DATT10
RET
DATT11ADD:
LDP #7
LACL DATT11
ADD #1
SACL DATT11
SUB #250
BCND INARN,LEQ
SPLK #250,DATT11
RET
DATT12ADD:
LDP #7
LACL DATT12
ADD ADD_SUB
SACL DATT12
SUB DATT22
BCND INARN,LEQ
LACL DATT22
SACL DATT12
RET
DATT13ADD:
LDP #7
LACL DATT13
ADD ADD_SUB
SACL DATT13
SUB DATT23
BCND INARN,LEQ
LACL DATT23
SACL DATT13
RET
DATT14ADD:
LDP #7
LACL DATT14
ADD ADD_SUB
SACL DATT14
SUB DATT24
BCND INARN,LEQ
LACL DATT24
SACL DATT14
RET
DATT15ADD:
LDP #7
LACL DATT15
ADD ADD_SUB
SACL DATT15
SUB DATT25
BCND INARN,LEQ
LACL DATT25
SACL DATT15
RET
DATT16ADD:
LDP #7
LACL DATT16
ADD ADD_SUB
SACL DATT16
SUB DATT26
BCND INARN,LEQ
LACL DATT26
SACL DATT16
RET
DATT17ADD:
LDP #7
LACL DATT17
ADD ADD_SUB
SACL DATT17
SUB DATT27
BCND INARN,LEQ
LACL DATT27
SACL DATT17
RET
DATT18ADD:
LDP #7
LACL DATT18
ADD ADD_SUB
SACL DATT18
SUB DATT28
BCND INARN,LEQ
LACL DATT28
SACL DATT18
RET
DATT19ADD:
LDP #7
LACL DATT19
ADD ADD_SUB
SACL DATT19
SUB DATT29
BCND INARN,LEQ
LACL DATT29
SACL DATT19
RET
DA20ADD:
LDP #7
LACL DA20
ADD #1
SACL DA20
SUB #1100
BCND INARN,LT
SPLK #1100,DA20
RET
DA21ADD:
LDP #7
LACL DA21
ADD #1
SACL DA21
SUB #9999
BCND INARN,LT
SPLK #9999,DA21
RET
DATT20ADD:
LDP #7
LACL DATT20
ADD #1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -