comparison game09/game09.asm @ 72:3a2fb51afc4d

fix lv2 cmds
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 05 Aug 2018 23:01:58 +0900
parents eb9be32c701c
children ae26a881ac7a
comparison
equal deleted inserted replaced
71:eb9be32c701c 72:3a2fb51afc4d
875 BNE LC5F2 875 BNE LC5F2
876 STB <$8C 876 STB <$8C
877 LBRA LC5D8 877 LBRA LC5D8
878 LC63F 878 LC63F
879 FCB $D,$A 879 FCB $D,$A
880 FCS "*READY" 880 FCC "*READY"
881 FCB $D,$A,0 881 FCB $D,$A,0
882 882
883 LC64A LBRA OUTCH 883 LC64A LBRA OUTCH
884 LC64D LBRA GETCH 884 LC64D LBRA GETCH
885 LC650 LBRA SENSE 885 LC650 LBRA SENSE
965 CMPA #$22 965 CMPA #$22
966 BNE LC6F0 966 BNE LC6F0
967 LC6F8 CLRA 967 LC6F8 CLRA
968 RTS 968 RTS
969 969
970 GETCH LDA #0 970 OUTCH PSHS X,Y
971 PSHS B 971 BRA OUTCH1
972 GETCH
973 PSHS B,X,Y
974 GETCH0
975 LDA #0
972 LEAX ,S 976 LEAX ,S
973 LDY #1 977 LDY #1
974 OS9 I$Read 978 OS9 I$Read
975 PULS B 979 BCS GETCH0
976 BCS GETCH 980 PULS B,X,Y,PC
977 OUTCH PSHS B 981 OUTCH1 PSHS B
978 LEAX ,S 982 LEAX ,S
979 LDA #1 983 LDA #1
980 LDY #1 984 LDY #1
981 OS9 I$Write 985 OS9 I$Write
982 PULS B,PC 986 PULS B,X,Y,PC
983 SENSE LDA #0 987 SENSE PSHS X,Y
988 LDA #0
984 LDB #SS.Ready 989 LDB #SS.Ready
985 OS9 i$GetStt 990 OS9 i$GetStt
986 RTS 991 PULS X,Y,PC
987 992
988 993
989 994
990 * COMMAND TABLE CONSIST.... 995 * COMMAND TABLE CONSIST....
991 * COMMAND NAME (2 BYTE) 996 * COMMAND NAME (2 BYTE)