ZK-80 mini (PIC32MX1チップTK-80互換機)で2017年の書き初めをしてみた
あけましておめでとうございます。新春初プログラミングは8080アセンブラでした。
私はZK-80 miniで動かしましたが、TK-80でも動くと思います。
プログラムリストは以下の通りです。8000番地から実行してください。
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ZK-80 mini(TK-80 compatible) ;; Happy New Year 2007 PROGRAM ;; 2017/1/1 by @kanpapa ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ORG 8000H 8000: 01 30 80 START: LXI B,SDATA1 8003: 1E 17 MVI E,17H 8005: 21 F8 83 LOOP1: LXI H,83F8H 8008: 16 08 MVI D,08H 800A: C5 PUSH B 800B: 0A LOOP2: LDAX B 800C: 77 MOV M,A 800D: 23 INX H 800E: 03 INX B 800F: 15 DCR D 8010: C2 0B 80 JNZ LOOP2 8013: CD 1F 80 CALL WAIT 8016: C1 POP B 8017: 03 INX B 8018: 1D DCR E 8019: C2 05 80 JNZ LOOP1 801C: C3 00 80 JMP START ;; ;; WAIT ROUTINE 801F: C5 WAIT: PUSH B 8020: D5 PUSH D 8021: 16 FF MVI D,0FFH 8023: 06 00 WAIT2: MVI B,0 8025: 05 WAIT3: DCR B 8026: C2 25 80 JNZ WAIT3 8029: 15 DCR D 802A: C2 23 80 JNZ WAIT2 802D: D1 POP D 802E: C1 POP B 802F: C9 RET ;; SEGMENT DATA 8030: 00 00 76 77 73 73 6E 00 SDATA1: DB 0,0,76H,77H,73H,73H,6EH,0 ;; HAPPY 8038: 54 79 7E 00 6E 79 77 50 DB 54H,79H,7EH,0,6EH,79H,77H,50H ;; NEW YEAR 8040: 00 5B 5C 06 27 00 00 00 DB 0,5BH,5CH,06H,27H,0,0,0,0 ;; 2007 8049: 76 77 73 73 6E 00 DB 76H,77H,73H,73H,6EH,0 ;; HAPPY END