📄 invaders.lst
字号:
0001D0 2217 00371 ADDWFC 23,F
0001D2 D015 00372 BRA CRC@LP3
00373 CRC@LP2 MOVFW 24
0001D6 5C19 00374 SUBWF 25,W
0001D8 6E22 00375 MOVWF 34
0001DA 0E00 00376 MOVLW 0
0001DC 6A23 00377 CLRF 35
0001DE 5A23 00378 SUBWFB 35,F
0001E0 90D8 00379 CLRC
00380 RLF 34,F
00381 RLF 35,F
0001E6 90D8 00382 CLRC
00383 RLF 34,F
00384 RLF 35,F
00385 MOVFW 34
0001EE 2616 00386 ADDWF 22,F
00387 MOVFW 35
0001F2 2217 00388 ADDWFC 23,F
0001F4 0E0A 00389 MOVLW 10
0001F6 2616 00390 ADDWF 22,F
0001F8 0E00 00391 MOVLW 0
0001FA 2217 00392 ADDWFC 23,F
0001FC 0618 00393 DECF 24,F
0001FE 2A19 00394 CRC@LP3 INCF 25,F
000200 D7D0 00395 BRA CRC@LP1
000202 EFC1 F002 00396 GOTO I@NT
000206 00397 PLOT@8
00398 MOVFW 5
000208 2418 00399 ADDWF 24,W
00020A 6E03 00400 MOVWF 3
00401 MOVFW 4
00020E 2419 00402 ADDWF 25,W
000210 D82E 00403 RCALL PLOT@IT
00404 MOVFW 5
000214 2418 00405 ADDWF 24,W
000216 6E03 00406 MOVWF 3
00407 MOVFW 25
00021A 5C04 00408 SUBWF 4,W
00021C D828 00409 RCALL PLOT@IT
00410 MOVFW 24
000220 5C05 00411 SUBWF 5,W
000222 6E03 00412 MOVWF 3
00413 MOVFW 4
000226 2419 00414 ADDWF 25,W
000228 D822 00415 RCALL PLOT@IT
00416 MOVFW 24
00022C 5C05 00417 SUBWF 5,W
00022E 6E03 00418 MOVWF 3
00419 MOVFW 25
000232 5C04 00420 SUBWF 4,W
000234 D81C 00421 RCALL PLOT@IT
00422 MOVFW 5
000238 2419 00423 ADDWF 25,W
00023A 6E03 00424 MOVWF 3
00425 MOVFW 4
00023E 2418 00426 ADDWF 24,W
000240 D816 00427 RCALL PLOT@IT
00428 MOVFW 5
000244 2419 00429 ADDWF 25,W
000246 6E03 00430 MOVWF 3
00431 MOVFW 24
00024A 5C04 00432 SUBWF 4,W
00024C EC37 F001 00433 CALL PLOT@IT
00434 MOVFW 25
000252 5C05 00435 SUBWF 5,W
000254 6E03 00436 MOVWF 3
00437 MOVFW 4
000258 2418 00438 ADDWF 24,W
00025A D809 00439 RCALL PLOT@IT
00440 MOVFW 25
00025E 5C05 00441 SUBWF 5,W
000260 6E03 00442 MOVWF 3
00443 MOVFW 24
000264 5C04 00444 SUBWF 4,W
000266 D003 00445 BRA PLOT@IT
000268 00446 LCD@PLOT
000268 8400 00447 BSF 0,2
00026A D001 00448 BRA $ + 4
00026C 00449 LCD@UNPLOT
00026C 9400 00450 BCF 0,2
00026E BEE8 00451 PLOT@IT BTFSC WREG,7
000270 D015 00452 BRA PLT@EXIT
000272 BC03 00453 BTFSC GEN,6
000274 D013 00454 BRA PLT@EXIT
000276 D85A 00455 RCALL SETUP@LCD
000278 D813 00456 RCALL GETBIT@POS
00027A 6A1F 00457 CLRF 31
00027C 2A03 00458 INCF 3,F
00027E 80D8 00459 SETC
000280 361F 00460 RLCF 31,F
000282 2E03 00461 DECFSZ 3,F
000284 D7FD 00462 BRA $ - 4
00463 MOVFW 31
000288 A400 00464 BTFSS 0,2
00028A D002 00465 BRA $ + 6
00028C 1020 00466 IORWF 32,W
00028E D002 00467 BRA $ + 6
000290 0AFF 00468 XORLW 255
000292 1420 00469 ANDWF 32,W
000294 9282 00470 BCF PORTC,1
000296 D876 00471 RCALL READ@STATUS
000298 8282 00472 BSF PORTC,1
00029A D86F 00473 RCALL TG@L
00029C EFC1 F002 00474 PLT@EXIT GOTO I@NT
0002A0 00475 GETBIT@POS
0002A0 6E21 00476 MOVWF 33
0002A2 D861 00477 RCALL CHECK@PAGE
0002A4 90D8 00478 CLRC
0002A6 3003 00479 RRCF 3,W
0002A8 6E1E 00480 MOVWF 30
0002AA 90D8 00481 CLRC
0002AC 321E 00482 RRCF 30,F
0002AE 90D8 00483 CLRC
0002B0 321E 00484 RRCF 30,F
0002B2 0E07 00485 MOVLW 7
0002B4 1603 00486 ANDWF 3,F
0002B6 0E3F 00487 MOVLW B'00111111'
0002B8 161E 00488 ANDWF 30,F
0002BA 0EB8 00489 MOVLW B'10111000'
0002BC 101E 00490 IORWF 30,W
0002BE D862 00491 RCALL READ@STATUS
0002C0 D85C 00492 RCALL TG@L
0002C2 0E3F 00493 MOVLW B'00111111'
0002C4 1621 00494 ANDWF 33,F
0002C6 0E40 00495 MOVLW B'01000000'
0002C8 1021 00496 IORWF 33,W
0002CA D85C 00497 RCALL READ@STATUS
0002CC D856 00498 RCALL TG@L
00499 MOVFW 33
0002D0 D017 00500 BRA READ@BYTE
0002D2 00501 GLCD@P
0002D2 D82C 00502 RCALL SETUP@LCD
0002D4 6E1E 00503 MOVWF 30
00504 MOVFW 10
0002D8 D846 00505 RCALL CHECK@PAGE
0002DA 0E3F 00506 MOVLW B'00111111'
0002DC D853 00507 RCALL READ@STATUS
0002DE D84D 00508 RCALL TG@L
0002E0 0EB8 00509 MOVLW B'10111000'
0002E2 1003 00510 IORWF 3,W
0002E4 D84F 00511 RCALL READ@STATUS
0002E6 D849 00512 RCALL TG@L
0002E8 0E40 00513 MOVLW B'01000000'
0002EA 100A 00514 IORWF 10,W
0002EC D84B 00515 RCALL READ@STATUS
0002EE D845 00516 RCALL TG@L
00517 MOVFW 30
0002F2 D848 00518 RCALL READ@STATUS
0002F4 8282 00519 BSF PORTC,1
0002F6 D841 00520 RCALL TG@L
0002F8 2A0A 00521 INCF 10,F
0002FA EFC1 F002 00522 GOTO I@NT
0002FE 00523 READBYTE@XPOS
00524 MOVFW _GLCD_XPOS
000300 00525 READ@BYTE
000300 6E21 00526 MOVWF 33
000302 D804 00527 RCALL READ@IT
000304 D803 00528 RCALL READ@IT
000306 8282 00529 BSF PORTC,1
00530 MOVFW 32
00030A 0012 00531 RETURN
00030C 00532 READ@IT
00030C D83B 00533 RCALL READ@STATUS
00030E 8282 00534 BSF PORTC,1
000310 8082 00535 BSF PORTC,0
000312 6895 00536 SETF PORTD + 18
000314 8084 00537 BSF PORTE,0
000316 0000 00538 NOP
00539 MOVFW PORTD
00031A 6E20 00540 MOVWF 32
00031C 9084 00541 BCF PORTE,0
00031E 6A95 00542 CLRF PORTD + 18
000320 9082 00543 BCF PORTC,0
000322 9282 00544 BCF PORTC,1
000324 0E40 00545 MOVLW B'01000000'
000326 1021 00546 IORWF 33,W
000328 D82D 00547 RCALL READ@STATUS
00032A D027 00548 BRA TG@L
00032C 00549 SETUP@LCD
00032C B200 00550 BTFSC 0,1
00032E D019 00551 BRA SKP@GCSIN
000330 6E21 00552 MOVWF 33
000332 9096 00553 BCF PORTE + 18,0
000334 9294 00554 BCF PORTC + 18,1
000336 9094 00555 BCF PORTC + 18,0
000338 9296 00556 BCF PORTE + 18,1
00033A 9496 00557 BCF PORTE + 18,2
00033C 6A95 00558 CLRF PORTD + 18
00033E 8200 00559 BSF 0,1
000340 9084 00560 BCF PORTE,0
000342 9082 00561 BCF PORTC,0
000344 9282 00562 BCF PORTC,1
000346 6A30 00563 CLRF _GLCD_XPOS
000348 0EB8 00564 MOVLW B'10111000'
00034A D81C 00565 RCALL READ@STATUS
00034C D816 00566 RCALL TG@L
00034E 0E40 00567 MOVLW B'01000000'
000350 D819 00568 RCALL READ@STATUS
000352 D813 00569 RCALL TG@L
000354 0EC0 00570 MOVLW B'11000000'
000356 D816 00571 RCALL READ@STATUS
000358 D810 00572 RCALL TG@L
00035A 0E3F 00573 MOVLW B'00111111'
00035C D813 00574 RCALL READ@STATUS
00035E D80D 00575 RCALL TG@L
00576 MOVFW 33
000362 00577 SKP@GCSIN
000362 9282 00578 BCF PORTC,1
000364 0012 00579 RETURN
000366 00580 CHECK@PAGE
000366 BCE8 00581 BTFSC WREG,6
000368 D004 00582 BRA EN@RIGHT
00036A 9284 00583 BCF PORTE,1
00036C 0000 00584 NOP
00036E 8484 00585 BSF PORTE,2
000370 0012 00586 RETURN
000372 00587 EN@RIGHT
000372 8284 00588 BSF PORTE,1
000374 0000 00589 NOP
000376 9484 00590 BCF PORTE,2
000378 0012 00591 RETURN
00037A 8084 00592 TG@L BSF PORTE,0
00037C 6E83 00593 MOVWF PORTD
00037E 0000 00594 NOP
000380 9084 00595 BCF PORTE,0
000382 0012 00596 RETURN
000384 00597 READ@STATUS
000384 8082 00598 BSF PORTC,0
000386 6895 00599 SETF PORTD + 18
000388 6A12 00600 CLRF 18
00038A 8084 00601 R@SLP1 BSF PORTE,0
00038C 0000 00602 NOP
00038E 9084 00603 BCF PORTE,0
000390 AE83 00604 BTFSS PORTD,7
000392 D002 00605 BRA $ + 6
000394 3E12 00606 INCFSZ 18,F
000396 D7F9 00607 BRA R@SLP1
000398 6A95 006⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -