1
0
mirror of synced 2026-04-18 17:27:25 +00:00
Files
Interlisp.medley/docs/internal/sketches/LYRIC/DOC/PNAMEACCESS.SKETCH
2022-07-02 22:08:47 -07:00

2 lines
8.2 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
((SKETCH %{DSK%}<LISPFILES>LYRIC>DOC>PNAMEACCESS.SKETCH VERSION 3 SKETCHCONTEXT ((ROUND 1 BLACK) (
GACHA 10 (MEDIUM REGULAR REGULAR)) (CENTER BASELINE) (CURVE 18.0 8) NIL NIL (CENTER CENTER) (NIL
NIL) T NIL NIL 1.0)) ((.048 56.0 NIL) (BOX (64.0 448.0 48.0 112.0) (ROUND 1 BLACK) NIL 1.0
(NIL NIL))) ((.05 11.0 NIL) (TEXT (88.0 . 568.0) ("\ATOMSPACE") 1.0 (CENTER BASELINE) (GACHA
8 (MEDIUM REGULAR REGULAR)) ((63.0 564.5 50.0 11.0)) BLACK)) ((.008000002 24.0 NIL) (BOX (
64.0 504.0 48.0 8.0) (ROUND 1 BLACK) NIL 1.0 (43605 NIL))) ((0.0 24.0 NIL) (OPENCURVE ((
112.0 . 560.0) (128.0 . 552.0) (136.0 . 536.0) (128.0 . 520.0) (112.0 . 512.0)) (ROUND 1
BLACK) NIL NIL 1.0 NIL)) ((.05 11.0 NIL) (TEXT (168.0 . 544.0) ("Word Offset") 1.0 (CENTER
BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((140.5 540.5 55.0 11.0)) BLACK)) ((.048 80.0 NIL
) (BOX (240.0 400.0 48.0 160.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 11.0 NIL) (TEXT
(264.0 . 568.0) ("\PNPSPACE") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((241.5
564.5 45.0 11.0)) BLACK)) ((0.0 52.0 NIL) (OPENCURVE ((288.0 . 560.0) (304.0 . 536.0) (
312.0 . 504.0) (304.0 . 480.0) (288.0 . 456.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((.008000002
24.0 NIL) (BOX (240.0 448.0 48.0 8.0) (ROUND 1 BLACK) NIL 1.0 (43605 NIL))) ((.05 11.0 NIL
) (TEXT (352.0 . 528.0) ("Word Offset * 2") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR
REGULAR)) ((314.5 524.5 75.0 11.0)) BLACK)) ((.008000002 24.0 NIL) (BOX (240.0 440.0 48.0
8.0) (ROUND 1 BLACK) NIL 1.0 (43605 NIL))) ((.05 11.0 NIL) (TEXT (216.0 . 456.0) ("POINTER")
1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((198.5 452.5 35.0 11.0)) BLACK)) ((
.05 14.0 NIL) (TEXT (80.0 . 608.0) ("How to Access PName") 1.0 (CENTER BASELINE) (GACHA 12 (
BOLD REGULAR REGULAR)) ((4.0 604.0 152.0 14.0)) BLACK)) ((.016 20.0 NIL) (BOX (56.0 280.0
40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (32800 NIL))) ((.016 20.0 NIL) (BOX (96.0 280.0 40.0
16.0) (ROUND 1 BLACK) NIL 1.0 (3840 NIL))) ((.016 40.0 NIL) (BOX (56.0 264.0 80.0 16.0) (
ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 40.0 NIL) (BOX (56.0 248.0 80.0 16.0) (ROUND 1
BLACK) NIL 1.0 (NIL NIL))) ((.016 40.0 NIL) (BOX (56.0 232.0 80.0 16.0) (ROUND 1 BLACK) NIL
1.0 (NIL NIL))) ((.05 11.0 NIL) (TEXT (168.0 . 352.0) ("PNAMELENGTH "
"(PNamme length,if it is THIN then in BYTE. " " else if it is FAT then in WORD "
"Does not include header word.)") 1.0 (LEFT BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((168.0
365.0 60.0 11.0) (168.0 354.0 215.0 11.0) (168.0 343.0 160.0 11.0) (168.0 332.0 150.0
11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (168.0 . 304.0) ("PNAMEFATPADDINGBYTE"
"(If this PName consists of FAT code then 0," "otherwise it means the PName includes THIN code, "
"and this BYTE is the first charcter of this PName.) ") 1.0 (LEFT BASELINE) (GACHA 8 (MEDIUM
REGULAR REGULAR)) ((168.0 317.0 95.0 11.0) (168.0 306.0 215.0 11.0) (168.0 295.0 245.0
11.0) (168.0 284.0 260.0 11.0)) BLACK)) ((0.0 108.0 NIL) (OPENCURVE ((240.0 . 448.0) (192.0
. 440.0) (144.0 . 416.0) (96.0 . 384.0) (64.0 . 360.0) (32.0 . 328.0) (24.0 . 304.0) (
40.0 . 296.0) (56.0 . 296.0)) (ROUND 1 BLACK) NIL (NIL (CURVE 18.0 8.0)) 1.0 NIL)) ((0.0
48.0 NIL) (OPENCURVE ((160.0 . 368.0) (136.0 . 368.0) (104.0 . 360.0) (80.0 . 344.0) (64.0
. 320.0) (64.0 . 288.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((0.0 20.0 NIL) (OPENCURVE ((
160.0 . 320.0) (144.0 . 320.0) (128.0 . 312.0) (120.0 . 288.0)) (ROUND 1 BLACK) NIL NIL 1.0
NIL)) ((.016 20.0 NIL) (BOX (400.0 416.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((
.016 20.0 NIL) (BOX (440.0 416.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (43605 NIL))) ((.016
40.0 NIL) (BOX (400.0 400.0 80.0 16.0) (ROUND 1 BLACK) NIL 1.0 (43605 NIL))) ((.05 10.0 (
PRI 12)) (TEXT (512.0 . 416.0) ("PNAMECELL") 1 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR
REGULAR)) ((489.5 413.0 45 10)) BLACK)) ((.05 10.0 (PRI 10)) (TEXT (456.0 . 456.0) (
"PACKAGEINDEX") 1 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((426.0 453.0 60 10))
BLACK)) ((0.0 96.0 NIL) (WIRE ((288.0 . 456.0) (480.0 . 432.0)) (ROUND 1 BLACK) NIL (2 4)
1.0 NIL)) ((0.0 56.0 NIL) (WIRE ((288.0 . 440.0) (400.0 . 400.0)) (ROUND 1 BLACK) NIL (2 4)
1.0 NIL)) ((0.0 16.0 NIL) (OPENCURVE ((416.0 . 456.0) (408.0 . 448.0) (408.0 . 440.0) (408.0
. 424.0)) (ROUND 1 BLACK) NIL NIL 1.0 NIL)) ((.05 11.0 NIL) (TEXT (64.0 . 192.0) (
"Example: NIL") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((34.0 188.5 60.0
11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (96.0 . 176.0) ("Its index number is 0."
"And,Its Length is 3 bytes.") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((41.0
178.0 110.0 11.0) (31.0 167.0 130.0 11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (96.0 . 408.0) (
"Points to" "PNAMEBASE") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((73.5 410.0
45.0 11.0) (73.5 399.0 45.0 11.0)) BLACK)) ((.016 20.0 NIL) (BOX (240.0 168.0 40.0 16.0)
(ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 20.0 NIL) (BOX (240.0 184.0 40.0 16.0) (ROUND 1
BLACK) NIL 1.0 (32800 NIL))) ((.016 20.0 NIL) (BOX (280.0 184.0 40.0 16.0) (ROUND 1 BLACK)
NIL 1.0 (NIL NIL))) ((.05 11.0 NIL) (TEXT (256.0 . 192.0) ("3") 1.0 (CENTER BASELINE) (
GACHA 8 (MEDIUM REGULAR REGULAR)) ((253.5 188.5 5.0 11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (
296.0 . 192.0) ("N") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((293.5 188.5
5.0 11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (256.0 . 176.0) ("I") 1.0 (CENTER BASELINE) (GACHA
8 (MEDIUM REGULAR REGULAR)) ((253.5 172.5 5.0 11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (304.0 .
176.0) ("L") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((301.5 172.5 5.0 11.0)
) BLACK)) ((.016 20.0 NIL) (BOX (280.0 168.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL)))
((.05 10.0 NIL) (TEXT (368.0 . 608.0) ("by Takeshi Shimizuu") 1.0 (CENTER BASELINE) (GACHA 8
(MEDIUM ITALIC REGULAR)) ((320.5 605.0 95.0 10.0)) BLACK)) ((.016 20.0 NIL) (BOX (240.0
120.0 40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (32800 NIL))) ((.016 20.0 NIL) (BOX (280.0 120.0
40.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 12.0 NIL) (TEXT (72.0 . 120.0) (
"Example") 1.0 (CENTER BASELINE) (GACHA 10 (MEDIUM REGULAR REGULAR)) ((47.5 117.0 49.0 12.0))
BLACK)) ((.05 10.0 NIL) (TEXT (56.0 . 112.0) ("Example: ÿ$?17ÿ") 1.0 (CENTER BASELINE) (CLASSIC
8 (MEDIUM REGULAR REGULAR)) ((24.5 109.0 63.0 10.0)) BLACK)) ((.05 11.0 NIL) (TEXT (88.0 .
96.0) ("Its index number is X." "And,Its Length is 3 wordes.") 1.0 (CENTER BASELINE) (GACHA 8 (
MEDIUM REGULAR REGULAR)) ((33.0 98.0 110.0 11.0) (20.5 87.0 135.0 11.0)) BLACK)) ((.05 11.0
NIL) (TEXT (256.0 . 128.0) ("3") 1.0 (CENTER BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((
253.5 124.5 5.0 11.0)) BLACK)) ((.05 11.0 NIL) (TEXT (296.0 . 128.0) ("0") 1.0 (CENTER
BASELINE) (GACHA 8 (MEDIUM REGULAR REGULAR)) ((293.5 124.5 5.0 11.0)) BLACK)) ((.016 40.0 NIL)
(BOX (240.0 104.0 80.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 40.0 NIL) (BOX (
240.0 88.0 80.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.016 40.0 NIL) (BOX (240.0 72.0
80.0 16.0) (ROUND 1 BLACK) NIL 1.0 (NIL NIL))) ((.05 10.0 NIL) (TEXT (282.0 . 96.0) ("ÿ$1ÿ")
1.0 (CENTER BASELINE) (CLASSIC 8 (MEDIUM REGULAR REGULAR)) ((277.5 93.0 9.0 10.0)) BLACK)) ((
.05 10.0 NIL) (TEXT (282.0 . 80.0) ("ÿ$7ÿ") 1.0 (CENTER BASELINE) (CLASSIC 8 (MEDIUM REGULAR
REGULAR)) ((277.5 77.0 9.0 10.0)) BLACK)) ((.05 10.0 NIL) (TEXT (282.0 . 108.0) ("ÿ$?ÿ") 1.0
(CENTER BASELINE) (CLASSIC 8 (MEDIUM REGULAR REGULAR)) ((277.5 105.0 9.0 10.0)) BLACK)))
(0.0 0.0 589.0 696.0)
1.0
8.0
?1(DEFAULTFONT 1 (GACHA 10) (GACHA 8) (TERMINAL 8))
U SKIO.GETFN.2 U