Technical information
Micro-KIM Users Manual
©
'
CARD # LOC CODE CARD
814 1D8D 20 91 1F JSR CHK COMPUTE CHKSUM
815 1D90 20 63 1F JSR INCPT INCREMENT POINT
816 1D93 CA DEX
817 1D94 D0 F0 BNE DUMP2
818 ;
819 1D96 A5 F6 LDA CHKHI PRINT CHKSUM
820 1D98 20 3B 1E JSR PRTBYT
821 1D9B A5 F7 LDA CHKSUM
822 1D9D 20 3B 1E JSR PRTBYT
823 1DA0 E6 F8 INC INL INCR RECORD COUNT
824 1DA2 D0 02 BNE DUMP3
825 1DA4 E6 F9 INC INH
826 1DA6 4C 48 1D DUMP3 JMP DUMP0
827 ;
828 1DA9 20 CC 1F SPACE JSR OPEN OPEN NEW CELL
829 1DAC 20 2F 1E SHOW JSR CRLF PRINT CR LF
830 1DAF 20 1E 1E SHOW1 JSR PRTPNT
831 1DB2 20 9E 1E JSR OUTSP PRINT SPACE
832 1DB5 A0 00 LDY #$00 PRINT DATA SPECIFIED
833 1DB7 B1 FA LDA (POINTL),Y BY POINT AD=LDA EXT
834 1DB9 20 3B 1E JSR PRTBYT
835 1DBC 20 9E 1E JSR OUTSP PRINT SPACE
836 1DBF 4C 64 1C JMP CLEAR
837 ;
838 1DC2 20 63 1F RTRN JSR INCPT OPEN NEXT CELL
839 1DC5 4C AC 1D JMP SHOW
840 ;
841 1DC8 A6 F2 GOEXEC LDX SPUSER
842 1DCA 9A TXS
843 1DCB A5 FB LDA POINTH PROGRAM RUNS FROM
844 1DCD 48 PHA OPEN CELL ADDRESS
845 1DCE A5 FA LDA POINTL
846 1DD0 48 PHA
847 1DD1 A5 F1 LDA PREG
848 1DD3 48 PHA
849 1DD4 A6 F5 LDX XREG RESTORE REGS
850 1DD6 A4 F4 LDY YREG
851 1DD8 A5 F3 LDA ACC
852 1DDA 40 RTI
853 ;
854 1DDB C9 20 SCAN CMP #$20 OPEN CELL
855 1DDD F0 CA BEQ SPACE
856 1DDF C9 7F CMP #$7F RUB OUT (KIM)
857 1DE1 F0 1B BEQ STV
858 1DE3 C9 0D CMP #$0D NEXT CELL
859 1DE5 F0 DB BEQ RTRN
860 1DE7 C9 0A CMP #$0A PREV CELL
861 1DE9 F0 1C BEQ FEED
862 1DEB C9 2E CMP #'. MODIFY CELL
863 1DED F0 26 BEQ MODIFY
864 1DEF C9 47 CMP #'G GO EXEC
865 1DF1 F0 D5 BEQ GOEXEC
866 1DF3 C9 51 CMP #'Q DUMP FROM OPEN CELL TO HI LIMIT
867 1DF5 F0 0A BEQ DUMPV
868 1DF7 C9 4C CMP #'L LOAD TAPE
869 1DF9 F0 09 BEQ LOADV
870 1DFB 4C 6A 1C JMP READ IGNORE ILLEGAL CHAR
871 ;