⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pwm.lst

📁 摩托罗拉的脉冲信号输出的原代码
💻 LST
📖 第 1 页 / 共 2 页
字号:
    8254 B7 42        stA	*__r2
    8256 4F           clrA	
    8257 87           pshA	
    8258 A6 96        ldA	#-106
    825A 87           pshA	
    825B 4F           clrA	
    825C 87           pshA	
    825D 87           pshA	
    825E B6 43        ldA	*__r3
    8260 87           pshA	
    8261 B6 42        ldA	*__r2
    8263 87           pshA	
    8264 B6 41        ldA	*__r1
    8266 87           pshA	
    8267 B6 40        ldA	*__r0
    8269 87           pshA	
    826A CD 836B      jsr	__divmod32s
    826D A7 04        aiS	#4
    826F 86           pulA	
    8270 86           pulA	
    8271 86           pulA	
    8272 B7 42        stA	*__r2
    8274 86           pulA	
    8275 B7 41        stA	*__r1
    8277 B6 42        ldA	*__r2
    8279 E7 02        stA	2,X
    827B B6 41        ldA	*__r1
    827D E7 03        stA	3,X
    827F 87           pshA	
    8280 E6 02        ldA	2,X
    8282 87           pshA	
    8283 CD 806F      jsr	_PWMInit
    8286 A7 02        aiS	#2
    8288 95           tSX	
    8289 E6 03        ldA	3,X
    828B B7 41        stA	*__r1
    828D E6 02        ldA	2,X
    828F B7 40        stA	*__r0
    8291 34 40        lsr	*__r0
    8293 36 41        ror	*__r1
    8295 B6 40        ldA	*__r0
    8297 F7           stA	0,X
    8298 B6 41        ldA	*__r1
    829A E7 01        stA	1,X
    829C 1A 20        Bset	5,0x20
    829E F6           ldA	0,X
    829F B7 26        stA	0x26
    82A1 E6 01        ldA	1,X
    82A3 B7 27        stA	0x27
    82A5 1B 20        Bclr	5,0x20
    82A7 A6 0A        ldA	#10
    82A9 87           pshA	
    82AA CD 80BA      jsr	_Delay_ms
    82AD A7 01        aiS	#1
    82AF 95           tSX	
    82B0 A7 04        aiS	#4
    82B2 81           rts	
_KB_Init:
    82B3 3F 00        clr	0x00
    82B5 A6 0F        ldA	#15
    82B7 B7 04        stA	0x04
    82B9 A6 F0        ldA	#-16
    82BB B7 0D        stA	0x0D
    82BD 12 1A        Bset	1,0x1A
    82BF A6 F0        ldA	#-16
    82C1 B7 1B        stA	0x1B
    82C3 14 1A        Bset	2,0x1A
    82C5 81           rts	
_KB_Scan:
    82C6 A7 FD        aiS	#-3
    82C8 95           tSX	
    82C9 A6 FE        ldA	#-2
    82CB F7           stA	0,X
    82CC A6 01        ldA	#1
    82CE E7 01        stA	1,X
    82D0 20 26        bra	0x82F8
    82D2 B6 00        ldA	0x00
    82D4 E7 02        stA	2,X
    82D6 AA 0F        orA	#15
    82D8 E7 02        stA	2,X
    82DA F4           and	0,X
    82DB B7 00        stA	0x00
    82DD 9D           nop	
    82DE 9D           nop	
    82DF B6 00        ldA	0x00
    82E1 E7 02        stA	2,X
    82E3 A4 F0        and	#-16
    82E5 E7 02        stA	2,X
    82E7 A1 F0        cmp	#-16
    82E9 27 06        beq	0x82F1
    82EB B6 00        ldA	0x00
    82ED E7 02        stA	2,X
    82EF 20 0D        bra	0x82FE
    82F1 F6           ldA	0,X
    82F2 48           lslA	
    82F3 AA 01        orA	#1
    82F5 F7           stA	0,X
    82F6 6C 01        inc	1,X
    82F8 E6 01        ldA	1,X
    82FA A1 04        cmp	#4
    82FC 23 D4        bls	0x82D2
    82FE E6 01        ldA	1,X
    8300 A1 05        cmp	#5
    8302 26 04        bne	0x8308
    8304 A6 FF        ldA	#-1
    8306 E7 02        stA	2,X
    8308 E6 02        ldA	2,X
    830A A7 03        aiS	#3
    830C 81           rts	
