Visual Basic Controls/Visual Basic Controls.iso/vbcontrol/frmshp10/dati_2.bas

BASIC Source File | 1998-10-06 | 15.7 KB | 508 lines

Attribute VB_Name = "Dati_2"
Option Explicit

'-----Data File

Sub FillData2()
 D(1002) = 471 : D(1003) = 677
 D(1004) = 472 : D(1005) = 677
 D(1006) = 472 : D(1007) = 678
 D(1008) = 473 : D(1009) = 678
 D(1010) = 473 : D(1011) = 679
 D(1012) = 474 : D(1013) = 679
 D(1014) = 474 : D(1015) = 680
 D(1016) = 475 : D(1017) = 680
 D(1018) = 475 : D(1019) = 681
 D(1020) = 476 : D(1021) = 681
 D(1022) = 476 : D(1023) = 682
 D(1024) = 476 : D(1025) = 683
 D(1026) = 477 : D(1027) = 683
 D(1028) = 477 : D(1029) = 684
 D(1030) = 478 : D(1031) = 684
 D(1032) = 478 : D(1033) = 685
 D(1034) = 479 : D(1035) = 685
 D(1036) = 479 : D(1037) = 686
 D(1038) = 480 : D(1039) = 686
 D(1040) = 480 : D(1041) = 687
 D(1042) = 481 : D(1043) = 687
 D(1044) = 481 : D(1045) = 688
 D(1046) = 482 : D(1047) = 688
 D(1048) = 482 : D(1049) = 689
 D(1050) = 483 : D(1051) = 689
 D(1052) = 483 : D(1053) = 690
 D(1054) = 484 : D(1055) = 690
 D(1056) = 484 : D(1057) = 691
 D(1058) = 485 : D(1059) = 691
 D(1060) = 485 : D(1061) = 692
 D(1062) = 486 : D(1063) = 692
 D(1064) = 486 : D(1065) = 693
 D(1066) = 487 : D(1067) = 693
 D(1068) = 487 : D(1069) = 694
 D(1070) = 488 : D(1071) = 694
 D(1072) = 488 : D(1073) = 695
 D(1074) = 489 : D(1075) = 695
 D(1076) = 489 : D(1077) = 696
 D(1078) = 489 : D(1079) = 697
 D(1080) = 490 : D(1081) = 697
 D(1082) = 490 : D(1083) = 698
 D(1084) = 491 : D(1085) = 698
 D(1086) = 491 : D(1087) = 699
 D(1088) = 492 : D(1089) = 699
 D(1090) = 492 : D(1091) = 700
 D(1092) = 493 : D(1093) = 700
 D(1094) = 493 : D(1095) = 701
 D(1096) = 494 : D(1097) = 701
 D(1098) = 494 : D(1099) = 702
 D(1100) = 494 : D(1101) = 703
 D(1102) = 495 : D(1103) = 703
 D(1104) = 495 : D(1105) = 704
 D(1106) = 496 : D(1107) = 704
 D(1108) = 496 : D(1109) = 705
 D(1110) = 497 : D(1111) = 705
 D(1112) = 497 : D(1113) = 706
 D(1114) = 498 : D(1115) = 706
 D(1116) = 498 : D(1117) = 707
 D(1118) = 498 : D(1119) = 708
 D(1120) = 499 : D(1121) = 708
 D(1122) = 499 : D(1123) = 709
 D(1124) = 500 : D(1125) = 709
 D(1126) = 500 : D(1127) = 710
 D(1128) = 501 : D(1129) = 710
 D(1130) = 501 : D(1131) = 711
 D(1132) = 502 : D(1133) = 711
 D(1134) = 502 : D(1135) = 712
 D(1136) = 502 : D(1137) = 713
 D(1138) = 503 : D(1139) = 713
 D(1140) = 503 : D(1141) = 714
 D(1142) = 504 : D(1143) = 714
 D(1144) = 504 : D(1145) = 715
 D(1146) = 505 : D(1147) = 715
 D(1148) = 505 : D(1149) = 716
 D(1150) = 506 : D(1151) = 716
 D(1152) = 506 : D(1153) = 717
 D(1154) = 507 : D(1155) = 717
 D(1156) = 507 : D(1157) = 718
 D(1158) = 507 : D(1159) = 719
 D(1160) = 508 : D(1161) = 719
 D(1162) = 508 : D(1163) = 720
 D(1164) = 509 : D(1165) = 720
 D(1166) = 509 : D(1167) = 721
 D(1168) = 510 : D(1169) = 721
 D(1170) = 510 : D(1171) = 722
 D(1172) = 510 : D(1173) = 723
 D(1174) = 511 : D(1175) = 723
 D(1176) = 511 : D(1177) = 724
 D(1178) = 512 : D(1179) = 724
 D(1180) = 512 : D(1181) = 725
 D(1182) = 512 : D(1183) = 726
 D(1184) = 513 : D(1185) = 726
 D(1186) = 513 : D(1187) = 727
 D(1188) = 514 : D(1189) = 727
 D(1190) = 514 : D(1191) = 728
 D(1192) = 514 : D(1193) = 729
 D(1194) = 515 : D(1195) = 729
 D(1196) = 515 : D(1197) = 730
 D(1198) = 516 : D(1199) = 730
 D(1200) = 516 : D(1201) = 731
 D(1202) = 516 : D(1203) = 732
 D(1204) = 517 : D(1205) = 732
 D(1206) = 517 : D(1207) = 733
 D(1208) = 518 : D(1209) = 733
 D(1210) = 518 : D(1211) = 734
 D(1212) = 518 : D(1213) = 735
 D(1214) = 519 : D(1215) = 735
 D(1216) = 519 : D(1217) = 736
 D(1218) = 520 : D(1219) = 736
 D(1220) = 520 : D(1221) = 737
 D(1222) = 520 : D(1223) = 738
 D(1224) = 521 : D(1225) = 738
 D(1226) = 521 : D(1227) = 739
 D(1228) = 522 : D(1229) = 739
 D(1230) = 522 : D(1231) = 740
 D(1232) = 522 : D(1233) = 741
 D(1234) = 523 : D(1235) = 741
 D(1236) = 523 : D(1237) = 742
 D(1238) = 524 : D(1239) = 742
 D(1240) = 524 : D(1241) = 743
 D(1242) = 524 : D(1243) = 744
 D(1244) = 525 : D(1245) = 744
 D(1246) = 525 : D(1247) = 745
 D(1248) = 526 : D(1249) = 745
 D(1250) = 526 : D(1251) = 746
 D(1252) = 526 : D(1253) = 747
 D(1254) = 527 : D(1255) = 747
 D(1256) = 527 : D(1257) = 748
 D(1258) = 528 : D(1259) = 748
 D(1260) = 528 : D(1261) = 749
 D(1262) = 528 : D(1263) = 750
 D(1264) = 529 : D(1265) = 750
 D(1266) = 529 : D(1267) = 751
 D(1268) = 530 : D(1269) = 751
 D(1270) = 530 : D(1271) = 752
 D(1272) = 531 : D(1273) = 752
 D(1274) = 532 : D(1275) = 752
 D(1276) = 532 : D(1277) = 753
 D(1278) = 533 : D(1279) = 753
 D(1280) = 534 : D(1281) = 753
 D(1282) = 535 : D(1283) = 753
 D(1284) = 536 : D(1285) = 752
 D(1286) = 536 : D(1287) = 753
 D(1288) = 537 : D(1289) = 752
 D(1290) = 537 : D(1291) = 751
 D(1292) = 538 : D(1293) = 750
 D(1294) = 538 : D(1295) = 751
 D(1296) = 539 : D(1297) = 750
 D(1298) = 539 : D(1299) = 749
 D(1300) = 539 : D(1301) = 748
 D(1302) = 540 : D(1303) = 747
 D(1304) = 540 : D(1305) = 748
 D(1306) = 541 : D(1307) = 747
 D(1308) = 541 : D(1309) = 746
 D(1310) = 541 : D(1311) = 745
 D(1312) = 542 : D(1313) = 744
 D(1314) = 542 : D(1315) = 745
 D(1316) = 543 : D(1317) = 744
 D(1318) = 543 : D(1319) = 743
 D(1320) = 543 : D(1321) = 742
 D(1322) = 544 : D(1323) = 741
 D(1324) = 544 : D(1325) = 742
 D(1326) = 545 : D(1327) = 741
 D(1328) = 545 : D(1329) = 740
 D(1330) = 545 : D(1331) = 739
 D(1332) = 546 : D(1333) = 738
 D(1334) = 546 : D(1335) = 739
 D(1336) = 547 : D(1337) = 738
 D(1338) = 547 : D(1339) = 737
 D(1340) = 547 : D(1341) = 736
 D(1342) = 548 : D(1343) = 735
 D(1344) = 548 : D(1345) = 736
 D(1346) = 549 : D(1347) = 735
 D(1348) = 549 : D(1349) = 734
 D(1350) = 549 : D(1351) = 733
 D(1352) = 550 : D(1353) = 732
 D(1354) = 550 : D(1355) = 733
 D(1356) = 551 : D(1357) = 732
 D(1358) = 551 : D(1359) = 731
 D(1360) = 551 : D(1361) = 730
 D(1362) = 552 : D(1363) = 729
 D(1364) = 552 : D(1365) = 730
 D(1366) = 553 : D(1367) = 729
 D(1368) = 553 : D(1369) = 728
 D(1370) = 553 : D(1371) = 727
 D(1372) = 554 : D(1373) = 726
 D(1374) = 554 : D(1375) = 727
 D(1376) = 555 : D(1377) = 726
 D(1378) = 555 : D(1379) = 725
 D(1380) = 555 : D(1381) = 724
 D(1382) = 556 : D(1383) = 723
 D(1384) = 556 : D(1385) = 724
 D(1386) = 557 : D(1387) = 723
 D(1388) = 557 : D(1389) = 722
 D(1390) = 557 : D(1391) = 721
 D(1392) = 558 : D(1393) = 720
 D(1394) = 558 : D(1395) = 721
 D(1396) = 559 : D(1397) = 720
 D(1398) = 559 : D(1399) = 719
 D(1400) = 560 : D(1401) = 718
 D(1402) = 560 : D(1403) = 717
 D(1404) = 561 : D(1405) = 716
 D(1406) = 561 : D(1407) = 717
 D(1408) = 562 : D(1409) = 716
 D(1410) = 562 : D(1411) = 715
 D(1412) = 563 : D(1413) = 714
 D(1414) = 563 : D(1415) = 715
 D(1416) = 564 : D(1417) = 714
 D(1418) = 564 : D(1419) = 713
 D(1420) = 565 : D(1421) = 712
 D(1422) = 565 : D(1423) = 711
 D(1424) = 566 : D(1425) = 710
 D(1426) = 566 : D(1427) = 711
 D(1428) = 567 : D(1429) = 710
 D(1430) = 567 : D(1431) = 709
 D(1432) = 568 : D(1433) = 708
 D(1434) = 568 : D(1435) = 709
 D(1436) = 569 : D(1437) = 708
 D(1438) = 569 : D(1439) = 707
 D(1440) = 569 : D(1441) = 706
 D(1442) = 570 : D(1443) = 705
 D(1444) = 570 : D(1445) = 706
 D(1446) = 571 : D(1447) = 705
 D(1448) = 571 : D(1449) = 704
 D(1450) = 572 : D(1451) = 703
 D(1452) = 572 : D(1453) = 704
 D(1454) = 573 : D(1455) = 703
 D(1456) = 573 : D(1457) = 702
 D(1458) = 573 : D(1459) = 701
 D(1460) = 574 : D(1461) = 700
 D(1462) = 574 : D(1463) = 701
 D(1464) = 575 : D(1465) = 700
 D(1466) = 575 : D(1467) = 699
 D(1468) = 576 : D(1469) = 698
 D(1470) = 576 : D(1471) = 699
 D(1472) = 577 : D(1473) = 698
 D(1474) = 577 : D(1475) = 697
 D(1476) = 578 : D(1477) = 696
 D(1478) = 578 : D(1479) = 695
 D(1480) = 579 : D(1481) = 694
 D(1482) = 579 : D(1483) = 695
 D(1484) = 580 : D(1485) = 694
 D(1486) = 580 : D(1487) = 693
 D(1488) = 581 : D(1489) = 692
 D(1490) = 581 : D(1491) = 693
 D(1492) = 582 : D(1493) = 692
 D(1494) = 582 : D(1495) = 691
 D(1496) = 583 : D(1497) = 690
 D(1498) = 583 : D(1499) = 691
 D(1500) = 584 : D(1501) = 690
 D(1502) = 584 : D(1503) = 689
 D(1504) = 585 : D(1505) = 688
 D(1506) = 585 : D(1507) = 689
 D(1508) = 586 : D(1509) = 688
 D(1510) = 586 : D(1511) = 687
 D(1512) = 587 : D(1513) = 686
 D(1514) = 587 : D(1515) = 687
 D(1516) = 588 : D(1517) = 686
 D(1518) = 588 : D(1519) = 685
 D(1520) = 589 : D(1521) = 684
 D(1522) = 589 : D(1523) = 685
 D(1524) = 590 : D(1525) = 684
 D(1526) = 590 : D(1527) = 683
 D(1528) = 591 : D(1529) = 682
 D(1530) = 591 : D(1531) = 681
 D(1532) = 592 : D(1533) = 680
 D(1534) = 592 : D(1535) = 681
 D(1536) = 593 : D(1537) = 680
 D(1538) = 593 : D(1539) = 679
 D(1540) = 594 : D(1541) = 678
 D(1542) = 594 : D(1543) = 679
 D(1544) = 595 : D(1545) = 678
 D(1546) = 595 : D(1547) = 677
 D(1548) = 596 : D(1549) = 676
 D(1550) = 596 : D(1551) = 677
 D(1552) = 597 : D(1553) = 676
 D(1554) = 597 : D(1555) = 675
 D(1556) = 598 : D(1557) = 674
 D(1558) = 598 : D(1559) = 675
 D(1560) = 599 : D(1561) = 674
 D(1562) = 599 : D(1563) = 673
 D(1564) = 600 : D(1565) = 672
 D(1566) = 600 : D(1567) = 673
 D(1568) = 601 : D(1569) = 672
 D(1570) = 601 : D(1571) = 671
 D(1572) = 602 : D(1573) = 670
 D(1574) = 602 : D(1575) = 671
 D(1576) = 603 : D(1577) = 670
 D(1578) = 603 : D(1579) = 669
 D(1580) = 604 : D(1581) = 668
 D(1582) = 604 : D(1583) = 669
 D(1584) = 605 : D(1585) = 668
 D(1586) = 605 : D(1587) = 667
 D(1588) = 606 : D(1589) = 666
 D(1590) = 606 : D(1591) = 667
 D(1592) = 607 : D(1593) = 666
 D(1594) = 607 : D(1595) = 665
 D(1596) = 608 : D(1597) = 665
 D(1598) = 609 : D(1599) = 664
 D(1600) = 609 : D(1601) = 665
 D(1602) = 610 : D(1603) = 664
 D(1604) = 610 : D(1605) = 663
 D(1606) = 611 : D(1607) = 662
 D(1608) = 611 : D(1609) = 663
 D(1610) = 612 : D(1611) = 662
 D(1612) = 612 : D(1613) = 661
 D(1614) = 613 : D(1615) = 660
 D(1616) = 613 : D(1617) = 661
 D(1618) = 614 : D(1619) = 660
 D(1620) = 614 : D(1621) = 659
 D(1622) = 615 : D(1623) = 658
 D(1624) = 615 : D(1625) = 659
 D(1626) = 616 : D(1627) = 658
 D(1628) = 616 : D(1629) = 657
 D(1630) = 617 : D(1631) = 656
 D(1632) = 617 : D(1633) = 657
 D(1634) = 618 : D(1635) = 656
 D(1636) = 618 : D(1637) = 655
 D(1638) = 619 : D(1639) = 654
 D(1640) = 619 : D(1641) = 655
 D(1642) = 620 : D(1643) = 654
 D(1644) = 621 : D(1645) = 653
 D(1646) = 621 : D(1647) = 654
 D(1648) = 622 : D(1649) = 653
 D(1650) = 622 : D(1651) = 652
 D(1652) = 623 : D(1653) = 651
 D(1654) = 623 : D(1655) = 652
 D(1656) = 624 : D(1657) = 651
 D(1658) = 624 : D(1659) = 650
 D(1660) = 625 : D(1661) = 649
 D(1662) = 625 : D(1663) = 650
 D(1664) = 626 : D(1665) = 649
 D(1666) = 626 : D(1667) = 648
 D(1668) = 627 : D(1669) = 648
 D(1670) = 628 : D(1671) = 647
 D(1672) = 628 : D(1673) = 648
 D(1674) = 629 : D(1675) = 647
 D(1676) = 629 : D(1677) = 646
 D(1678) = 630 : D(1679) = 645
 D(1680) = 630 : D(1681) = 646
 D(1682) = 631 : D(1683) = 645
 D(1684) = 632 : D(1685) = 644
 D(1686) = 632 : D(1687) = 645
 D(1688) = 633 : D(1689) = 644
 D(1690) = 633 : D(1691) = 643
 D(1692) = 634 : D(1693) = 642
 D(1694) = 634 : D(1695) = 643
 D(1696) = 635 : D(1697) = 642
 D(1698) = 636 : D(1699) = 641
 D(1700) = 636 : D(1701) = 642
 D(1702) = 637 : D(1703) = 641
 D(1704) = 637 : D(1705) = 640
 D(1706) = 638 : D(1707) = 639
 D(1708) = 638 : D(1709) = 640
 D(1710) = 639 : D(1711) = 639
 D(1712) = 640 : D(1713) = 638
 D(1714) = 640 : D(1715) = 639
 D(1716) = 641 : D(1717) = 638
 D(1718) = 641 : D(1719) = 637
 D(1720) = 642 : D(1721) = 636
 D(1722) = 642 : D(1723) = 637
 D(1724) = 643 : D(1725) = 636
 D(1726) = 644 : D(1727) = 635
 D(1728) = 644 : D(1729) = 636
 D(1730) = 645 : D(1731) = 635
 D(1732) = 645 : D(1733) = 634
 D(1734) = 646 : D(1735) = 633
 D(1736) = 646 : D(1737) = 634
 D(1738) = 647 : D(1739) = 633
 D(1740) = 648 : D(1741) = 632
 D(1742) = 648 : D(1743) = 633
 D(1744) = 649 : D(1745) = 632
 D(1746) = 649 : D(1747) = 631
 D(1748) = 650 : D(1749) = 630
 D(1750) = 650 : D(1751) = 631
 D(1752) = 651 : D(1753) = 630
 D(1754) = 652 : D(1755) = 629
 D(1756) = 652 : D(1757) = 630
 D(1758) = 653 : D(1759) = 629
 D(1760) = 653 : D(1761) = 628
 D(1762) = 654 : D(1763) = 627
 D(1764) = 654 : D(1765) = 628
 D(1766) = 655 : D(1767) = 627
 D(1768) = 656 : D(1769) = 626
 D(1770) = 656 : D(1771) = 627
 D(1772) = 657 : D(1773) = 626
 D(1774) = 657 : D(1775) = 625
 D(1776) = 658 : D(1777) = 624
 D(1778) = 658 : D(1779) = 625
 D(1780) = 659 : D(1781) = 624
 D(1782) = 660 : D(1783) = 623
 D(1784) = 660 : D(1785) = 624
 D(1786) = 661 : D(1787) = 623
 D(1788) = 661 : D(1789) = 622
 D(1790) = 662 : D(1791) = 621
 D(1792) = 662 : D(1793) = 622
 D(1794) = 663 : D(1795) = 621
 D(1796) = 664 : D(1797) = 620
 D(1798) = 664 : D(1799) = 621
 D(1800) = 665 : D(1801) = 620
 D(1802) = 665 : D(1803) = 619
 D(1804) = 666 : D(1805) = 618
 D(1806) = 666 : D(1807) = 619
 D(1808) = 667 : D(1809) = 618
 D(1810) = 668 : D(1811) = 617
 D(1812) = 668 : D(1813) = 618
 D(1814) = 669 : D(1815) = 617
 D(1816) = 669 : D(1817) = 616
 D(1818) = 670 : D(1819) = 615
 D(1820) = 670 : D(1821) = 616
 D(1822) = 671 : D(1823) = 615
 D(1824) = 672 : D(1825) = 614
 D(1826) = 672 : D(1827) = 615
 D(1828) = 673 : D(1829) = 614
 D(1830) = 673 : D(1831) = 613
 D(1832) = 674 : D(1833) = 613
 D(1834) = 675 : D(1835) = 612
 D(1836) = 675 : D(1837) = 613
 D(1838) = 676 : D(1839) = 612
 D(1840) = 676 : D(1841) = 611
 D(1842) = 677 : D(1843) = 611
 D(1844) = 678 : D(1845) = 610
 D(1846) = 678 : D(1847) = 611
 D(1848) = 679 : D(1849) = 610
 D(1850) = 679 : D(1851) = 609
 D(1852) = 680 : D(1853) = 608
 D(1854) = 680 : D(1855) = 609
 D(1856) = 681 : D(1857) = 608
 D(1858) = 682 : D(1859) = 607
 D(1860) = 682 : D(1861) = 608
 D(1862) = 683 : D(1863) = 607
 D(1864) = 683 : D(1865) = 606
 D(1866) = 684 : D(1867) = 606
 D(1868) = 685 : D(1869) = 605
 D(1870) = 685 : D(1871) = 606
 D(1872) = 686 : D(1873) = 605
 D(1874) = 686 : D(1875) = 604
 D(1876) = 687 : D(1877) = 604
 D(1878) = 688 : D(1879) = 603
 D(1880) = 688 : D(1881) = 604
 D(1882) = 689 : D(1883) = 603
 D(1884) = 689 : D(1885) = 602
 D(1886) = 690 : D(1887) = 601
 D(1888) = 690 : D(1889) = 602
 D(1890) = 691 : D(1891) = 601
 D(1892) = 692 : D(1893) = 600
 D(1894) = 692 : D(1895) = 601
 D(1896) = 693 : D(1897) = 600
 D(1898) = 693 : D(1899) = 599
 D(1900) = 694 : D(1901) = 599
 D(1902) = 695 : D(1903) = 598
 D(1904) = 695 : D(1905) = 599
 D(1906) = 696 : D(1907) = 598
 D(1908) = 696 : D(1909) = 597
 D(1910) = 697 : D(1911) = 597
 D(1912) = 698 : D(1913) = 596
 D(1914) = 698 : D(1915) = 597
 D(1916) = 699 : D(1917) = 596
 D(1918) = 699 : D(1919) = 595
 D(1920) = 700 : D(1921) = 594
 D(1922) = 700 : D(1923) = 595
 D(1924) = 701 : D(1925) = 594
 D(1926) = 702 : D(1927) = 593
 D(1928) = 702 : D(1929) = 594
 D(1930) = 703 : D(1931) = 593
 D(1932) = 703 : D(1933) = 592
 D(1934) = 704 : D(1935) = 591
 D(1936) = 704 : D(1937) = 592
 D(1938) = 705 : D(1939) = 591
 D(1940) = 706 : D(1941) = 590
 D(1942) = 706 : D(1943) = 591
 D(1944) = 707 : D(1945) = 590
 D(1946) = 707 : D(1947) = 589
 D(1948) = 708 : D(1949) = 589
 D(1950) = 709 : D(1951) = 588
 D(1952) = 709 : D(1953) = 589
 D(1954) = 710 : D(1955) = 588
 D(1956) = 710 : D(1957) = 587
 D(1958) = 711 : D(1959) = 586
 D(1960) = 711 : D(1961) = 587
 D(1962) = 712 : D(1963) = 586
 D(1964) = 713 : D(1965) = 585
 D(1966) = 713 : D(1967) = 586
 D(1968) = 714 : D(1969) = 585
 D(1970) = 714 : D(1971) = 584
 D(1972) = 715 : D(1973) = 583
 D(1974) = 715 : D(1975) = 584
 D(1976) = 716 : D(1977) = 583
 D(1978) = 717 : D(1979) = 582
 D(1980) = 717 : D(1981) = 583
 D(1982) = 718 : D(1983) = 582
 D(1984) = 718 : D(1985) = 581
 D(1986) = 719 : D(1987) = 581
 D(1988) = 720 : D(1989) = 580
 D(1990) = 720 : D(1991) = 581
 D(1992) = 721 : D(1993) = 580
 D(1994) = 721 : D(1995) = 579
 D(1996) = 722 : D(1997) = 578
 D(1998) = 722 : D(1999) = 579
 D(2000) = 723 : D(2001) = 578
End Sub