|
|
Sample Programs from NeXSTEP 3.3
%!PS-Adobe-2.0 EPSF-2.0
%%Title: Stanford.eps
%%Creator: B. Reid
%%Pages: 0 1
%%BoundingBox: 100 20 600 750
%%EndComments
% A simplified version of the ~1980 Stanford campus.
% A non-PostScript version of this file was used
% in the various graphics classes at Stanford.
% The file was converted to PostScript by B. Reid.
%
% Note that this conversion process demonstrates
% one way you can get PostScript to use data files that
% are not in PostScript format. The data in the original
% file uses the "L" or "P" commands to display lines or
% filled polygons. "L" commands are followed by four numbers
% (the x and y for endpoints), the "P" commands are followed
% by the number of points and that many vertices.
% This program defines two PostScript functions "P" and "L"
% which simply swallow the required number of tokens that
% follow them. The "ct" function is used to read the next
% number from the file.
%
% Of course, one can always use a script or some program to
% convert such data files to PostScript instead. That is
% usually a better choice, especially when many such data
% files are involved.
%
% Finally, please do not use this map as a reference to
% Stanford campus; the campus has grown considerably
% since this map was drawn. The map also does not
% include the Medical School & associated buildings.
%
% Read the next token from the current program file.
% Assumes we have a token.
/ct {
currentfile token pop
} def
% L swallows two vertices from the file and draws a line.
/L {
ct ct moveto ct ct lineto stroke
} def
% P swallows a polygon and draws it.
/P {
/npts ct def
newpath ct ct moveto npts 1 sub
{ct ct lineto} repeat
closepath gsave 0.8 setgray fill grestore stroke
} def
% Finally change orientation so the data fills the page.
% Assumes 8.5 x 11, standard letter size page.
90 rotate
792 -612 translate
-0.5 0.5 scale
% And the data.
L 1499 656 1473 665
L 1473 665 1447 666
L 1447 666 1216 665
L 1216 665 1194 670
L 1194 670 1182 682
L 1182 682 1176 697
L 1176 697 1171 714
L 1171 714 1173 812
L 1173 812 1171 851
L 1171 851 1167 885
L 1167 885 1158 911
L 1158 911 1145 931
P 4
1499 596 1490 597 1491 613 1499 612
P 4
1480 590 1468 590 1469 616 1480 616
P 4
1423 624 1413 624 1413 642 1421 641
L 564 394 566 280
L 566 280 492 208
L 492 208 447 233
L 447 233 409 239
L 409 239 337 229
L 337 229 285 229
L 285 229 248 244
L 248 244 227 263
L 227 263 219 286
L 219 286 219 387
L 219 387 564 393
L 192 599 201 597
L 201 597 205 279
L 205 279 211 258
L 211 258 233 238
L 233 238 265 221
L 265 221 326 214
L 326 214 364 220
L 364 220 420 226
L 420 226 466 205
L 466 205 478 196
L 478 196 472 189
L 461 780 458 615
L 458 615 219 612
L 219 612 217 628
P 4
1391 616 1390 627 1408 626 1408 617
P 4
1368 629 1378 631 1378 614 1369 611
L 565 824 567 620
L 567 620 469 617
L 469 617 471 798
P 4
1390 635 1390 647 1406 646 1406 635
P 4
1380 635 1364 635 1364 643 1382 644
P 8
1313 567 1301 567 1300 572 1289 570 1286 595 1318 594 1320 582 1313 581
P 19
1373 483 1364 482 1362 496 1356 496 1355 482 1342 481 1343 504 1373 505
1373 531 1367 531 1368 552 1397 552 1397 523 1381 525 1380 507 1389 505
1389 495 1379 493 1374 498
P 8
1363 449 1350 448 1350 463 1343 461 1342 475 1374 477 1375 464 1365 463
P 4
1362 514 1362 535 1332 535 1333 516
P 8
1314 520 1296 519 1297 527 1309 528 1308 534 1297 534 1296 541 1315 542
P 20
1331 457 1323 457 1321 482 1315 481 1315 471 1298 470 1296 478 1307 478
1307 483 1298 482 1298 494 1307 491 1308 497 1297 499 1298 507 1315 507
1315 488 1322 489 1324 499 1333 499
L 754 919 755 725
L 755 725 576 722
L 576 722 575 838
L 844 624 827 656
L 827 656 825 693
L 825 693 835 742
L 835 742 772 715
L 772 715 759 713
L 759 713 577 708
L 577 708 577 620
L 577 620 644 621
L 644 621 656 632
L 656 632 672 633
L 672 633 686 629
L 686 629 692 619
L 692 619 843 624
P 5
1212 248 1211 259 1195 259 1195 248 1211 248
P 24
1276 195 1215 195 1214 187 1199 187 1198 194 1137 193 1138 203 1166 201
1169 234 1180 234 1181 263 1191 262 1192 222 1178 223 1179 202 1231 204
1230 224 1220 225 1217 263 1224 261 1227 233 1242 233 1243 205 1276 205
P 10
1246 575 1201 573 1201 588 1209 588 1211 614 1220 614 1220 608 1234 608
1234 614 1244 614
P 14
1200 503 1200 515 1223 516 1223 533 1201 532 1201 547 1223 547 1224 551
1269 550 1269 534 1240 534 1240 516 1246 516 1246 503
P 10
1166 438 1157 439 1158 463 1150 463 1151 543 1142 545 1143 556 1176 555
1176 542 1170 542
L 471 524 469 602
L 469 602 647 606
L 647 606 654 597
L 654 597 668 593
L 668 593 687 600
L 687 600 692 607
L 692 607 1067 612
P 8
1160 371 1136 371 1136 413 1156 412 1158 432 1179 431 1180 394 1159 394
P 16
1126 461 1087 462 1086 524 1081 525 1082 540 1128 540 1126 514 1115 515
1114 523 1102 523 1103 508 1127 509 1128 487 1103 488 1103 472 1127 472
P 8
1127 436 1089 437 1087 455 1102 456 1103 448 1111 450 1111 455 1129 455
P 8
1138 561 1127 560 1125 579 1113 579 1113 589 1151 589 1151 580 1139 579
P 16
1016 855 1016 874 1008 876 1009 885 1015 888 1016 908 1040 910 1039 899
1033 901 1033 887 1040 885 1040 874 1033 874 1033 863 1039 861 1038 854
L 502 199 569 266
L 569 266 580 279
L 580 279 580 406
L 580 406 218 402
L 218 402 215 598
L 215 598 454 601
L 454 601 455 524
P 8
1077 825 1076 906 1063 905 1063 913 1075 915 1076 936 1090 937 1088 824
P 4
1144 748 1144 763 1115 764 1113 748
L 888 265 1007 267
L 1007 267 1007 176
L 1007 176 990 141
P 8
1119 390 1089 390 1090 424 1110 424 1110 413 1099 413 1100 402 1117 402
P 4
1109 302 1110 348 1159 348 1161 303
P 18
1068 168 1058 166 1051 191 1058 193 1062 186 1092 194 1090 203 1100 206
1102 196 1115 199 1115 211 1120 211 1126 186 1120 184 1117 194 1107 190
1108 180 1074 172
P 4
1077 757 1078 767 1027 765 1029 758
P 4
1100 734 1069 735 1070 745 1098 745
L 1070 613 1074 357
L 1074 357 1090 352
L 1090 352 1089 281
L 1089 281 889 276
L 1315 262 1288 271
L 1288 271 1269 273
L 1269 273 1021 268
L 1021 268 1020 172
L 1020 172 997 126
L 997 126 972 90
P 4
1095 727 1091 727 1091 730 1095 730
P 4
1100 711 1070 710 1069 721 1100 723
P 4
1096 702 1091 703 1092 707 1096 707
P 4
1069 688 1069 699 1101 699 1102 687
P 16
1026 694 1027 700 1034 699 1035 707 1029 707 1029 729 1034 729 1033 737
1012 739 1011 729 1014 729 1015 706 1010 707 1010 697 1016 698 1016 694
P 8
1023 634 1025 660 1051 660 1052 680 1013 681 1012 656 1002 656 1002 634
P 6
1005 298 994 298 994 303 998 304 999 310 1006 310
P 8
1085 304 1073 303 1072 317 1066 317 1064 335 1026 335 1027 350 1084 349
L 1498 641 1481 650
L 1481 650 1458 653
L 1458 653 1444 578
L 1444 578 1412 493
L 1412 493 1388 446
L 1388 446 1371 426
L 1371 426 1342 409
L 1342 409 1304 399
L 1304 399 1211 396
L 1211 396 1167 356
L 1167 356 1100 354
L 1100 354 1102 281
L 1102 281 1280 286
L 1280 286 1320 273
P 12
1047 369 1047 402 1052 403 1051 413 1046 412 1047 431 1065 430 1064 411
1061 409 1061 403 1067 403 1066 369
P 17
1067 446 1022 446 1021 469 1048 470 1048 490 1034 489 1026 501 1035 511
1046 507 1046 533 1022 533 1021 558 1065 559 1066 535 1059 534 1061 470
1067 469
L 1446 655 1438 597
L 1438 597 1400 491
L 1400 491 1377 447
L 1377 447 1338 416
L 1338 416 1312 408
L 1312 408 1286 407
L 1286 407 1284 601
L 1284 601 1274 621
L 1274 621 1271 652
L 1271 652 1446 656
P 4
1027 423 1028 435 1037 433 1037 422
P 4
990 367 990 391 1034 392 1034 368
P 12
945 296 943 326 959 328 958 346 1001 347 1001 313 989 315 989 295
996 295 995 283 959 283 960 296
P 12
889 306 888 343 943 346 943 336 924 336 924 333 901 333 901 326
908 326 909 317 897 318 898 306
P 8
924 281 924 299 914 298 915 293 899 293 898 300 888 301 890 280
P 8
951 135 935 145 933 141 939 138 935 132 919 143 932 162 958 145
L 1198 655 1190 632
L 1190 632 1190 455
L 1190 455 1178 451
L 1178 451 1178 615
L 1178 615 1080 612
L 1080 612 1081 363
L 1081 363 1165 364
L 1165 364 1204 405
L 1204 405 1273 406
L 1273 406 1274 594
L 1274 594 1263 633
L 1263 633 1261 653
L 1261 653 1209 652
L 1209 652 1198 657
P 4
991 204 992 216 1003 215 1002 204
P 12
892 201 898 211 893 214 902 227 911 211 923 211 919 201 925 200
928 203 933 198 927 190 919 186
L 1186 657 1171 669
L 1171 669 1163 687
L 1163 687 1158 720
L 1158 720 1159 807
L 1159 807 998 803
L 998 803 997 701
L 997 701 983 702
L 983 702 969 717
L 969 717 922 740
L 922 740 930 688
L 930 688 929 659
L 929 659 914 626
L 914 626 1178 632
L 1178 632 1186 656
L 1124 940 1146 914
L 1146 914 1159 882
L 1159 882 1162 846
L 1162 846 1161 816
L 1161 816 997 811
L 997 811 998 934
P 4
966 225 959 226 960 236 969 236
P 8
947 230 940 233 942 238 914 244 916 252 946 246 947 253 956 248
L 897 641 860 641
L 860 641 852 647
L 852 647 842 669
L 842 669 840 700
L 840 700 849 736
L 849 736 862 762
L 862 762 878 770
L 878 770 889 766
L 889 766 905 745
L 905 745 917 703
L 917 703 915 657
L 915 657 898 639
P 71
985 413 930 413 930 424 947 425 948 418 959 419 960 428 969 429
970 451 976 452 977 463 945 463 947 453 931 452 929 461 921 462
921 452 900 452 899 462 889 462 888 453 900 441 881 423 861 439
872 454 870 460 858 461 858 451 835 450 833 459 828 460 827 450
812 450 809 459 781 460 779 448 788 448 791 426 801 425 802 417
811 417 811 423 827 423 826 410 774 409 775 487 803 487 803 499
776 498 774 579 874 581 874 575 863 575 864 526 873 526 873 519
813 518 813 467 946 470 946 520 880 518 878 526 893 527 893 575
885 576 886 582 983 583 983 502 954 502 954 491 985 491
P 4
938 367 939 390 978 391 979 366
P 8
889 364 888 371 899 371 898 380 889 380 889 388 927 388 928 365
P 8
845 375 847 388 781 388 781 379 788 379 786 367 802 366 805 374
P 6
872 363 830 363 829 371 853 372 852 388 873 389
P 4
822 358 810 359 811 368 823 366
P 18
845 292 815 291 814 282 794 281 791 289 788 290 787 329 793 331
793 344 815 344 815 331 844 331 844 326 854 327 854 318 865 317
865 307 855 306
P 12
866 209 852 213 856 224 842 228 851 273 863 273 865 260 877 261
877 245 865 247 860 231 872 228
P 8
714 635 714 655 706 655 706 675 714 675 713 700 744 700 744 635
L 891 773 878 775
L 878 775 865 771
L 865 771 878 789
L 878 789 893 772
P 12
723 519 708 519 708 523 693 523 694 558 701 560 700 552 706 552
707 561 717 561 717 533 724 533
P 4
744 566 703 566 704 578 745 577
P 40
744 412 735 412 735 422 718 421 718 412 710 412 710 458 714 458
714 470 673 469 672 479 664 478 662 467 650 467 649 458 635 459
633 450 620 450 620 459 605 459 605 497 621 497 620 502 635 502
636 508 646 507 648 511 661 510 661 502 667 502 670 510 724 511
724 450 734 449 735 460 742 460 744 452 748 451 748 424 744 422
P 6
751 361 733 360 731 368 740 367 740 378 751 378
P 5
787 226 766 228 766 247 787 249 793 237
L 858 781 841 754
L 841 754 835 758
L 835 758 773 729
L 773 729 771 779
L 771 779 855 782
P 4
779 196 786 213 709 239 707 219
P 16
739 260 708 259 708 282 718 281 718 298 685 298 685 324 719 325
718 332 724 332 726 327 747 328 747 295 729 293 729 282 739 282
P 4
710 191 717 201 707 208 699 198
P 4
734 184 741 195 750 189 744 179
P 4
732 156 738 165 729 172 721 162
P 4
611 801 587 802 587 820 612 819
L 982 782 982 727
L 982 727 947 744
L 947 744 921 755
L 921 755 898 782
L 898 782 982 783
P 6
592 759 577 759 577 782 586 782 585 771 590 771
P 20
677 639 656 638 656 643 649 644 648 652 652 652 652 668 641 668
640 686 650 687 651 693 677 693 678 688 689 685 690 668 680 669
680 654 683 653 683 643 677 644
P 4
657 539 657 565 682 564 682 539
P 4
639 564 638 576 596 575 595 565
P 4
639 535 639 547 596 547 594 533
P 20
650 374 636 374 636 396 644 397 644 413 637 414 637 432 649 432
650 419 663 419 663 432 674 432 674 412 668 414 668 396 675 396
674 374 663 374 663 387 651 386
P 8
628 300 613 299 604 308 589 308 588 344 601 345 611 337 629 337
P 12
680 248 652 249 653 258 631 258 631 248 603 247 602 288 629 289
629 278 649 278 648 288 678 289
P 4
651 223 631 224 631 243 652 242
P 4
690 167 682 173 688 182 696 177
P 4
662 153 671 163 679 155 670 147
P 4
643 135 651 143 659 135 650 128
L 863 871 863 790
L 863 790 772 788
L 772 788 772 870
L 772 870 861 871
P 4
611 191 619 200 628 193 620 185
P 4
600 202 593 210 600 218 608 211
P 4
592 171 601 179 609 169 601 163
L 983 871 983 790
L 983 790 894 790
L 894 790 892 871
L 892 871 984 872
P 4
572 179 564 185 573 193 580 186
P 5
553 172 545 175 550 183 556 179 552 175
P 20
534 755 492 755 491 771 484 770 484 753 477 752 476 785 479 784
480 797 493 798 494 785 528 786 530 799
541 799 540 787 547 786
546 771 528 770 528 766 534 765
P 4
534 717 535 742 549 742 549 718
P 12
522 640 505 640 504 648 498 649 498 670 527 672 528 666 535 667
534 657 529 658 531 649 524 650
P 8
484 504 483 540 479 540 478 574 545 574 546 541 543 542 543 504
P 22
502 337 477 338 476 376 549 376 549 338 540 339 540 333 523 334
523 321 539 322 540 317 552 317 552 272 518 272 518 305 510 305
511 272 476 271 476 316 489 316 488 321 502 321
L 862 936 862 886
L 862 886 772 884
L 772 884 771 931
P 16
525 431 536 433 536 442 541 442 541 470 537 472 536 479 525 480
525 493 546 491 547 480 553 481 553 438 549 438 549 421 524 421
P 16
500 431 511 430 510 421 487 421 486 438 483 438 482 473 486 474
486 490 510 490 509 480 501 480 501 475 496 474 497 439 500 439
P 6
394 539 394 574 431 574 432 566 405 565 406 539
L 891 937 892 884
L 892 884 982 887
L 982 887 983 935
P 24
412 442 410 476 401 477 400 494 412 493 411 530 419 530 421 504
434 504 435 508 441 509 441 487 437 488 435 494 421 493 422 476
434 475 434 485 441 485 441 464 435 463 435 466 421 465 421 442
P 24
362 450 340 450 340 443 355 441 356 421 364 423 366 443 382 442
382 421 390 421 390 442 404 442 405 451 382 451 383 464 379 466
378 479 382 477 381 488 364 487 363 479 369 478 367 465 363 464
P 88
332 346 325 346 324 373 329 374 326 381 316 381 316 375 291 375
290 370 284 371 283 373 271 374 271 348 263 348 263 335 270 336
269 339 285 340 285 334 301 335 301 340 306 339 306 324 301 323
300 328 289 330 287 324 271 324 270 329 263 329 264 317 271 316
271 293 282 292 284 296 290 295 289 291 317 291 316 283 329 282
330 289 323 291 324 307 330 306 331 324 348 325 350 310 357 308
357 289 352 290 351 281 365 282 364 293 388 293 390 297 395 297
394 293 407 293 407 317 417 316 417 330 406 330 404 326 391 326
391 330 380 330 379 326 373 327 374 341 378 339 378 335 391 335
392 341 406 341 408 335 416 336 416 351 408 351 405 374 367 373
366 382 349 383 350 375 356 375 357 346 349 347 349 355 335 353
P 9
176 370 166 377 152 361 130 364 127 354 150 349 160 328 169 331
160 350
showpage
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.