_KB_Def:
    830D A7 FD        aiS	#-3
    830F 95           tSX	
    8310 6F 01        clr	1,X
    8312 20 3C        bra	0x8350
    8314 3F 40        clr	*__r0
    8316 E6 01        ldA	1,X
    8318 AB 00        add	#0
    831A B7 41        stA	*__r1
    831C B6 40        ldA	*__r0
    831E A9 80        adc	#-128
    8320 B7 40        stA	*__r0
    8322 55 40        ldHX	*__r0
    8324 F6           ldA	0,X
    8325 95           tSX	
    8326 E7 02        stA	2,X
    8328 26 05        bne	0x832F
    832A A6 FF        ldA	#-1
    832C F7           stA	0,X
    832D 20 23        bra	0x8352
    832F E6 02        ldA	2,X
    8331 E1 05        cmp	5,X
    8333 26 15        bne	0x834A
    8335 3F 40        clr	*__r0
    8337 E6 01        ldA	1,X
    8339 AB 01        add	#1
    833B B7 41        stA	*__r1
    833D B6 40        ldA	*__r0
    833F A9 80        adc	#-128
    8341 B7 40        stA	*__r0
    8343 55 40        ldHX	*__r0
    8345 F6           ldA	0,X
    8346 95           tSX	
    8347 F7           stA	0,X
    8348 20 08        bra	0x8352
    834A E6 01        ldA	1,X
    834C AB 02        add	#2
    834E E7 01        stA	1,X
    8350 20 C2        bra	0x8314
    8352 F6           ldA	0,X
    8353 A7 03        aiS	#3
    8355 81           rts	
chng_sign:
    8356 4F           clrA	
    8357 E0 03        sub	3,X
    8359 E7 03        stA	3,X
    835B 4F           clrA	
    835C E2 02        sbc	2,X
    835E E7 02        stA	2,X
    8360 4F           clrA	
    8361 E2 01        sbc	1,X
    8363 E7 01        stA	1,X
    8365 4F           clrA	
    8366 E2 00        sbc	0,X
    8368 E7 00        stA	0,X
    836A 81           rts	
__divmod32s:
__divmods_32X32_32:
    836B 89           pshX	
    836C 8B           pshH	
    836D A7 F7        aiS	#-9
    836F 95           tSX	
    8370 6F 08        clr	8,X
    8372 E6 14        ldA	20,X
    8374 E7 07        stA	7,X
    8376 E6 13        ldA	19,X
    8378 E7 06        stA	6,X
    837A E6 12        ldA	18,X
    837C E7 05        stA	5,X
    837E E6 11        ldA	17,X
    8380 E7 04        stA	4,X
    8382 2A 09        bpl	0x838D
    8384 A6 03        ldA	#3
    8386 E7 08        stA	8,X
    8388 AF 04        aiX	#4
    838A AD CA        bsr	0x8356
    838C 95           tSX	
    838D E6 10        ldA	16,X
    838F E7 03        stA	3,X
    8391 E6 0F        ldA	15,X
    8393 E7 02        stA	2,X
    8395 E6 0E        ldA	14,X
    8397 E7 01        stA	1,X
    8399 E6 0D        ldA	13,X
    839B E7 00        stA	0,X
    839D 2A 0A        bpl	0x83A9
    839F A6 02        ldA	#2
    83A1 E8 08        eor	8,X
    83A3 E7 08        stA	8,X
    83A5 AF 00        aiX	#0
    83A7 AD AD        bsr	0x8356
    83A9 AD 3D        bsr	0x83E8
    83AB 95           tSX	
    83AC E6 07        ldA	7,X
    83AE E7 14        stA	20,X
    83B0 E6 06        ldA	6,X
    83B2 E7 13        stA	19,X
    83B4 E6 05        ldA	5,X
    83B6 E7 12        stA	18,X
    83B8 E6 04        ldA	4,X
    83BA E7 11        stA	17,X
    83BC E6 03        ldA	3,X
    83BE E7 10        stA	16,X
    83C0 E6 02        ldA	2,X
    83C2 E7 0F        stA	15,X
    83C4 E6 01        ldA	1,X
    83C6 E7 0E        stA	14,X
    83C8 E6 00        ldA	0,X
    83CA E7 0D        stA	13,X
    83CC E6 08        ldA	8,X
    83CE A5 02        bit	#2
    83D0 27 06        beq	0x83D8
    83D2 AF 11        aiX	#17
    83D4 CD 8356      jsr	chng_sign
    83D7 95           tSX	
    83D8 E6 08        ldA	8,X
    83DA A5 01        bit	#1
    83DC 27 05        beq	0x83E3
    83DE AF 0D        aiX	#13
    83E0 CD 8356      jsr	chng_sign
    83E3 A7 09        aiS	#9
    83E5 8A           pulH	
    83E6 88           pulX	
    83E7 81           rts	
