📄 av_2717_015.lst
字号:
931 0024B 1652 JMP KEY_IN
932
933 0024C 01EB DEC STATIC_TIME ;静态显示3S
934 0024D 0B15 BS FLAG1,STATIC_FLAG
935 0024E 1804 MOV A,@0X04
936 0024F 0060 MOV SPEED_M_DUTY,A
937 00250 1801 MOV A,@0X01
938 00251 0062 MOV SPEED_G_DUTY,A
939
940 ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&E
941 ;按键扫描，矩阵式按键
942
943 00252 KEY_IN: ;key_scan
944 00252 18F8 MOV A,@0XF8
945 00253 0006 IOW P6CR
946
947 00254 P50_TEST:
948 00254 180E MOV A,@0X0E
949 00255 0045 MOV PORT5,A
950 00256 121B CALL DELAY ;延时等待稳定
951
952 00257 UP1_TEST: ;up_key(P63为UP键）
953 00257 0000 NOP
954 00258 0000 NOP
955 00259 0F46 JBS PORT6,5
956 0025A 1664 JMP UP1_ON
957
958 0025B UP1_OFF:
959 0025B 0E13 JBS KEY_FLAG,UP1_FLAG
960 0025C 165F JMP UP1_OFF1
961 0025D 0813 BC KEY_FLAG,UP1_FLAG
962 0025E 167C JMP DOWN1_TEST
963
964 0025F UP1_OFF1:
965 0025F 0E14 JBS KEY_STATE,UP1_STATE
966 00260 167C JMP DOWN1_TEST
967 00261 0814 BC KEY_STATE,UP1_STATE
968 00262 0953 BC KEY_FLAG,UP1_STATIC
969 00263 167C JMP DOWN1_TEST
970
971 00264 UP1_ON:
972 00264 0C13 JBC KEY_FLAG,UP1_FLAG
973 00265 1668 JMP UP1_ON1
974 00266 0A13 BS KEY_FLAG,UP1_FLAG
975 00267 170C JMP KEY_EXIT
976
977 00268 UP1_ON1:
978 00268 0C14 JBC KEY_STATE,UP1_STATE
979 00269 1677 JMP UP1_DO_LONG
980 0026A 0A14 BS KEY_STATE,UP1_STATE
981
982 0026B UP1_DO:
983 0026B 0D53 JBC KEY_FLAG,UP1_STATIC
984 0026C 1670 JMP $+4
985
986 0026D 18FA MOV A,@0XFA
987 0026E 006B MOV STATIC_TIME,A
988 0026F 0B53 BS KEY_FLAG,UP1_STATIC
989
990 00270 1832 MOV A,@0X32
991 00271 006A MOV KEY_TIME,A
992 00272 1804 MOV A,@0X04
993 00273 0121 SUB A,SPEED_G
994 00274 0E03 JBS STATUS,C
995 00275 0561 INC SPEED_G
996 00276 170C JMP KEY_EXIT
997
998 00277 UP1_DO_LONG:
999 00277 01EA DEC KEY_TIME
1000 00278 046A MOV KEY_TIME,KEY_TIME
1001 00279 0C83 JBC STATUS,Z
1002 0027A 0814 BC KEY_STATE,UP1_STATE
1003 0027B 170C JMP KEY_EXIT
1004 ;---------------------------------------------------------
1005 0027C DOWN1_TEST:
1006 0027C 0000 NOP
1007 0027D 0000 NOP ;up_key(P63为UP键）
1008 0027E 0F06 JBS PORT6,4
1009 0027F 1689 JMP DOWN1_ON
1010
1011 00280 DOWN1_OFF:
1012 00280 0E53 JBS KEY_FLAG,DOWN1_FLAG
1013 00281 1684 JMP DOWN1_OFF1
1014 00282 0853 BC KEY_FLAG,DOWN1_FLAG
1015 00283 16A0 JMP P51_TEST
1016
1017 00284 DOWN1_OFF1:
1018 00284 0E54 JBS KEY_STATE,DOWN1_STATE
1019 00285 16A0 JMP P51_TEST
1020 00286 0854 BC KEY_STATE,DOWN1_STATE
1021 00287 0993 BC KEY_FLAG,DOWN1_STATIC
1022 00288 16A0 JMP P51_TEST
1023
1024 00289 DOWN1_ON:
1025 00289 0C53 JBC KEY_FLAG,DOWN1_FLAG
1026 0028A 168D JMP DOWN1_ON1
1027 0028B 0A53 BS KEY_FLAG,DOWN1_FLAG
1028 0028C 170C JMP KEY_EXIT
1029
1030 0028D DOWN1_ON1:
1031 0028D 0C54 JBC KEY_STATE,DOWN1_STATE
1032 0028E 169B JMP DOWN1_DO_LONG
1033 0028F 0A54 BS KEY_STATE,DOWN1_STATE
1034
1035 00290 DOWN1_DO:
1036 00290 0D93 JBC KEY_FLAG,DOWN1_STATIC
1037 00291 1695 JMP $+4
1038
1039 00292 18FA MOV A,@0XFA
1040 00293 006B MOV STATIC_TIME,A
1041 00294 0B93 BS KEY_FLAG,DOWN1_STATIC
1042
1043 00295 1832 MOV A,@0X32
1044 00296 006A MOV KEY_TIME,A
1045 00297 0461 MOV SPEED_G,SPEED_G
1046 00298 0E83 JBS STATUS,Z
1047 00299 01E1 DEC SPEED_G ;不为0减1
1048 0029A 170C JMP KEY_EXIT
1049
1050 0029B DOWN1_DO_LONG:
1051 0029B 01EA DEC KEY_TIME
1052 0029C 046A MOV KEY_TIME,KEY_TIME
1053 0029D 0C83 JBC STATUS,Z
1054 0029E 0854 BC KEY_STATE,DOWN1_STATE
1055 0029F 170C JMP KEY_EXIT
1056 ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
1057 002A0 P51_TEST:
1058 002A0 180D MOV A,@0X0D
1059 002A1 0045 MOV PORT5,A
1060 002A2 121B CALL DELAY
1061
1062 002A3 UP2_TEST: ;up_key(P63为UP键）
1063 002A3 0F46 JBS PORT6,5
1064 002A4 16AE JMP UP2_ON
1065
1066 002A5 UP2_OFF:
1067 002A5 0E93 JBS KEY_FLAG,UP2_FLAG
1068 002A6 16A9 JMP UP2_OFF1
1069 002A7 0893 BC KEY_FLAG,UP2_FLAG
1070 002A8 16C6 JMP DOWN2_TEST
1071
1072 002A9 UP2_OFF1:
1073 002A9 0E94 JBS KEY_STATE,UP2_STATE
1074 002AA 16C6 JMP DOWN2_TEST
1075 002AB 0894 BC KEY_STATE,UP2_STATE
1076 002AC 09D3 BC KEY_FLAG,UP2_STATIC
1077 002AD 16C6 JMP DOWN2_TEST
1078
1079 002AE UP2_ON:
1080 002AE 0C93 JBC KEY_FLAG,UP2_FLAG
1081 002AF 16B2 JMP UP2_ON1
1082 002B0 0A93 BS KEY_FLAG,UP2_FLAG
1083 002B1 170C JMP KEY_EXIT
1084
1085 002B2 UP2_ON1:
1086 002B2 0C94 JBC KEY_STATE,UP2_STATE
1087 002B3 16C1 JMP UP2_DO_LONG
1088 002B4 0A94 BS KEY_STATE,UP2_STATE
1089
1090 002B5 UP2_DO:
1091 002B5 0DD3 JBC KEY_FLAG,UP2_STATIC
1092 002B6 16BA JMP $+4
1093
1094 002B7 18FA MOV A,@0XFA
1095 002B8 006B MOV STATIC_TIME,A
1096 002B9 0BD3 BS KEY_FLAG,UP2_STATIC
1097
1098 002BA 1832 MOV A,@0X32
1099 002BB 006A MOV KEY_TIME,A
1100 002BC 1804 MOV A,@0X04
1101 002BD 011F SUB A,SPEED_M
1102 002BE 0E03 JBS STATUS,C
1103 002BF 055F INC SPEED_M
1104 002C0 170C JMP KEY_EXIT
1105
1106 002C1 UP2_DO_LONG:
1107 002C1 01EA DEC KEY_TIME
1108 002C2 046A MOV KEY_TIME,KEY_TIME
1109 002C3 0C83 JBC STATUS,Z
1110 002C4 0894 BC KEY_STATE,UP2_STATE
1111 002C5 170C JMP KEY_EXIT
1112
1113 ;---------------------------------------------------------
1114 002C6 DOWN2_TEST: ;up_key(P63为UP键）
1115 002C6 0F06 JBS PORT6,4
1116 002C7 16D1 JMP DOWN2_ON
1117
1118 002C8 DOWN2_OFF:
1119 002C8 0ED3 JBS KEY_FLAG,DOWN2_FLAG
1120 002C9 16CC JMP DOWN2_OFF1
1121 002CA 08D3 BC KEY_FLAG,DOWN2_FLAG
1122 002CB 16E8 JMP P52_TEST
1123
1124 002CC DOWN2_OFF1:
1125 002CC 0ED4 JBS KEY_STATE,DOWN2_STATE
1126 002CD 16E8 JMP P52_TEST
1127 002CE 08D4 BC KEY_STATE,DOWN2_STATE
1128 002CF 0954 BC KEY_STATE,DOWN2_STATIC
1129 002D0 16E8 JMP P52_TEST
1130
1131 002D1 DOWN2_ON:
1132 002D1 0CD3 JBC KEY_FLAG,DOWN2_FLAG
1133 002D2 16D5 JMP DOWN2_ON1
1134 002D3 0AD3 BS KEY_FLAG,DOWN2_FLAG
1135 002D4 170C JMP KEY_EXIT
1136
1137 002D5 DOWN2_ON1:
1138 002D5 0CD4 JBC KEY_STATE,DOWN2_STATE
1139 002D6 16E3 JMP DOWN2_DO_LONG
1140 002D7 0AD4 BS KEY_STATE,DOWN2_STATE
1141
1142 002D8 DOWN2_DO:
1143 002D8 0D54 JBC KEY_STATE,DOWN2_STATIC
1144 002D9 16DD JMP $+4
1145
1146 002DA 18FA MOV A,@0XFA
1147 002DB 006B MOV STATIC_TIME,A
1148 002DC 0B54 BS KEY_STATE,DOWN2_STATIC
1149
1150 002DD 1832 MOV A,@0X32
1151 002DE 006A MOV KEY_TIME,A
1152 002DF 045F MOV SPEED_M,SPEED_M
1153 002E0 0E83 JBS STATUS,Z
1154 002E1 01DF DEC SPEED_M ;不为0减1
1155 002E2 170C JMP KEY_EXIT
1156
1157 002E3 DOWN2_DO_LONG:
1158 002E3 01EA DEC KEY_TIME
1159 002E4 046A MOV KEY_TIME,KEY_TIME
1160 002E5 0C83 JBC STATUS,Z
1161 002E6 08D4 BC KEY_STATE,DOWN2_STATE
1162 002E7 170C JMP KEY_EXIT
1163
1164 ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
1165 002E8 P52_TEST:
1166 002E8 180B MOV A,@0X0B
1167 002E9 0045 MOV PORT5,A
1168 002EA 121B CALL DELAY
1169
1170 002EB F1_TEST:
1171 002EB 0F46 JBS PORT6,5
1172 002EC 16F6 JMP F1_ON
1173
1174 002ED F1_OFF:
1175 002ED 0F13 JBS KEY_FLAG,F1_FLAG
1176 002EE 16F1 JMP F1_OFF1
1177 002EF 0913 BC KEY_FLAG,F1_FLAG
1178 002F0 170C JMP KEY_EXIT
1179
1180 002F1 F1_OFF1:
1181 002F1 0F14 JBS KEY_STATE,F1_STATE
1182 002F2 170C JMP KEY_EXIT
1183 002F3 0914 BC KEY_STATE,F1_STATE
1184 002F4 0994 BC KEY_STATE,F1_STATIC
1185 002F5 170C JMP KEY_EXIT
1186
1187 002F6 F1_ON:
1188 002F6 0D13 JBC KEY_FLAG,F1_FLAG
1189 002F7 16FA JMP F1_ON1
1190 002F8 0B13 BS KEY_FLAG,F1_FLAG
1191 002F9 170C JMP KEY_EXIT
1192
1193 002FA F1_ON1:
1194 002FA 0D14 JBC KEY_STATE,F1_STATE
1195 002FB 170B JMP F1_DO_LONG
1196 002FC 0B14 BS KEY_STATE,F1_STATE
1197
1198 002FD F1_DO:
1199 002FD 0D94 JBC KEY_STATE,F1_STATIC
1200 002FE 1702 JMP $+4
1201
1202 002FF 18FA MOV A,@0XFA
1203 00300 006B MOV STATIC_TIME,A
1204 00301 0B94 BS KEY_STATE,F1_STATIC
1205
1206 00302 08D5 BC FLAG1,MODE_DO_FLAG
1207 00303 0564 INC MODE
1208 00304 1804 MOV A,@0X04
1209 00305 0124 SUB A,MODE
1210 00306 0E03 JBS STATUS,C
1211 00307 170A JMP $+3
1212
1213 00308 1801 MOV A,@0X01
1214 00309 0064 MOV MODE,A
1215
1216 0030A 170C JMP KEY_EXIT
1217
1218 0030B F1_DO_LONG:
1219 0030B 170C JMP KEY_EXIT
1220
1221 ;-----------------------------------------------------
1222 0030C KEY_EXIT:
1223 0030C 1838 MOV A,@0X38
1224 0030D 0006 IOW 0X06
1225
1226 ;&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
1227 ;退出中断（中断返回)
1228 0030E INT_EXIT:
1229 0030E 1800 MOV A,@0X00
1230 0030F 004F MOV RF,A
1231
1232 00310 INT_EXIT1:
1233 00310 0712 SWAPA R3_BUF
1234 00311 0043 MOV STATUS,A
1235 00312 0711 SWAPA ACC_BUF
1236 00313 0013 RETI
0 Error(s), 0 Warning(s), 0 User Message(s)⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -