📄 综合a.lst
字号:
000834 95c8 redsp:lpm
000835 2d10 mov temp1,r0
000836 d026 rcall writd
000837 9001 ld r0,z+
000838 954a dec cnt
000839 f7d1 brne redsp
00083a 955a dec cnt1
00083b f7a9 brne w1r
00083c 9508 ret
00083d 95a8 syset: wdr
00083e e011 ldi temp1,$01
00083f d005 RCALL contd
000840 e318 ldi temp1,$38
000841 d003 rcall contd
000842 e016 ldi temp1,$06
000843 d001 rcall contd
000844 9508 ret
000845 e300 CONTD: LDI TEMP,0B00110000
000846 bb02 OUT PORTD,TEMP
000847 d02c RCALL DELT3
000848 9895 CBI PORTD,$05
000849 d02a RCALL DELT3
00084a 9a95 sbi portd,$05
00084b 95a8 BUSYY: WDR
00084c 99b7 SBIC PINB,$07
00084d cffd RJMP BUSYY
00084e e200 ldi temp,0b00100000
00084f bb02 OUT PORTD,TEMP
000850 d023 RCALL DELT3
000851 ef0f LDI TEMP,$ff
000852 bb07 OUT DDRB,TEMP
000853 bb18 OUT PORTB,TEMP1
000854 95a8 WDR
000855 9895 cBI PORTD,$05
000856 d01d RCALL DELT3
000857 e308 LDI TEMP,0B00111000
000858 bb02 OUT PORTD,TEMP
000859 2700 CLR TEMP
00085a bb07 OUT DDRB,TEMP
00085b bb08 OUT PORTB,TEMP
00085c 9508 RET
00085d e300 WRITD: LDI TEMP,0B00110000
00085e bb02 OUT PORTD,TEMP
00085f d014 RCALL DELT3
000860 9895 cbi portd,$05
000861 d012 rcall delt3
000862 9a95 sbi portd,$05
000863 95a8 BUZY1:WDR
000864 99b7 SBIC PINB,$07
000865 cffd RJMP BUZY1
000866 e208 LDI TEMP,0B00101000
000867 bb02 OUT PORTD,TEMP
000868 bb18 OUT PORTB,TEMP1
000869 ef0f LDI TEMP,$ff
00086a bb07 OUT DDRB,TEMP
00086b 9895 cbi PORTD,$05
00086c d007 RCALL DELT3
00086d e308 LDI TEMP,0B00111000
00086e bb02 OUT PORTD,TEMP
00086f d004 RCALL DELT3
000870 2700 CLR TEMP
000871 bb07 OUT DDRB,TEMP
000872 bb08 OUT PORTB,TEMP
000873 9508 RET
000874 e224 DELT3: LDI TEMP2,$24
000875 95a8 DT111:WDR
000876 952a DEC TEMP2
000877 f7e9 BRNE DT111
000878 9508 RET
000879 e505 delayY: ldi temp,$55
00087a 930f delaypa:push temp
00087b 930f m1: push temp
00087c 930f m2: push temp
00087d 950a m3: dec temp
00087e f7f1 brne m3
00087f 910f pop temp
000880 950a dec temp
000881 f7d1 brne m2
000882 910f pop temp
000883 950a dec temp
000884 f7b1 brne m1
000885 910f pop temp
000886 950a dec temp
000887 f791 brne delaypa
000888 9508 ret
.cseg ;LCD第一行显示GZ Shuang Long
.org 0xBa0
.db 0x20,0x47,0x5a,0x20,0x53,0x68,0x75,0x61
000ba0 4720
000ba1 205a
000ba2 6853
000ba3 6175
.db 0x6e,0x67,0x20,0x4c,0x6f,0x6e,0x67,0x20
000ba4 676e
000ba5 4c20
000ba6 6e6f
000ba7 2067
.cseg
.org 0xBc0 ;LCD第二显示字符
.db 0x20,0x57,0x65,0x6c,0x63,0x6f,0x6d,0x65,0x20,0x62
000bc0 5720
000bc1 6c65
000bc2 6f63
000bc3 656d
000bc4 6220
.db 0x72,0x6f,0x77,0x73,0x65,0x20
000bc5 6f72
000bc6 7377
000bc7 2065
.db 0x20,0x20,0x6f,0x75,0x72,0x20,0x20,0x77,0x65,0x62
000bc8 2020
000bc9 756f
000bca 2072
000bcb 7720
000bcc 6265
.db 0x73,0x69,0x74,0x65,0x20,0x20
000bcd 6973
000bce 6574
000bcf 2020
.db 0x20,0x48,0x74,0x74,0x70,0x3a,0x2f,0x2f,0x20,0x20
000bd0 4820
000bd1 7474
000bd2 3a70
000bd3 2f2f
000bd4 2020
.db 0x20,0x20,0x20,0x20,0x20,0x20
000bd5 2020
000bd6 2020
000bd7 2020
.db 0x20,0x20,0x77,0x77,0x77,0x2e,0x53,0x4c,0x2e,0x63
000bd8 2020
000bd9 7777
000bda 2e77
000bdb 4c53
000bdc 632e
.db 0x6f,0x6d,0x2e,0x63,0x6e,0x20
000bdd 6d6f
000bde 632e
000bdf 206e
.db 0x20,0x20,0x48,0x65,0x72,0x65,0x20,0x79,0x6f,0x75
000be0 2020
000be1 6548
000be2 6572
000be3 7920
000be4 756f
.db 0x20,0x63,0x61,0x6e,0x20,0x20
000be5 6320
000be6 6e61
000be7 2020
.db 0x20,0x66,0x69,0x6e,0x64,0x20,0x77,0x68,0x61,0x74
000be8 6620
000be9 6e69
000bea 2064
000beb 6877
000bec 7461
.db 0x20,0x79,0x6f,0x75,0x20,0x20
000bed 7920
000bee 756f
000bef 2020
.db 0x20,0x20,0x20,0x20,0x20,0x20,0x77,0x61,0x6e,0x74
000bf0 2020
000bf1 2020
000bf2 2020
000bf3 6177
000bf4 746e
.db 0x2e,0x20,0x20,0x20,0x20,0x20
000bf5 202e
000bf6 2020
000bf7 2020
.cseg
.org 0xCc0 ;LCD所有显示字符
.db 0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39
000cc0 3130
000cc1 3332
000cc2 3534
000cc3 3736
000cc4 3938
.db 0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,0x50
000cc5 4241
000cc6 4443
000cc7 4645
000cc8 4847
000cc9 4a49
000cca 4c4b
000ccb 4e4d
000ccc 504f
.db 0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5a,0x61,0x62,0x63,0x64,0x65,0x66
000ccd 5251
000cce 5453
000ccf 5655
000cd0 5857
000cd1 5a59
000cd2 6261
000cd3 6463
000cd4 6665
.db 0x67,0x68,0x69,0x6a,0x6b,0x6c,0x6d,0x6e,0x6f,0x70,0x71,0x72,0x73,0x75,0x76,0x77
000cd5 6867
000cd6 6a69
000cd7 6c6b
000cd8 6e6d
000cd9 706f
000cda 7271
000cdb 7573
000cdc 7776
.db 0x78,0x79,0x7a,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2a,0x2b,0x2c,0x2d,0x2e
000cdd 7978
000cde 227a
000cdf 2423
000ce0 2625
000ce1 2827
000ce2 2a29
000ce3 2c2b
000ce4 2e2d
.db 0x2f,0x3b,0x3c,0x3d,0x3e,0x3f,0x5b,0x5c,0x5d,0x5e,0x5f,0x7b,0x7d,0x7c,0x7e,0xa1
000ce5 3b2f
000ce6 3d3c
000ce7 3f3e
000ce8 5c5b
000ce9 5e5d
000cea 7b5f
000ceb 7c7d
000cec a17e
.db 0xa2,0xa3,0xa4,0xa5,0xa6,0xa7,0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf
000ced a3a2
000cee a5a4
000cef a7a6
000cf0 a9a8
000cf1 abaa
000cf2 adac
000cf3 afae
.db 0xb0,0xb1,0xb2,0xb3,0xb4,0xb5,0xb6,0xb7,0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0xbe,0xbf
000cf4 b1b0
000cf5 b3b2
000cf6 b5b4
000cf7 b7b6
000cf8 b9b8
000cf9 bbba
000cfa bdbc
000cfb bfbe
.db 0xc0,0xc1,0xc2,0xc3,0xc4,0xc5,0xc6,0xc7,0xc8,0xc9,0xca,0xcb,0xcc,0xcd,0xce,0xcf
000cfc c1c0
000cfd c3c2
000cfe c5c4
000cff c7c6
000d00 c9c8
000d01 cbca
000d02 cdcc
000d03 cfce
.db 0xd0,0xd1,0xd2,0xd3,0xd4,0xd5,0xd6,0xd7,0xd8,0xd9,0xda,0xdb,0xdc,0xdd,0xde,0xdf
000d04 d1d0
000d05 d3d2
000d06 d5d4
000d07 d7d6
000d08 d9d8
000d09 dbda
000d0a dddc
000d0b dfde
.db 0xe0,0xe1,0xe2,0xe3,0xe4,0xe5,0xe6,0xe7,0xe8,0xe9,0xea,0xeb,0xec,0xed,0xee,0xef
000d0c e1e0
000d0d e3e2
000d0e e5e4
000d0f e7e6
000d10 e9e8
000d11 ebea
000d12 edec
000d13 efee
.db 0xf0,0xf1,0xf2,0xf3,0xf4,0xf5,0xf6,0xf7,0xf8,0xf9,0xfa,0xfb,0xfc,0xfd,0xfe,0xff
000d14 f1f0
000d15 f3f2
000d16 f5f4
000d17 f7f6
000d18 f9f8
000d19 fbfa
000d1a fdfc
000d1b fffe
.cseg
.org $0f00 ;LED字形表0-F
.dw 0x063f,0x4f5b,0x6d66,0x077d
000f00 063f
000f01 4f5b
000f02 6d66
000f03 077d
.dw 0x6f7f,0x7c77,0x5e39,0x7179
000f04 6f7f
000f05 7c77
000f06 5e39
000f07 7179
.dw 0x0000
000f08 0000
.cseg
.org $0f10 ;LCD显示0-F ;
.dw 0x3130,0x3332,0x3534,0x3736
000f10 3130
000f11 3332
000f12 3534
000f13 3736
.dw 0x3938,0x4241,0x4443,0x4645
000f14 3938
000f15 4241
000f16 4443
000f17 4645
.equ plytab=0x0f20
.equ mustab=0x0fda
.cseg
.org plytab ;祝你生日快乐曲码
.db 20,02,00,01,20,01,22,04,20,04
000f20 0214
000f21 0100
000f22 0114
000f23 0416
000f24 0414
.db 25,04,24,04,00,04
000f25 0419
000f26 0418
000f27 0400
.db 20,02,00,01,20,01,22,04,20,04
000f28 0214
000f29 0100
000f2a 0114
000f2b 0416
000f2c 0414
.db 27,04,25,04,00,04
000f2d 041b
000f2e 0419
000f2f 0400
.db 20,02,00,01,20,01,32,04,29,04
000f30 0214
000f31 0100
000f32 0114
000f33 0420
000f34 041d
.db 25,04,24,04,22,04
000f35 0419
000f36 0418
000f37 0416
.db 30,02,00,01,30,01,29,04,25,04
000f38 021e
000f39 0100
000f3a 011e
000f3b 041d
000f3c 0419
.db 27,04,25,04,00,04
000f3d 041b
000f3e 0419
000f3f 0400
; 万水千山总是情曲码
.db 17,04,18,04,20,06,20,02,22,04,20,04,17,12,15,04 ;
000f40 0411
000f41 0412
000f42 0614
000f43 0214
000f44 0416
000f45 0414
000f46 0c11
000f47 040f
.db 13,06,17,02,15,04,13,04,10,12,10,04,8,8,13,04 ;
000f48 060d
000f49 0211
000f4a 040f
000f4b 040d
000f4c 0c0a
000f4d 040a
000f4e 0808
000f4f 040d
.db 15,04,17,04,20,04,22,04,17,04,15,15,15,04,00,04 ;
000f50 040f
000f51 0411
000f52 0414
000f53 0416
000f54 0411
000f55 0f0f
000f56 040f
000f57 0400
.db 17,04,18,04,20,06,20,02,22,04,20,04,17,12,15,04 ;
000f58 0411
000f59 0412
000f5a 0614
000f5b 0214
000f5c 0416
000f5d 0414
000f5e 0c11
000f5f 040f
.db 13,06,17,02,15,04,13,04,10,12,10,04,8,8,13,06 ;
000f60 060d
000f61 0211
000f62 040f
000f63 040d
000f64 0c0a
000f65 040a
000f66 0808
000f67 060d⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -