BIOSのSC-3000用入力ルーチンを改良しました。
[1][2][3][4][5][6][7][8][9][0][-][^]
[LEFT][DOWN][RIGHT][UP][z][x][c][v]
sc3k.lst
2000 ORG 2000H 2000 F5 A2000 PUSH AF 2001 3E02 LD A,02H 2003 32FFCF LD (0CFFFH),A 2006 F1 POP AF 2007 C9 RET 2008 FFFFFFFFFF DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH 2010 F5 A2010 PUSH AF 2011 C5 PUSH BC 2012 D5 PUSH DE 2013 1600 LD D,00H 2015 3E07 LD A,07H 2017 D3DE OUT (0DEH),A 2019 DBDC IN A,(0DCH) 201B 2F CPL 201C CB67 BIT 4,A 201E 2802 JR Z,F2SKIP 2020 1670 LD D,70H 2022 CB6F F2SKIP BIT 5,A 2024 2805 JR Z,F1SKIP 2026 3E70 LD A,70H 2028 C35421 JP TENKEY 202B 47 F1SKIP LD B,A 202C 4F LD C,A 202D CB10 RL B 202F CB19 RR C 2031 380C JR C,JOYPAD1 2033 CB19 RR C 2035 3E0C LD A,0CH 2037 A0 AND B 2038 47 LD B,A 2039 3E02 LD A,02H 203B A1 AND C 203C B0 OR B 203D 180C JR JOYPAD2 203F CB19 JOYPAD1 RR C 2041 3E4C LD A,4CH 2043 A0 AND B 2044 47 LD B,A 2045 3E02 LD A,02H 2047 A1 AND C 2048 B0 OR B 2049 F601 OR 01H 204B B2 JOYPAD2 OR D 204C 32EEC3 LD (0C3EEH),A 204F 3AFFCF LD A,(0CFFFH) 2052 32F0C3 LD (0C3F0H),A 2055 3E00 LD A,00H 2057 D3DE OUT (0DEH),A 2059 DBDC IN A,(0DCH) 205B 2F CPL 205C CB47 BIT 0,A 205E 2805 JR Z,KEYZ 2060 3E02 LD A,02H 2062 C35421 JP TENKEY 2065 CB5F KEYZ BIT 3,A 2067 280A JR Z,KEY8 2069 3E70 LD A,70H 206B 32EEC3 LD (0C3EEH),A 206E 3E00 LD A,00H 2070 C35421 JP TENKEY 2073 DBDD KEY8 IN A,(0DDH) 2075 2F CPL 2076 CB47 BIT 0,A 2078 2805 JR Z,KEY2 207A 3E0E LD A,0EH 207C C35421 JP TENKEY 207F 3E01 KEY2 LD A,01H 2081 D3DE OUT (0DEH),A 2083 DBDC IN A,(0DCH) 2085 2F CPL 2086 CB47 BIT 0,A 2088 2805 JR Z,KEYX 208A 3E08 LD A,08H 208C C35421 JP TENKEY 208F CB5F KEYX BIT 3,A 2091 2805 JR Z,KEY9 2093 3E70 LD A,70H 2095 C35421 JP TENKEY 2098 DBDD KEY9 IN A,(0DDH) 209A 2F CPL 209B CB47 BIT 0,A 209D 2805 JR Z,KEY3 209F 3E04 LD A,04H 20A1 C35421 JP TENKEY 20A4 3E02 KEY3 LD A,02H 20A6 D3DE OUT (0DEH),A 20A8 DBDC IN A,(0DCH) 20AA 2F CPL 20AB CB47 BIT 0,A 20AD 2805 JR Z,KEYC 20AF 3E03 LD A,03H 20B1 C35421 JP TENKEY 20B4 CB5F KEYC BIT 3,A 20B6 2805 JR Z,KEY0 20B8 3E07 LD A,07H 20BA C35421 JP TENKEY 20BD DBDD KEY0 IN A,(0DDH) 20BF 2F CPL 20C0 CB47 BIT 0,A 20C2 2805 JR Z,KEY4 20C4 3E05 LD A,05H 20C6 C35421 JP TENKEY 20C9 3E03 KEY4 LD A,03H 20CB D3DE OUT (0DEH),A 20CD DBDC IN A,(0DCH) 20CF 2F CPL 20D0 CB47 BIT 0,A 20D2 2805 JR Z,KEYV 20D4 3E0D LD A,0DH 20D6 C35421 JP TENKEY 20D9 CB5F KEYV BIT 3,A 20DB 2805 JR Z,KEYA 20DD 3E0B LD A,0BH 20DF C35421 JP TENKEY 20E2 DBDD KEYA IN A,(0DDH) 20E4 2F CPL 20E5 CB47 BIT 0,A 20E7 2805 JR Z,KEY5 20E9 3E06 LD A,06H 20EB C35421 JP TENKEY 20EE 3E04 KEY5 LD A,04H 20F0 D3DE OUT (0DEH),A 20F2 DBDC IN A,(0DCH) 20F4 2F CPL 20F5 CB47 BIT 0,A 20F7 2805 JR Z,KEYD 20F9 3E0C LD A,0CH 20FB C35421 JP TENKEY 20FE CB6F KEYD BIT 5,A 2100 2805 JR Z,KEYS 2102 3E04 LD A,04H 2104 32EEC3 LD (0C3EEH),A 2107 DBDD KEYS IN A,(0DDH) 2109 2F CPL 210A CB47 BIT 0,A 210C 2805 JR Z,KEY6 210E 3E09 LD A,09H 2110 C35421 JP TENKEY 2113 3E05 KEY6 LD A,05H 2115 D3DE OUT (0DEH),A 2117 DBDC IN A,(0DCH) 2119 2F CPL 211A CB47 BIT 0,A 211C 2805 JR Z,KEYL 211E 3E01 LD A,01H 2120 C35421 JP TENKEY 2123 CB6F KEYL BIT 5,A 2125 2805 JR Z,KEY7 2127 3E08 LD A,08H 2129 32EEC3 LD (0C3EEH),A 212C 3E06 KEY7 LD A,06H 212E D3DE OUT (0DEH),A 2130 DBDC IN A,(0DCH) 2132 2F CPL 2133 CB47 BIT 0,A 2135 2805 JR Z,KEYR 2137 3E0A LD A,0AH 2139 C35421 JP TENKEY 213C CB6F KEYR BIT 5,A 213E 2808 JR Z,KEYU 2140 3E02 LD A,02H 2142 32EEC3 LD (0C3EEH),A 2145 C35C21 JP NOKEY 2148 CB77 KEYU BIT 6,A 214A 2810 JR Z,NOKEY 214C 3E01 LD A,01H 214E 32EEC3 LD (0C3EEH),A 2151 C35C21 JP NOKEY 2154 32F0C3 TENKEY LD (0C3F0H),A 2157 3E00 LD A,00H 2159 32FFCF LD (0CFFFH),A 215C DBBF NOKEY IN A,(0BFH) 215E D1 POP DE 215F C1 POP BC 2160 F1 POP AF 2161 FB EI 2162 C9 RET 2163 END 0 Total Error(s) A2000 2000 A2010 2010 END 2163 F1SKIP 202B F2SKIP 2022 JOYPAD1 203F JOYPAD2 204B KEY0 20BD KEY2 207F KEY3 20A4 KEY4 20C9 KEY5 20EE KEY6 2113 KEY7 212C KEY8 2073 KEY9 2098 KEYA 20E2 KEYC 20B4 KEYD 20FE KEYL 2123 KEYR 213C KEYS 2107 KEYU 2148 KEYV 20D9 KEYX 208F KEYZ 2065 NOKEY 215C TENKEY 2154
