bake.lst

来自「为日本瑞萨苏州分公司做的一个温控系统」· LST 代码 · 共 2,065 行 · 第 1/5 页

LST
2,065
字号
    98D5 B4 41        and	*__r1
    98D7 B7 41        stA	*__r1
    98D9 B6 42        ldA	*__r2
    98DB B4 40        and	*__r0
    98DD 4E 4102      mov	*__r1,0x02
    98E0 E6 06        ldA	6,X
    98E2 B7 41        stA	*__r1
    98E4 E6 05        ldA	5,X
    98E6 B7 40        stA	*__r0
    98E8 A6 04        ldA	#4
    98EA 38 41        lsl	*__r1
    98EC 39 40        rol	*__r0
    98EE 4B FA        dbnzA	0x98F2
    98F0 B6 41        ldA	*__r1
    98F2 AA 0C        orA	#12
    98F4 B7 12        stA	0x12
    98F6 07 11FD      BRclr	3,0x11,0x98F6
    98F9 0F 11FD      BRclr	7,0x11,0x98F9
    98FC E6 08        ldA	8,X
    98FE B7 41        stA	*__r1
    9900 E6 07        ldA	7,X
    9902 B7 40        stA	*__r0
    9904 B6 12        ldA	0x12
    9906 55 40        ldHX	*__r0
    9908 F7           stA	0,X
    9909 95           tSX	
    990A E6 07        ldA	7,X
    990C EE 08        ldX	8,X
    990E 87           pshA	
    990F 8A           pulH	
    9910 F6           ldA	0,X
    9911 95           tSX	
    9912 B7 12        stA	0x12
    9914 07 11FD      BRclr	3,0x11,0x9914
    9917 0F 11FD      BRclr	7,0x11,0x9917
    991A E6 08        ldA	8,X
    991C AB 01        add	#1
    991E B7 41        stA	*__r1
    9920 E6 07        ldA	7,X
    9922 A9 00        adc	#0
    9924 B7 40        stA	*__r0
    9926 B6 12        ldA	0x12
    9928 55 40        ldHX	*__r0
    992A F7           stA	0,X
    992B 95           tSX	
    992C 6E 0040      mov	#0,*__r0
    992F 6E 0141      mov	#1,*__r1
    9932 E6 04        ldA	4,X
    9934 A4 0F        and	#15
    9936 27 06        beq	0x993E
    9938 38 41        lsl	*__r1
    993A 39 40        rol	*__r0
    993C 4B FA        dbnzA	0x997F
    993E 3F 42        clr	*__r2
    9940 B6 02        ldA	0x02
    9942 BA 41        orA	*__r1
    9944 B7 41        stA	*__r1
    9946 B6 42        ldA	*__r2
    9948 BA 40        orA	*__r0
    994A 4E 4102      mov	*__r1,0x02
    994D E6 08        ldA	8,X
    994F AB 01        add	#1
    9951 B7 41        stA	*__r1
    9953 E6 07        ldA	7,X
    9955 A9 00        adc	#0
    9957 B7 40        stA	*__r0
    9959 E6 07        ldA	7,X
    995B EE 08        ldX	8,X
    995D 87           pshA	
    995E 8A           pulH	
    995F F6           ldA	0,X
    9960 62           nsa	
    9961 A4 F0        and	#-16
    9963 B7 42        stA	*__r2
    9965 55 40        ldHX	*__r0
    9967 F6           ldA	0,X
    9968 B7 44        stA	*__r4
    996A A6 04        ldA	#4
    996C 34 44        lsr	*__r4
    996E 4B FC        dbnzA	0x9972
    9970 B6 44        ldA	*__r4
    9972 BA 42        orA	*__r2
    9974 55 40        ldHX	*__r0
    9976 F7           stA	0,X
    9977 95           tSX	
    9978 E6 07        ldA	7,X
    997A EE 08        ldX	8,X
    997C 87           pshA	
    997D 8A           pulH	
    997E F6           ldA	0,X
    997F 95           tSX	
    9980 B7 40        stA	*__r0
    9982 A6 04        ldA	#4
    9984 34 40        lsr	*__r0
    9986 4B FC        dbnzA	0x998A
    9988 4E 4041      mov	*__r0,*__r1
    998B E6 08        ldA	8,X
    998D B7 43        stA	*__r3
    998F E6 07        ldA	7,X
    9991 B7 42        stA	*__r2
    9993 B6 41        ldA	*__r1
    9995 55 42        ldHX	*__r2
    9997 F7           stA	0,X
    9998 95           tSX	
    9999 A7 01        aiS	#1
    999B 81           rts	
_SCIInit:
    999C A6 02        ldA	#2
    999E B7 19        stA	0x19
    99A0 A6 40        ldA	#64
    99A2 B7 13        stA	0x13
    99A4 A6 0C        ldA	#12
    99A6 B7 14        stA	0x14
    99A8 81           rts	
_SCISend1:
  o                    --> X+2
    99A9 95           tSX	
    99AA 20 09        bra	0x99B5
    99AC 0F 1606      BRclr	7,0x16,0x99B5
    99AF E6 02        ldA	2,X
    99B1 B7 18        stA	0x18
    99B3 20 02        bra	0x99B7
    99B5 20 F5        bra	0x99AC
    99B7 81           rts	
_SCISendN:
  i                    --> X+0
  ch                   --> X+5
  n                    --> X+4
    99B8 A7 FE        aiS	#-2
    99BA 95           tSX	
    99BB 6F 01        clr	1,X
    99BD 7F           clr	0,X
    99BE 20 1F        bra	0x99DF
    99C0 E6 01        ldA	1,X
    99C2 EB 06        add	6,X
    99C4 B7 41        stA	*__r1
    99C6 F6           ldA	0,X
    99C7 E9 05        adc	5,X
    99C9 B7 40        stA	*__r0
    99CB 55 40        ldHX	*__r0
    99CD F6           ldA	0,X
    99CE 87           pshA	
    99CF CD 99A9      jsr	_SCISend1
    99D2 A7 01        aiS	#1
    99D4 95           tSX	
    99D5 E6 01        ldA	1,X
    99D7 AB 01        add	#1
    99D9 E7 01        stA	1,X
    99DB F6           ldA	0,X
    99DC A9 00        adc	#0
    99DE F7           stA	0,X
    99DF 3F 40        clr	*__r0
    99E1 E6 04        ldA	4,X
    99E3 B7 41        stA	*__r1
    99E5 E6 01        ldA	1,X
    99E7 B7 43        stA	*__r3
    99E9 F6           ldA	0,X
    99EA B7 42        stA	*__r2
    99EC 55 42        ldHX	*__r2
    99EE 75 40        cpHX	*__r0
    99F0 95           tSX	
    99F1 91 CD        blt	0x99C0
    99F3 A7 02        aiS	#2
    99F5 81           rts	
_SCIRe1:
  i                    --> X+0
  k                    --> X+1
  p                    --> X+5
    99F6 A7 FD        aiS	#-3
    99F8 95           tSX	
    99F9 6F 02        clr	2,X
    99FB 6F 01        clr	1,X
    99FD 20 21        bra	0x9A20
    99FF 0B 1612      BRclr	5,0x16,0x9A14
    9A02 B6 18        ldA	0x18
    9A04 F7           stA	0,X
    9A05 E6 06        ldA	6,X
    9A07 B7 41        stA	*__r1
    9A09 E6 05        ldA	5,X
    9A0B B7 40        stA	*__r0
    9A0D 4F           clrA	
    9A0E 55 40        ldHX	*__r0
    9A10 F7           stA	0,X
    9A11 95           tSX	
    9A12 20 1C        bra	0x9A30
    9A14 E6 02        ldA	2,X
    9A16 AB 01        add	#1
    9A18 E7 02        stA	2,X
    9A1A E6 01        ldA	1,X
    9A1C A9 00        adc	#0
    9A1E E7 01        stA	1,X
    9A20 E6 02        ldA	2,X
    9A22 B7 41        stA	*__r1
    9A24 E6 01        ldA	1,X
    9A26 B7 40        stA	*__r0
    9A28 55 40        ldHX	*__r0
    9A2A 65 FBBB      cpHX	#0xFBBB
    9A2D 95           tSX	
    9A2E 25 CF        bcs	0x99FF
    9A30 E6 02        ldA	2,X
    9A32 B7 41        stA	*__r1
    9A34 E6 01        ldA	1,X
    9A36 B7 40        stA	*__r0
    9A38 55 40        ldHX	*__r0
    9A3A 65 FBBB      cpHX	#0xFBBB
    9A3D 95           tSX	
    9A3E 25 11        bcs	0x9A51
    9A40 A6 FF        ldA	#-1
    9A42 F7           stA	0,X
    9A43 E6 06        ldA	6,X
    9A45 B7 41        stA	*__r1
    9A47 E6 05        ldA	5,X
    9A49 B7 40        stA	*__r0
    9A4B A6 01        ldA	#1
    9A4D 55 40        ldHX	*__r0
    9A4F F7           stA	0,X
    9A50 95           tSX	
    9A51 F6           ldA	0,X
    9A52 A7 03        aiS	#3
    9A54 81           rts	
_SCIReN:
  fp                   --> X+0
  m                    --> X+1
  ch                   --> X+6
  n                    --> X+5
    9A55 A7 FD        aiS	#-3
    9A57 95           tSX	
    9A58 6F 02        clr	2,X
    9A5A 6F 01        clr	1,X
    9A5C 20 31        bra	0x9A8F
    9A5E 89           pshX	
    9A5F 8B           pshH	
    9A60 CD 99F6      jsr	_SCIRe1
    9A63 A7 02        aiS	#2
    9A65 95           tSX	
    9A66 B7 41        stA	*__r1
    9A68 E6 02        ldA	2,X
    9A6A EB 07        add	7,X
    9A6C B7 43        stA	*__r3
    9A6E E6 01        ldA	1,X
    9A70 E9 06        adc	6,X
    9A72 B7 42        stA	*__r2
    9A74 B6 41        ldA	*__r1
    9A76 55 42        ldHX	*__r2
    9A78 F7           stA	0,X
    9A79 95           tSX	
    9A7A F6           ldA	0,X
    9A7B A1 01        cmp	#1
    9A7D 26 04        bne	0x9A83
    9A7F A6 01        ldA	#1
    9A81 20 22        bra	0x9AA5
    9A83 E6 02        ldA	2,X
    9A85 AB 01        add	#1
    9A87 E7 02        stA	2,X
    9A89 E6 01        ldA	1,X
    9A8B A9 00        adc	#0
    9A8D E7 01        stA	1,X
    9A8F 3F 40        clr	*__r0
    9A91 E6 05        ldA	5,X
    9A93 B7 41        stA	*__r1
    9A95 E6 02        ldA	2,X
    9A97 B7 43        stA	*__r3
    9A99 E6 01        ldA	1,X
    9A9B B7 42        stA	*__r2
    9A9D 55 42        ldHX	*__r2
    9A9F 75 40        cpHX	*__r0
    9AA1 95           tSX	
    9AA2 91 BA        blt	0x9A5E
    9AA4 4F           clrA	
    9AA5 A7 03        aiS	#3
    9AA7 81           rts	
_SPIInit:
    9AA8 A6 22        ldA	#34
    9AAA B7 10        stA	0x10
    9AAC A6 01        ldA	#1
    9AAE B7 11        stA	0x11
    9AB0 81           rts	
_LCDInit:
    9AB1 12 06        Bset	1,0x06
    9AB3 14 06        Bset	2,0x06
    9AB5 16 06        Bset	3,0x06
    9AB7 18 06        Bset	4,0x06
    9AB9 A6 FF        ldA	#-1
    9ABB B7 05        stA	0x05
    9ABD 45 2710      ldHX	#0x2710
    9AC0 89           pshX	
    9AC1 8B           pshH	
    9AC2 CD 9F02      jsr	_DelayTimes
    9AC5 A7 02        aiS	#2
    9AC7 A6 30        ldA	#48
    9AC9 87           pshA	
    9ACA CD 9ECC      jsr	_Wtite_Command
    9ACD A7 01        aiS	#1
    9ACF A6 0C        ldA	#12
    9AD1 87           pshA	
    9AD2 CD 9ECC      jsr	_Wtite_Command
    9AD5 A7 01        aiS	#1
    9AD7 A6 01        ldA	#1
    9AD9 87           pshA	
    9ADA CD 9ECC      jsr	_Wtite_Command
    9ADD A7 01        aiS	#1
    9ADF 45 0FA0      ldHX	#0x0FA0
    9AE2 89           pshX	
    9AE3 8B           pshH	
    9AE4 CD 9F02      jsr	_DelayTimes
    9AE7 A7 02        aiS	#2
    9AE9 A6 06        ldA	#6
    9AEB 87           pshA	
    9AEC CD 9ECC      jsr	_Wtite_Command
    9AEF A7 01        aiS	#1
    9AF1 CD 9DE9      jsr	_LcdShGrClr
    9AF4 95           tSX	
    9AF5 81           rts	