__divmodu_32X32_32:
__divmod32u:
    83E8 89           pshX	
    83E9 8B           pshH	
    83EA A7 FB        aiS	#-5
    83EC 95           tSX	
    83ED 6F 01        clr	1,X
    83EF 6F 02        clr	2,X
    83F1 6F 03        clr	3,X
    83F3 6F 04        clr	4,X
    83F5 A6 20        ldA	#32
    83F7 E7 00        stA	0,X
    83F9 68 10        lsl	16,X
    83FB 69 0F        rol	15,X
    83FD 69 0E        rol	14,X
    83FF 69 0D        rol	13,X
    8401 69 04        rol	4,X
    8403 69 03        rol	3,X
    8405 69 02        rol	2,X
    8407 69 01        rol	1,X
    8409 24 1A        bcc	0x8425
    840B E6 04        ldA	4,X
    840D EB 0C        add	12,X
    840F E7 04        stA	4,X
    8411 E6 03        ldA	3,X
    8413 E9 0B        adc	11,X
    8415 E7 03        stA	3,X
    8417 E6 02        ldA	2,X
    8419 E9 0A        adc	10,X
    841B E7 02        stA	2,X
    841D E6 01        ldA	1,X
    841F E9 09        adc	9,X
    8421 E7 01        stA	1,X
    8423 20 18        bra	0x843D
    8425 E6 04        ldA	4,X
    8427 E0 0C        sub	12,X
    8429 E7 04        stA	4,X
    842B E6 03        ldA	3,X
    842D E2 0B        sbc	11,X
    842F E7 03        stA	3,X
    8431 E6 02        ldA	2,X
    8433 E2 0A        sbc	10,X
    8435 E7 02        stA	2,X
    8437 E6 01        ldA	1,X
    8439 E2 09        sbc	9,X
    843B E7 01        stA	1,X
    843D 2B 06        bmi	0x8445
    843F A6 01        ldA	#1
    8441 EA 10        orA	16,X
    8443 E7 10        stA	16,X
    8445 6A 00        dec	0,X
    8447 26 B0        bne	0x83F9
    8449 6D 01        tst	1,X
    844B 2A 18        bpl	0x8465
    844D E6 04        ldA	4,X
    844F EB 0C        add	12,X
    8451 E7 04        stA	4,X
    8453 E6 03        ldA	3,X
    8455 E9 0B        adc	11,X
    8457 E7 03        stA	3,X
    8459 E6 02        ldA	2,X
    845B E9 0A        adc	10,X
    845D E7 02        stA	2,X
    845F E6 01        ldA	1,X
    8461 E9 09        adc	9,X
    8463 E7 01        stA	1,X
    8465 E6 01        ldA	1,X
    8467 E7 09        stA	9,X
    8469 E6 02        ldA	2,X
    846B E7 0A        stA	10,X
    846D E6 03        ldA	3,X
    846F E7 0B        stA	11,X
    8471 E6 04        ldA	4,X
    8473 E7 0C        stA	12,X
    8475 A7 05        aiS	#5
    8477 8A           pulH	
    8478 88           pulX	
    8479 81           rts	

⌨️ 快捷键说明

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