Good Public Domain info for Squeaking

Dan Ingalls DanI at wdi.disney.com
Fri Nov 13 16:33:57 UTC 1998


Folks -

I am preparing a digest of all the responses on this thread (we seem to have a bunch of astronomers out there), but I thought I would send this one out immediately.

John-Reed Maffeo <rlpa80 at email.sps.mot.com> has been working on porting a Smalltalk map program calles USA.  He sent the database along with his message.

I found that with just a couple of lines of Squeak, you could make morphs for every state in the US, and end up with a fun jigsaw puzzle.  So I'm forwarding the modest database which originated with Dan Benson, and including below the Squeak code to make a morph out of any of the state specs.

	Open a morphic project,
	enter it and open a workspace,
	paste the code below into a workspace, and then 
	paste the list of coordinates for one of your states into the spec array.
	Execute the whole expression and, Bingo!
You now have a state morph that you can pick up and move around (and rotate and scale (for better or worse ;-)).  Some of the states have weird indentations that will require you to use the "proper fill" option in the ctrl-menu of the polygon for proper display.

Enjoy
	- Dan
-----------------------------

 | spec state |
spec := #(
"Colorado -- boring, but simple..."
921 708
888 704
696 688
696 658
717 521
871 538
933 546
929 571
929 583
921 708
).
state := PolygonMorph
	vertices: ((spec atAll: (1 to: spec size by: 2))
		with: (spec atAll: (2 to: spec size by: 2))
		collect: [:x :y | x at y])
	 color: Color green borderWidth: 1 borderColor: Color black.
World addMorph: (state position: 100 at 100)
-----------------------------

Date: Thu, 16 Jul 92 09:25:09 EDT
From: benson at robin.siemens.com (Dan Benson)
Subject: Re: usa.data - availability

This file defines the boundaries of the 50 United States as polygons.  
See the State class method called readStates to make sure the  
filename is correct.

This should be saved as a file with the same filename as indicated in  
the readStates method (usa.data).

I got the outlines for the states from a public domain MacDraw file.  
When printing a MacDraw file you can choose to print it to a file.  
This saves it as a PostScript file. I then edited the file to extract  
the polygons and manually entered each name. I then read the file in  
Smalltalk to create Smalltalk objects (flipping the x and y  
coordinates). To make a long story short, the polygons are now  
available as Smalltalk objects.

Enjoy!!
Dan Benson

