doorc.dbg

该程序是医院用的CPCR记录仪的终端控制程序

BLOCK 1061 4068
DEFLOCAL flag3 1 c
DEFREG d2 10 c
DEFREG d1 12 c
DEFREG ss1 14 c
DEFLOCAL j 0 c
DEFREG ss0 22 c
DEFREG i 20 i
LINE 1061 4068
LINE 1063 4068
LINE 1063 406C
LINE 1065 406E
LINE 1067 407C
LINE 1068 407C
LINE 1069 408E
LINE 1070 4092
LINE 1071 4098
LINE 1072 409E
LINE 1073 409E
LINE 1073 40A4
LINE 1073 40A4
LINE 1073 40A8
LINE 1074 40B0
LINE 1075 40B6
LINE 1076 40BA
LINE 1078 40BC
LINE 1079 40BC
LINE 1080 40C2
LINE 1081 40C2
LINE 1082 40C4
LINE 1083 40CA
LINE 1085 40CC
LINE 1086 40CC
LINE 1087 40D2
LINE 1088 40D2
LINE 1089 40D8
LINE 1090 40DE
LINE 1091 40E4
LINE 1092 40F0
LINE 1093 40F6
LINE 1093 40F6
LINE 1093 40F6
LINE 1093 40F6
LINE 1094 40FE
LINE 1095 4104
LINE 1097 4106
LINE 1098 4106
LINE 1099 410C
LINE 1100 4112
LINE 1101 4118
LINE 1102 4124
LINE 1102 4124
LINE 1102 4124
LINE 1102 4124
LINE 1103 412C
LINE 1104 4132
LINE 1105 4132
LINE 1106 4132
LINE 1108 4134
LINE 1109 4134
LINE 1110 4136
LINE 1111 413C
LINE 1112 413C
LINE 1113 4142
LINE 1115 4144
LINE 1116 4144
LINE 1117 414A
LINE 1118 4156
LINE 1118 4156
LINE 1118 4156
LINE 1118 4156
LINE 1119 415E
LINE 1120 4164
LINE 1121 4164
LINE 1123 4166
LINE 1124 4166
LINE 1125 416C
LINE 1126 4178
LINE 1126 4178
LINE 1126 4178
LINE 1126 4178
LINE 1127 4180
LINE 1128 4186
LINE 1129 4186
LINE 1130 4186
LINE 1131 4186
LINE 1132 4186
LINE 1066 4186
LINE 1133 418E
LINE 1134 419A
LINE 1134 419E
LINE 1135 41A4
BLOCKEND 0 41AC
FUNCEND 41AC
FUNC u_week 41AE fc
BLOCK 1138 41B2
DEFREG w1 20 c
DEFREG j 22 c
DEFREG ss1 10 c
DEFREG ss0 12 c
DEFREG i 14 i
LINE 1138 41B2
LINE 1140 41B2
LINE 1141 41B4
LINE 1143 41C2
LINE 1144 41C2
LINE 1145 41D4
LINE 1146 41D8
LINE 1147 41DE
LINE 1148 41E2
LINE 1149 41E2
LINE 1149 41E8
LINE 1149 41E8
LINE 1149 41EE
LINE 1150 41F8
LINE 1151 41FE
LINE 1152 4202
LINE 1154 4204
LINE 1155 4204
LINE 1156 4206
LINE 1157 4210
LINE 1159 4212
LINE 1160 4212
LINE 1161 4218
LINE 1162 421E
LINE 1163 4224
LINE 1164 4230
LINE 1164 4230
LINE 1164 4230
LINE 1164 4230
LINE 1165 4238
LINE 1166 423A
LINE 1167 423A
LINE 1168 423A
LINE 1169 423A
LINE 1142 423A
LINE 1170 4240
LINE 1171 4244
BLOCKEND 0 424A
FUNCEND 424A
FUNC u_hour 424C fc
BLOCK 1174 4252
DEFLOCAL flag2 1 c
DEFREG h2 22 c
DEFREG h1 10 c
DEFREG ss1 12 c
DEFLOCAL j 0 c
DEFREG ss0 14 c
DEFREG i 20 i
LINE 1174 4252
LINE 1176 4252
LINE 1176 4256
LINE 1178 4258
LINE 1180 4266
LINE 1181 4266
LINE 1182 4278
LINE 1183 427C
LINE 1184 4282
LINE 1185 4288
LINE 1186 4288
LINE 1186 428E
LINE 1186 428E
LINE 1186 4292
LINE 1187 429A
LINE 1188 42A0
LINE 1189 42A4
LINE 1191 42A6
LINE 1192 42A6
LINE 1193 42AC
LINE 1194 42AC
LINE 1195 42AE
LINE 1196 42B4
LINE 1198 42B6
LINE 1199 42B6
LINE 1200 42BC
LINE 1201 42BC
LINE 1202 42C2
LINE 1203 42C8
LINE 1204 42CE
LINE 1205 42DA
LINE 1206 42E0
LINE 1206 42E0
LINE 1206 42E0
LINE 1206 42E0
LINE 1207 42E8
LINE 1208 42EE
LINE 1210 42F0
LINE 1211 42F0
LINE 1212 42F6
LINE 1213 42FC
LINE 1214 4302
LINE 1215 430E
LINE 1215 430E
LINE 1215 430E
LINE 1215 430E
LINE 1216 4316
LINE 1217 431C
LINE 1218 431C
LINE 1219 431C
LINE 1221 431E
LINE 1222 431E
LINE 1223 4320
LINE 1224 4326
LINE 1225 4326
LINE 1226 432C
LINE 1228 432E
LINE 1229 432E
LINE 1230 4334
LINE 1231 4340
LINE 1231 4340
LINE 1231 4340
LINE 1231 4340
LINE 1232 4348
LINE 1233 434E
LINE 1234 434E
LINE 1236 4350
LINE 1237 4350
LINE 1238 4356
LINE 1239 4362
LINE 1239 4362
LINE 1239 4362
LINE 1239 4362
LINE 1240 436A
LINE 1241 4370
LINE 1242 4370
LINE 1243 4370
LINE 1244 4370
LINE 1245 4370
LINE 1179 4370
LINE 1246 4378
LINE 1247 4384
BLOCKEND 0 438C
FUNCEND 438C
FUNC u_minute 438E fc
BLOCK 1251 4394
DEFREG mu2 20 c
DEFREG mu1 22 c
DEFREG ss1 10 c
DEFLOCAL j 0 c
DEFREG ss0 14 c
DEFREG i 12 i
LINE 1251 4394
LINE 1253 4394
LINE 1255 4398
LINE 1257 43A6
LINE 1258 43A6
LINE 1259 43B8
LINE 1260 43BC
LINE 1261 43C2
LINE 1262 43C8
LINE 1263 43C8
LINE 1263 43CE
LINE 1263 43CE
LINE 1263 43D4
LINE 1264 43DE
LINE 1265 43E4
LINE 1266 43E8
LINE 1268 43EA
LINE 1269 43EA
LINE 1270 43F0
LINE 1271 43F0
LINE 1272 43F2
LINE 1273 43F8
LINE 1275 43FA
LINE 1276 43FA
LINE 1277 4400
LINE 1278 4406
LINE 1279 440C
LINE 1280 4418
LINE 1280 4418
LINE 1280 4418
LINE 1280 4418
LINE 1281 4420
LINE 1282 4426
LINE 1283 4426
LINE 1285 4428
LINE 1286 4428
LINE 1287 442A
LINE 1288 4430
LINE 1289 443C
LINE 1289 443C
LINE 1289 443C
LINE 1289 443C
LINE 1290 4444
LINE 1291 444A
LINE 1292 444A
LINE 1293 444A
LINE 1294 444A
LINE 1256 444A
LINE 1295 4452
LINE 1296 445E
BLOCKEND 0 4466
FUNCEND 4466
FUNC u_second 4468 fc
BLOCK 1300 446E
DEFREG s2 20 c
DEFREG s1 22 c
DEFREG ss1 10 c
DEFLOCAL j 0 c
DEFREG ss0 14 c
DEFREG i 12 i
LINE 1300 446E
LINE 1302 446E
LINE 1304 4472
LINE 1306 4480
LINE 1307 4480
LINE 1308 4492
LINE 1309 4496
LINE 1310 449C
LINE 1311 44A2
LINE 1312 44A2
LINE 1312 44A8
LINE 1312 44A8
LINE 1312 44AE
LINE 1313 44B8
LINE 1314 44BE
LINE 1315 44C2
LINE 1317 44C4
LINE 1318 44C4
LINE 1319 44CA
LINE 1320 44CA
LINE 1321 44CC
LINE 1322 44D2
LINE 1324 44D4
LINE 1325 44D4
LINE 1326 44DA
LINE 1327 44E0
LINE 1328 44E6
LINE 1329 44F2
LINE 1329 44F2
LINE 1329 44F2
LINE 1329 44F2
LINE 1330 44FA
LINE 1331 4500
LINE 1332 4500
LINE 1334 4502
LINE 1335 4502
LINE 1336 4504
LINE 1337 450A
LINE 1338 4516
LINE 1338 4516
LINE 1338 4516
LINE 1338 4516
LINE 1339 451E
LINE 1340 4524
LINE 1341 4524
LINE 1342 4524
LINE 1343 4524
LINE 1305 4524
LINE 1344 452C
LINE 1345 4538
LINE 1346 4540
LINE 1347 4548
LINE 1348 4550
LINE 1349 4558
LINE 1350 4560
LINE 1351 4568
LINE 1352 4570
LINE 1353 4578
BLOCKEND 0 4580
FUNCEND 4580
FUNC display_number 4582 fV
BLOCK 1357 4588
DEFREG num 20 c
LINE 1357 4588
LINE 1358 4588
LINE 1359 458E
LINE 1360 4594
LINE 1361 4598
BLOCKEND 0 45A2
FUNCEND 45A2
FUNC display_time 45A4 fV
BLOCK 1364 45A4
LINE 1364 45A4
LINE 1365 45A4
LINE 1366 45AA
LINE 1367 45B0
LINE 1369 45B4
LINE 1370 45BC
LINE 1371 45C4
LINE 1372 45CC
LINE 1373 45D4
LINE 1374 45DC
LINE 1375 45E4
LINE 1376 45EC
LINE 1377 45F4
LINE 1379 45F8
LINE 1380 45FE
LINE 1381 4604
LINE 1382 4608
LINE 1383 4610
LINE 1384 4618
LINE 1385 4620
LINE 1386 4628
LINE 1387 4630
LINE 1388 4638
LINE 1389 4640
BLOCKEND 0 4644
FUNCEND 4644
FUNC display_even 4646 fV
BLOCK 1392 4646
LINE 1392 4646
LINE 1393 4646
LINE 1394 464C
LINE 1395 4652
LINE 1397 4656
LINE 1398 465E
LINE 1399 4666
LINE 1400 466E
LINE 1401 4676
LINE 1402 467E
LINE 1403 4686
LINE 1404 468E
LINE 1405 4696
LINE 1407 469A
LINE 1408 46A0
LINE 1409 46A6
LINE 1410 46AA
LINE 1411 46B2
LINE 1412 46BA
LINE 1413 46C2
LINE 1414 46CA
LINE 1415 46D2
LINE 1416 46DA
LINE 1417 46E2
BLOCKEND 0 46E6
FUNCEND 46E6
FUNC display_time3 46E8 fV
BLOCK 1420 46E8
LINE 1420 46E8
LINE 1421 46E8
LINE 1422 46EE
LINE 1423 46F4
LINE 1425 46F8
LINE 1426 4700
LINE 1427 4708
LINE 1428 4710
LINE 1429 4718
LINE 1430 4720
LINE 1431 4728
LINE 1433 472C
LINE 1434 4732
LINE 1435 4738
LINE 1436 473C
LINE 1437 4744
LINE 1438 474C
LINE 1439 4754
LINE 1440 475C
LINE 1441 4764
LINE 1442 476C
LINE 1443 4774
BLOCKEND 0 4778
FUNCEND 4778
FUNC display_time2 477A fV
BLOCK 1446 477A
LINE 1446 477A
LINE 1447 477A
LINE 1448 4780
LINE 1449 4786
LINE 1450 478A
LINE 1451 4792
LINE 1452 479A
LINE 1453 47A2
LINE 1454 47AA
LINE 1455 47B2
LINE 1456 47BA
LINE 1457 47C2
LINE 1458 47CA
LINE 1460 47CE
LINE 1461 47D4
LINE 1462 47DA
LINE 1463 47DE
LINE 1464 47E6
LINE 1465 47EE
LINE 1466 47F6
LINE 1467 47FE
LINE 1468 4806
LINE 1469 480E
LINE 1470 4816
BLOCKEND 0 481A
FUNCEND 481A
FUNC display_time1 481C fV
BLOCK 1473 4822
DEFREG timedata 20 pc
LINE 1473 4822
LINE 1474 4822
LINE 1475 4828
LINE 1476 482E
LINE 1478 4832
LINE 1479 483A
LINE 1480 4842
LINE 1481 484A
LINE 1482 4852
LINE 1483 485A
LINE 1484 4862
LINE 1486 4866
LINE 1487 486C
LINE 1488 4872
LINE 1489 4876
LINE 1490 487E
LINE 1491 4886
LINE 1492 488E
LINE 1493 4896
LINE 1494 489E
LINE 1496 48A6
BLOCKEND 0 48AE
FUNCEND 48AE
FUNC display_record 48B0 fV
BLOCK 1500 48B6
DEFREG timedata 20 pc
LINE 1500 48B6
LINE 1501 48B6
LINE 1502 4936
LINE 1504 4936
LINE 1505 493C
LINE 1506 4942
LINE 1507 4946
LINE 1508 494E
LINE 1509 4956
LINE 1510 495E
LINE 1511 4966
LINE 1512 496E
LINE 1513 4976
LINE 1514 497E
LINE 1515 4986
LINE 1516 498E
LINE 1517 4992
LINE 1520 4994
LINE 1521 499A
LINE 1522 49A0
LINE 1523 49A4
LINE 1524 49AC
LINE 1525 49B4
LINE 1526 49BC
LINE 1527 49C4
LINE 1528 49CC
LINE 1529 49D4
LINE 1530 49DC
LINE 1531 49E4
LINE 1532 49EA
LINE 1535 49EC
LINE 1536 49F2
LINE 1537 49F8
LINE 1538 49FE
LINE 1539 4A06
LINE 1540 4A0E
LINE 1541 4A16
LINE 1542 4A1E
LINE 1543 4A26
LINE 1544 4A2E
LINE 1545 4A36
LINE 1546 4A3E
LINE 1547 4A46
LINE 1548 4A4E
LINE 1549 4A54
LINE 1552 4A56
LINE 1553 4A5C
LINE 1554 4A62
LINE 1555 4A68
LINE 1556 4A72
LINE 1557 4A7C
LINE 1558 4A86
LINE 1559 4A90
LINE 1560 4A9A
LINE 1561 4AA4
LINE 1562 4AAE
LINE 1563 4AB8
LINE 1564 4AC2
LINE 1565 4AC8
LINE 1568 4ACA
LINE 1569 4AD0
LINE 1570 4AD6
LINE 1571 4ADC
LINE 1572 4AE6
LINE 1573 4AF0
LINE 1574 4AFA
LINE 1575 4B04
LINE 1576 4B0E
LINE 1577 4B18
LINE 1578 4B22
LINE 1579 4B2C
LINE 1580 4B32
LINE 1583 4B34
LINE 1584 4B3A
LINE 1585 4B40
LINE 1586 4B46
LINE 1587 4B50
LINE 1588 4B5A
LINE 1589 4B64
LINE 1590 4B6E
LINE 1591 4B78
LINE 1592 4B82
LINE 1593 4B8C
LINE 1594 4B92
LINE 1597 4B94
LINE 1598 4B9A
LINE 1599 4BA0
LINE 1600 4BA6
LINE 1601 4BB0
LINE 1602 4BBA
LINE 1603 4BC4
LINE 1604 4BCE
LINE 1605 4BD8
LINE 1606 4BE2
LINE 1607 4BEC
LINE 1608 4BF2
LINE 1611 4BF4
LINE 1612 4BFA
LINE 1613 4C00
LINE 1614 4C06
LINE 1615 4C10
LINE 1616 4C1A
LINE 1617 4C24
LINE 1618 4C2E
LINE 1619 4C38
LINE 1620 4C42
LINE 1621 4C4C
LINE 1622 4C52
LINE 1625 4C54
LINE 1626 4C5A
LINE 1627 4C60
LINE 1628 4C66
LINE 1629 4C70
LINE 1630 4C7A
LINE 1631 4C84
LINE 1632 4C8E
LINE 1633 4C98
LINE 1634 4CA2
LINE 1635 4CAC
LINE 1636 4CB6
LINE 1637 4CBC
LINE 1640 4CBE
LINE 1641 4CC4
LINE 1642 4CCA
LINE 1643 4CD0
LINE 1644 4CDA
LINE 1645 4CE4
LINE 1646 4CEE
LINE 1647 4CF8
LINE 1648 4D02
LINE 1649 4D0C
LINE 1650 4D16
LINE 1651 4D20
LINE 1652 4D2A
LINE 1653 4D30
LINE 1656 4D32
LINE 1657 4D38
LINE 1658 4D3E
LINE 1659 4D44
LINE 1660 4D4E
LINE 1661 4D58
LINE 1662 4D62
LINE 1663 4D6C
LINE 1664 4D76
LINE 1665 4D80
LINE 1666 4D8A
LINE 1667 4D94
LINE 1668 4D9A
LINE 1671 4D9C
LINE 1672 4DA2
LINE 1673 4DA8
LINE 1674 4DAE
LINE 1675 4DB8
LINE 1676 4DC2
LINE 1677 4DCC
LINE 1678 4DD6
LINE 1679 4DE0
LINE 1680 4DEA
LINE 1681 4DF4
LINE 1682 4DFE
LINE 1683 4E04
LINE 1687 4E04
LINE 1688 4E0A
LINE 1689 4E10
LINE 1690 4E16
LINE 1691 4E1E
LINE 1692 4E28
LINE 1693 4E30
LINE 1694 4E3A
LINE 1695 4E42
LINE 1697 4E4C
BLOCKEND 0 4E56
FUNCEND 4E56
FUNC display_key204 4E58 fV
BLOCK 1700 4E58
LINE 1700 4E58
LINE 1701 4E58
LINE 1702 4E5E
LINE 1703 4E64
LINE 1704 4E6A
LINE 1705 4E74
LINE 1706 4E7E
LINE 1707 4E88
LINE 1708 4E92
LINE 1709 4E9C
LINE 1710 4EA6
LINE 1711 4EB0
LINE 1712 4EBA
LINE 1714 4EC0
LINE 1715 4EC6
LINE 1716 4ECC
LINE 1717 4ED2
LINE 1718 4EDC
LINE 1719 4EE6
LINE 1720 4EF0
LINE 1721 4EFA
LINE 1722 4F04
LINE 1723 4F0E
LINE 1724 4F18
BLOCKEND 0 4F1E
FUNCEND 4F1E
FUNC display_key1 4F20 fV
BLOCK 1727 4F24
LINE 1727 4F24
LINE 1728 4F24
LINE 1729 4FA6
LINE 1731 4FA6
LINE 1732 4FB0
LINE 1733 4FB0
LINE 1734 4FB6
LINE 1735 4FBC
LINE 1736 4FC2
LINE 1737 4FCC
LINE 1738 4FD6
LINE 1739 4FE0
LINE 1740 4FEA
LINE 1741 4FF4
LINE 1742 4FFE
LINE 1743 5008
LINE 1744 5012
LINE 1746 5018
LINE 1747 501E
LINE 1748 5024
LINE 1749 502A
LINE 1750 5034
LINE 1751 503E
LINE 1752 5048
LINE 1753 5052
LINE 1754 505C
LINE 1755 5066
LINE 1756 5070
LINE 1757 507A
LINE 1758 5084
LINE 1759 508A
LINE 1760 508E
LINE 1761 5098
LINE 1762 5098
LINE 1763 509E
LINE 1764 50A4
LINE 1765 50AA
LINE 1766 50B4
LINE 1767 50BE
LINE 1768 50C8
LINE 1769 50D2
LINE 1770 50DC
LINE 1771 50E6
LINE 1772 50F0
LINE 1773 50FA
LINE 1775 5100
LINE 1776 5106
LINE 1777 510C
LINE 1778 5112
LINE 1779 511C
LINE 1780 5126
LINE 1781 5130
LINE 1782 513A
LINE 1783 5144
LINE 1784 514E
LINE 1785 5158
LINE 1786 5162
LINE 1787 516C
LINE 1788 5172
LINE 1789 5176
LINE 1790 5182
LINE 1791 5182
LINE 1792 5188
LINE 1793 518E