_LcdShCh:
  i                    --> X+0
  LcdSBuff             --> X+3
    9AF6 A7 FF        aiS	#-1
    9AF8 95           tSX	
    9AF9 A6 80        ldA	#-128
    9AFB 87           pshA	
    9AFC CD 9ECC      jsr	_Wtite_Command
    9AFF A7 01        aiS	#1
    9B01 95           tSX	
    9B02 7F           clr	0,X
    9B03 20 65        bra	0x9B6A
    9B05 F6           ldA	0,X
    9B06 A1 0F        cmp	#15
    9B08 23 04        bls	0x9B0E
    9B0A A1 30        cmp	#48
    9B0C 25 19        bcs	0x9B27
    9B0E 3F 40        clr	*__r0
    9B10 F6           ldA	0,X
    9B11 EB 04        add	4,X
    9B13 B7 41        stA	*__r1
    9B15 B6 40        ldA	*__r0
    9B17 E9 03        adc	3,X
    9B19 B7 40        stA	*__r0
    9B1B 55 40        ldHX	*__r0
    9B1D F6           ldA	0,X
    9B1E 87           pshA	
    9B1F CD 9EE7      jsr	_Wtite_Data
    9B22 A7 01        aiS	#1
    9B24 95           tSX	
    9B25 20 42        bra	0x9B69
    9B27 F6           ldA	0,X
    9B28 A1 1F        cmp	#31
    9B2A 22 1A        bhi	0x9B46
    9B2C 3F 40        clr	*__r0
    9B2E EB 04        add	4,X
    9B30 B7 41        stA	*__r1
    9B32 B6 40        ldA	*__r0
    9B34 E9 03        adc	3,X
    9B36 B7 40        stA	*__r0
    9B38 55 40        ldHX	*__r0
    9B3A AF 10        aiX	#16
    9B3C F6           ldA	0,X
    9B3D 87           pshA	
    9B3E CD 9EE7      jsr	_Wtite_Data
    9B41 A7 01        aiS	#1
    9B43 95           tSX	
    9B44 20 23        bra	0x9B69
    9B46 3F 40        clr	*__r0
    9B48 F6           ldA	0,X
    9B49 A0 10        sub	#16
    9B4B B7 41        stA	*__r1
    9B4D B6 40        ldA	*__r0
    9B4F A2 00        sbc	#0
    9B51 B7 40        stA	*__r0
    9B53 B6 41        ldA	*__r1
    9B55 EB 04        add	4,X
    9B57 B7 41        stA	*__r1
    9B59 B6 40        ldA	*__r0
    9B5B E9 03        adc	3,X
    9B5D B7 40        stA	*__r0
    9B5F 55 40        ldHX	*__r0
    9B61 F6           ldA	0,X
    9B62 87           pshA	
    9B63 CD 9EE7      jsr	_Wtite_Data
    9B66 A7 01        aiS	#1
    9B68 95           tSX	
    9B69 7C           inc	0,X
    9B6A F6           ldA	0,X
    9B6B A1 40        cmp	#64
    9B6D 25 96        bcs	0x9B05
    9B6F A7 01        aiS	#1
    9B71 81           rts	
_LcdShGrCil:
  y                    --> X+0
  mistake              --> X+1
  x                    --> X+5
  GrE                  --> X+12
  GrCilMV              --> X+11
  CR                   --> X+10
  Cx                   --> X+9
  Cy                   --> X+8
    9B72 A7 FA        aiS	#-6
    9B74 95           tSX	
    9B75 A6 36        ldA	#54
    9B77 87           pshA	
    9B78 CD 9ECC      jsr	_Wtite_Command
    9B7B A7 01        aiS	#1
    9B7D 95           tSX	
    9B7E E6 08        ldA	8,X
    9B80 E0 0A        sub	10,X
    9B82 F7           stA	0,X
    9B83 CC 9D03      jmp	0x9D03
    9B86 E6 09        ldA	9,X
    9B88 E0 0A        sub	10,X
    9B8A E7 05        stA	5,X
    9B8C CC 9CF3      jmp	0x9CF3
    9B8F 3F 40        clr	*__r0
    9B91 E6 09        ldA	9,X
    9B93 B7 41        stA	*__r1

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?