STATE
Alabama
1
BOUNDARY
1417 950
1417 954
1429 967
1429 975
1404 983
1413 979
1404 958
1400 983
1392 979
1392 963
1383 921
1383 788
1471 779
1492 867
1508 888
1500 908
1513 942
1417 950
END
END
STATE
Alaska
1
BOUNDARY
242 1042
254 1042
246 1042
250 1054
263 1058
254 1071
258 1079
267 1083
283 1067
275 1100
271 1104
288 1096
300 1113
300 1104
304 1108
321 1104
300 1138
279 1150
275 1163
263 1158
242 1171
263 1163
283 1163
283 1167
296 1163
292 1150
300 1154
342 1125
350 1113
346 1104
375 1067
383 1046
379 1067
392 1063
383 1071
392 1075
371 1075
363 1096
371 1096
367 1104
379 1104
388 1092
392 1092
400 1071
400 1075
417 1071
413 1075
438 1092
471 1092
479 1083
483 1088
483 1088
475 1096
483 1100
492 1092
492 1104
508 1113
513 1104
504 1100
521 1108
513 1092
525 1104
546 1129
567 1138
563 1154
571 1138
579 1167
588 1158
583 1138
558 1133
513 1083
500 1104
492 1088
483 1092
479 1079
463 1079
442 900
375 888
358 879
354 888
346 871
271 917
292 946
300 950
317 958
300 954
304 963
300 967
283 963
288 950
279 950
250 958
267 975
258 975
263 983
283 992
283 996
300 992
296 996
296 1013
271 1021
242 1042
END
END
STATE
Arizona
1
BOUNDARY
588 908
467 833
475 825
483 825
479 804
488 796
488 779
508 767
496 733
496 733
500 692
508 692
517 700
529 658
696 688
667 875
663 917
588 908
END
END
STATE
Arkansas
1
BOUNDARY
1188 879
1188 858
1171 854
1175 783
1175 783
1167 733
1313 733
1317 738
1308 750
1329 750
1333 754
1325 763
1325 767
1317 775
1321 788
1313 796
1308 804
1308 817
1288 833
1292 850
1283 850
1283 858
1292 858
1288 863
1292 867
1288 879
1188 879
END
END
STATE
California
1
BOUNDARY
392 821
388 783
367 763
363 758
363 750
338 738
329 725
300 713
296 704
300 683
296 679
296 671
271 625
271 613
283 608
267 583
271 563
283 579
275 554
283 554
271 546
271 563
263 546
258 550
263 542
246 504
254 471
242 442
258 421
271 379
392 417
363 538
496 733
508 767
488 779
488 796
479 804
483 825
475 825
392 821
END
END
STATE
Colorado
1
BOUNDARY
921 708
888 704
696 688
696 658
717 521
871 538
933 546
929 571
929 583
921 708
END
END
STATE
Connecticut
1
BOUNDARY
1863 442
1829 450
1813 471
1813 458
1804 425
1854 417
1863 442
END
END
STATE
Delaware
1
BOUNDARY
1763 538
1763 546
1779 567
1788 571
1788 575
1792 579
1771 588
1758 538
1767 529
1763 538
END
END
STATE
Florida
1
BOUNDARY
1713 1088
1717 1129
1708 1138
1713 1146
1704 1154
1683 1163
1679 1154
1688 1158
1692 1154
1679 1150
1671 1138
1654 1133
1646 1113
1642 1104
1642 1092
1629 1092
1638 1100
1629 1100
1613 1075
1621 1058
1608 1050
1613 1067
1604 1058
1608 1017
1563 983
1542 975
1538 983
1504 996
1500 988
1504 996
1504 992
1488 975
1483 975
1488 983
1458 971
1471 971
1467 967
1433 975
1442 971
1433 967
1433 975
1429 975
1429 975
1429 967
1417 954
1417 950
1513 942
1517 950
1613 950
1613 954
1617 954
1617 938
1633 938
1713 1088
END
END
STATE
Georgia
1
BOUNDARY
1554 771
1550 783
1567 792
1579 808
1621 842
1642 875
1646 879
1642 892
1642 896
1633 913
1638 921
1633 921
1638 921
1633 938
1617 938
1617 954
1613 954
1613 950
1517 950
1513 942
1500 908
1508 888
1492 867
1471 779
1517 775
1554 771
END
END
STATE
Hawaii
6
BOUNDARY
596 1021
600 1021
604 1025
604 1029
600 1038
596 1042
592 1038
588 1033
588 1029
588 1025
592 1021
596 1021
END
BOUNDARY
642 1050
650 1050
654 1058
658 1063
654 1063
650 1063
646 1063
642 1063
638 1054
642 1054
642 1050
END
BOUNDARY
671 1071
671 1071
675 1071
683 1071
688 1071
692 1071
692 1075
688 1075
675 1075
671 1075
671 1071
END
BOUNDARY
704 1079
708 1083
717 1088
717 1092
708 1100
704 1096
700 1092
696 1083
696 1079
696 1075
696 1075
700 1079
704 1079
END
BOUNDARY
721 1117
721 1113
725 1113
729 1117
729 1117
733 1117
738 1121
742 1125
746 1125
746 1129
750 1133
754 1133
754 1138
758 1138
758 1142
758 1146
758 1150
758 1154
754 1154
746 1154
742 1154
738 1158
738 1163
733 1167
733 1167
729 1171
725 1167
725 1163
721 1158
721 1146
717 1138
717 1138
721 1125
721 1121
721 1113
721 1117
END
BOUNDARY
679 1079
683 1079
688 1083
688 1088
683 1088
683 1083
679 1079
END
END
STATE
Idaho
1
BOUNDARY
483 438
504 350
496 338
529 296
517 275
546 158
571 163
563 204
571 221
567 229
575 233
588 263
600 267
583 308
588 313
604 304
604 308
608 342
617 350
625 363
629 358
638 363
642 358
667 363
667 358
675 371
663 471
604 458
571 454
483 438
END
END
STATE
Illinois
1
BOUNDARY
1333 700
1333 679
1304 663
1308 633
1300 629
1292 633
1288 617
1275 604
1267 592
1267 575
1267 563
1275 558
1275 546
1275 529
1292 521
1300 513
1300 496
1283 483
1292 483
1371 479
1383 508
1392 608
1388 613
1396 633
1379 654
1379 671
1375 675
1379 683
1367 688
1367 700
1350 700
1342 704
1346 708
1333 700
END
END
STATE
Indiana
1
BOUNDARY
1379 654
1396 633
1388 613
1392 608
1383 508
1392 513
1392 513
1404 504
1467 500
1479 608
1479 621
1458 625
1458 633
1446 658
1438 658
1433 650
1425 667
1421 663
1408 671
1396 667
1396 671
1383 667
1379 671
1379 654
END
END
STATE
Iowa
1
BOUNDARY
1254 563
1129 567
1125 538
1108 488
1100 479
1108 463
1104 450
1108 446
1267 446
1271 450
1267 458
1271 471
1283 483
1300 496
1300 513
1292 521
1275 529
1275 546
1275 558
1267 563
1267 575
1254 563
END
END
STATE
Kansas
1
BOUNDARY
1154 596
1150 608
1167 625
1167 713
921 708
929 583
1142 592
1154 596
END
END
STATE
Kentucky
1
BOUNDARY
1383 717
1383 725
1338 729
1338 725
1346 725
1346 708
1342 704
1350 700
1367 700
1367 688
1379 683
1375 675
1379 671
1383 667
1396 671
1396 667
1408 671
1421 663
1425 667
1425 667
1433 650
1438 658
1446 658
1458 633
1458 625
1479 621
1479 608
1488 608
1496 617
1517 621
1542 613
1550 625
1558 646
1579 663
1546 700
1529 704
1383 717
END
END
STATE
Louisianna
1
BOUNDARY
1329 983
1321 992
1333 996
1346 992
1342 1000
1350 1004
1354 992
1367 988
1367 1000
1350 1013
1354 1021
1371 1029
1367 1038
1367 1033
1363 1042
1358 1029
1338 1017
1338 1029
1333 1038
1325 1029
1321 1033
1317 1025
1313 1038
1308 1038
1300 1033
1292 1021
1279 1021
1279 1013
1271 1013
1271 1008
1258 1013
1263 1017
1254 1021
1221 1013
1196 1013
1196 1013
1204 1000
1200 983
1208 958
1188 921
1188 879
1288 879
1292 879
1288 892
1296 892
1292 896
1300 904
1288 913
1296 913
1279 933
1275 958
1342 954
1338 971
1350 988
1329 983
END
END
STATE
Maine
1
BOUNDARY
1875 363
1867 354
1842 279
1850 279
1850 271
1854 271
1854 267
1858 250
1858 213
1871 179
1875 179
1883 188
1900 175
1917 183
1929 233
1942 238
1946 250
1954 254
1958 267
1963 267
1958 271
1946 283
1942 296
1933 288
1929 296
1925 292
1925 300
1917 296
1921 296
1917 292
1913 321
1904 317
1904 325
1896 325
1896 329
1892 329
1883 329
1879 363
1875 363
END
END
STATE
Maryland
2
BOUNDARY
1771 588
1792 579
1792 600
1788 592
1788 604
1779 608
1775 608
1771 608
1763 592
1763 600
1754 592
1758 588
1754 583
1758 583
1758 575
1750 579
1754 575
1754 563
1746 563
1758 546
1754 546
1742 563
1733 558
1742 567
1742 579
1750 596
1738 592
1750 600
1754 608
1729 600
1725 604
1721 600
1725 579
1729 575
1729 575
1721 575
1704 563
1696 554
1683 550
1671 563
1667 558
1646 579
1642 558
1746 538
1758 538
1771 588
END
BOUNDARY
1775 642
1771 629
1775 608
1779 608
1788 604
1775 642
END
END
STATE
Massachusetts
1
BOUNDARY
1863 383
1875 375
1883 383
1879 396
1883 400
1900 417
1913 413
1904 400
1908 400
1917 417
1896 425
1892 421
1883 429
1883 421
1867 413
1854 417
1804 425
1804 396
1817 392
1829 392
1863 383
END
END
STATE
Michigan
2
BOUNDARY
1404 504
1421 467
1404 425
1408 383
1429 358
1429 375
1429 367
1429 375
1429 358
1446 350
1438 342
1450 333
1488 346
1492 358
1488 358
1496 371
1496 388
1483 404
1483 417
1488 421
1508 396
1521 404
1529 438
1529 450
1525 454
1525 450
1521 454
1508 492
1479 500
1467 500
1404 504
END
BOUNDARY
1450 325
1446 329
1425 325
1400 329
1396 346
1396 346
1396 333
1383 342
1383 333
1367 371
1367 367
1367 358
1358 358
1363 346
1350 338
1292 325
1279 317
1354 271
1358 275
1338 296
1338 304
1346 296
1342 300
1354 296
1367 313
1392 313
1404 300
1438 296
1438 304
1458 304
1458 317
1471 325
1450 325
END
END
STATE
Minnesota
1
BOUNDARY
1267 446
1108 446
1108 429
1108 371
1096 358
1104 346
1088 221
1146 221
1146 204
1154 204
1158 233
1183 233
1183 238
1208 233
1217 238
1217 242
1217 242
1221 250
1233 246
1246 258
1267 246
1271 254
1308 254
1271 275
1233 313
1225 317
1229 338
1217 346
1213 358
1217 363
1217 392
1258 421
1267 442
1267 446
END
END
STATE
Mississippi
1
BOUNDARY
1358 983
1350 988
1338 971
1342 954
1275 958
1279 933
1296 913
1288 913
1300 904
1292 896
1296 892
1296 892
1288 892
1292 879
1288 879
1292 867
1288 863
1292 858
1283 858
1283 850
1292 850
1288 833
1308 817
1308 804
1313 796
1383 788
1383 921
1392 963
1392 979
1358 983
END
END
STATE
Missouri
1
BOUNDARY
1308 750
1317 738
1313 733
1167 733
1167 729
1167 713
1167 625
1150 608
1154 596
1142 592
1129 567
1254 563
1267 575
1267 592
1275 604
1288 617
1292 633
1300 629
1308 633
1304 663
1333 679
1333 700
1346 708
1346 725
1338 725
1338 729
1338 729
1333 750
1329 750
1308 750
END
END
STATE
Montana
1
BOUNDARY
883 375
679 350
675 371
667 358
667 363
642 358
638 363
629 358
625 363
617 350
608 342
604 308
604 304
588 313
583 308
600 267
588 263
575 233
567 229
571 221
563 204
571 163
742 196
742 196
900 213
888 325
888 333
883 375
END
END
STATE
Nebraska
1
BOUNDARY
1125 538
1129 567
1142 592
929 583
929 571
933 546
871 538
879 454
1046 467
1063 479
1083 475
1104 488
1108 488
1125 538
END
END
STATE
Nevada
1
BOUNDARY
363 538
392 417
413 421
483 438
571 454
529 658
517 700
508 692
500 692
496 733
496 733
363 538
END
END
STATE
New Hampshire
1
BOUNDARY
1875 375
1863 383
1829 392
1825 388
1825 358
1825 329
1838 313
1833 296
1833 283
1842 279
1867 354
1875 363
1879 363
1875 375
END
END
STATE
New Jersey
1
BOUNDARY
1796 492
1808 496
1808 521
1808 513
1808 525
1792 563
1792 563
1792 554
1767 546
1763 538
1767 529
1788 513
1767 496
1767 483
1775 463
1804 475
1796 492
END
END
STATE
New Mexico
1
BOUNDARY
875 913
750 900
750 913
692 904
692 921
663 917
667 875
696 688
888 704
888 729
875 913
END
END
STATE
New York
1
BOUNDARY
1804 425
1813 458
1813 471
1808 479
1804 475
1775 463
1763 458
1750 442
1617 467
1613 454
1642 429
1633 413
1658 400
1675 404
1700 396
1708 383
1704 371
1708 363
1704 367
1704 363
1729 329
1738 317
1783 304
1788 346
1792 363
1796 363
1804 392
1804 396
1804 425
END
END
STATE
North Carolina
1
BOUNDARY
1783 717
1771 717
1771 708
1763 708
1767 717
1754 717
1771 725
1763 733
1754 733
1767 738
1775 729
1783 733
1775 742
1771 742
1758 750
1754 746
1754 758
1746 750
1750 758
1738 767
1738 767
1733 783
1733 779
1733 788
1717 792
1713 792
1671 763
1633 763
1625 754
1579 758
1554 771
1517 775
1517 763
1521 763
1525 750
1554 733
1563 725
1567 729
1583 717
1592 708
1592 700
1775 667
1792 683
1783 675
1783 679
1775 675
1779 683
1771 683
1775 688
1767 683
1767 692
1763 692
1758 679
1763 696
1783 692
1779 700
1788 700
1788 688
1792 700
1783 717
END
END
STATE
North Dakota
1
BOUNDARY
888 333
888 325
900 213
1088 221
1104 346
888 333
END
END
STATE
Ohio
1
BOUNDARY
1600 529
1604 542
1600 571
1579 588
1575 604
1567 600
1563 617
1550 625
1542 613
1517 621
1496 617
1488 608
1479 608
1467 500
1479 500
1508 492
1504 496
1529 500
1521 504
1538 504
1563 496
1571 483
1596 471
1604 517
1604 525
1600 529
END
END
STATE
Oklahoma
1
BOUNDARY
1175 783
1171 854
1146 842
1108 854
1096 842
1092 846
1092 842
1083 854
1079 842
1071 850
1063 838
1058 846
1050 833
1033 833
1013 829
1004 821
996 825
983 813
988 733
888 729
888 704
921 708
1167 713
1167 729
1167 733
1175 783
END
END
STATE
Oregon
1
BOUNDARY
271 379
271 342
292 313
321 246
325 217
338 221
354 233
354 250
363 258
379 254
396 263
417 267
463 263
517 275
529 296
496 338
504 350
483 438
413 421
392 417
271 379
END
END
STATE
Pennsylvania
1
BOUNDARY
1617 467
1750 442
1763 458
1775 463
1767 483
1767 496
1788 513
1767 529
1758 538
1746 538
1642 558
1633 558
1613 563
1604 525
1604 517
1596 471
1613 454
1617 467
END
END
STATE
Rhode Island
1
BOUNDARY
1879 433
1871 425
1875 438
1863 442
1854 417
1867 413
1883 421
1883 429
1879 433
END
END
STATE
South Carolina
1
BOUNDARY
1696 817
1700 825
1679 846
1675 842
1675 850
1658 858
1654 867
1646 863
1654 871
1646 879
1642 875
1621 842
1579 808
1567 792
1550 783
1554 771
1579 758
1625 754
1633 763
1671 763
1713 792
1717 792
1696 817
END
END
STATE
South Dakota
1
BOUNDARY
1104 450
1108 463
1100 479
1108 488
1104 488
1083 475
1063 479
1046 467
879 454
879 438
883 375
888 333
1104 346
1096 358
1108 371
1108 429
1108 446
1104 450
END
END
STATE
Tennessee
1
BOUNDARY
1592 708
1583 717
1567 729
1563 725
1554 733
1525 750
1521 763
1517 763
1517 775
1471 779
1383 788
1313 796
1321 788
1317 775
1317 775
1325 767
1325 763
1333 754
1329 750
1333 750
1338 729
1338 729
1383 725
1383 717
1529 704
1592 696
1592 700
1592 708
END
END
STATE
Texas
1
BOUNDARY
1188 858
1188 879
1188 921
1208 958
1200 983
1204 1000
1196 1013
1196 1013
1163 1029
1175 1021
1163 1021
1167 1013
1158 1017
1154 1013
1158 1033
1150 1038
1150 1042
1108 1071
1129 1054
1113 1063
1113 1054
1108 1058
1104 1058
1100 1063
1096 1058
1096 1067
1104 1071
1092 1075
1092 1067
1092 1075
1088 1079
1088 1075
1071 1083
1079 1092
1063 1092
1067 1096
1067 1104
1071 1100
1063 1113
1063 1113
1063 1108
1058 1113
1054 1108
1054 1117
1063 1117
1063 1133
1075 1167
1038 1167
1000 1150
992 1125
988 1104
963 1075
946 1033
925 1013
892 1004
879 1008
871 1029
858 1038
850 1033
817 1008
804 967
750 913
750 913
750 900
875 913
888 729
988 733
983 813
996 825
1004 821
1013 829
1033 833
1050 833
1058 846
1063 838
1071 850
1079 842
1083 854
1092 842
1092 846
1096 842
1108 854
1146 842
1171 854
1188 858
END
END
STATE
Utah
1
BOUNDARY
529 658
571 454
604 458
663 471
654 513
717 521
696 658
696 688
529 658
END
END
STATE
Vermont
1
BOUNDARY
1817 392
1804 396
1804 392
1796 363
1792 363
1788 346
1783 304
1833 296
1838 313
1825 329
1825 358
1825 388
1829 392
1817 392
END
END
STATE
Virginia
1
BOUNDARY
1779 663
1779 667
1775 667
1592 700
1592 700
1592 696
1529 704
1546 700
1579 663
1579 671
1588 671
1629 658
1633 646
1629 646
1642 608
1658 608
1663 592
1671 596
1679 575
1679 563
1700 575
1704 563
1721 575
1725 579
1721 600
1725 604
1729 600
1733 608
1763 613
1758 625
1733 613
1750 629
1763 629
1754 629
1763 633
1763 638
1758 638
1763 638
1742 633
1763 650
1763 650
1742 638
1738 642
1750 646
1763 654
1775 650
1783 667
1779 663
END
END
STATE
Washington
1
BOUNDARY
325 213
329 200
329 208
333 200
329 196
333 188
338 188
333 183
333 150
329 142
333 125
350 142
371 146
375 154
379 150
383 154
383 163
375 163
363 179
371 175
363 175
383 167
383 158
388 163
388 171
379 171
383 175
375 188
375 179
367 188
371 179
363 183
363 183
363 196
388 183
388 171
392 158
388 142
392 138
392 117
546 158
517 275
463 263
417 267
396 263
379 254
363 258
354 250
354 233
338 221
325 213
END
END
STATE
West Virginia
1
BOUNDARY
1646 579
1667 558
1671 563
1683 550
1696 554
1704 563
1700 575
1679 563
1679 575
1671 596
1663 592
1658 608
1642 608
1629 646
1633 646
1629 658
1588 671
1579 671
1579 663
1558 646
1550 625
1563 617
1567 600
1575 604
1579 588
1600 571
1604 542
1600 529
1604 525
1613 563
1633 558
1642 558
1646 579
END
END
STATE
Wisconsin
1
BOUNDARY
1271 471
1267 458
1271 450
1267 446
1267 442
1258 421
1217 392
1217 363
1213 358
1217 346
1229 338
1225 317
1233 313
1242 313
1271 300
1267 317
1279 317
1292 325
1350 338
1350 338
1363 346
1358 358
1367 358
1367 367
1367 371
1358 388
1363 392
1388 358
1367 417
1367 446
1371 479
1292 483
1283 483
1271 471
END
END
STATE
Wyoming
1
BOUNDARY
871 538
717 521
654 513
663 471
675 371
679 350
883 375
879 438
879 454
871 538
END
END





More information about the Squeak-dev mailing list