envos EDITBG 2 4 1 EDITBG 1 4 By: Christopher Lane (Lane@Sumex-Aim.Stanford.Edu) EDITBG is a tool for editing both the background and background border shades. The functions CHANGEBACKGROUND and CHANGEBACKGROUNDBORDER both take a shade argument but the shade is interpreted di!erently. A normal black & white shade consists of 16 pixels (see EDITSHADE in the Interlisp Reference Manual) as does the border shade, which covers twice the area. The normal shade has 4 x 4 pixels but the border shade has 2 x 8 pixels where the pixels are twice as tall. WHITESHADE and BLACKSHADE appear the same for both, as does the standard background shade (shown below) but arbitrary shades do not appear the same. ((SKETCH a% figure% from% a% document VERSION 3 SKETCHCONTEXT ((ROUND 1 0) (GACHA 10 (MEDIUM REGULAR REGULAR)) (CENTER BASELINE) (CURVE 18.0 8) NIL NIL (CENTER CENTER) (NIL NIL) T NIL NIL 1.0) PRIRANGE (1 . 0)) ((0.016 16.0 (PRI 0)) (BOX (80.0 144.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.0 16.0 NIL) (WIRE ((112.0 . 176.0) (112.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (111.0 143.0 2.0 34.0))) ((0.05 10.0 NIL) (TEXT (104.0 . 168.0) ("14") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((100.0 165.0 8.0 10.0)) 0)) ((0.0 24.0 NIL) (WIRE ((144.0 . 160.0) (96.0 . 160.0)) (ROUND 1 0) NIL NIL 1.0 (95.0 159.0 50.0 2.0))) ((0.05 10.0 NIL) (TEXT (104.0 . 152.0) ("10") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((100.0 149.0 8.0 10.0)) 0)) ((0.0 16.0 NIL) (WIRE ((96.0 . 112.0) (96.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (95.0 111.0 2.0 34.0))) ((0.0 24.0 NIL) (WIRE ((144.0 . 144.0) (96.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (95.0 143.0 50.0 2.0))) ((0.05 10.0 NIL) (TEXT (88.0 . 136.0) ("7") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((86.0 133.0 4.0 10.0)) 0)) ((0.05 10.0 NIL) (TEXT (104.0 . 136.0) ("6") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((102.0 133.0 4.0 10.0)) 0)) ((0.05 10.0 NIL) (TEXT (120.0 . 152.0) ("9") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((118.0 149.0 4.0 10.0)) 0)) ((0.05 10.0 NIL) (TEXT (120.0 . 168.0) ("13") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((116.0 165.0 8.0 10.0)) 0)) ((0.0 16.0 NIL) (WIRE ((112.0 . 128.0) (80.0 . 128.0)) (ROUND 1 0) NIL NIL 1.0 (79.0 127.0 34.0 2.0))) ((0.0 8.0 NIL) (WIRE ((128.0 . 128.0) (144.0 . 128.0)) (ROUND 1 0) NIL NIL 1.0 (127.0 127.0 18.0 2.0))) ((0.016 16.0 (PRI 0)) (BOX (112.0 112.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.0 16.0 NIL) (WIRE ((128.0 . 176.0) (128.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (127.0 143.0 2.0 34.0))) ((0.05 10.0 NIL) (TEXT (88.0 . 120.0) ("3") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((86.0 117.0 4.0 10.0)) 0)) ((0.05 10.0 NIL) (TEXT (104.0 . 120.0) ("2") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((102.0 117.0 4.0 10.0)) 0)) ((0.06400001 32.0 NIL) (BOX (80.0 112.0 64.0 64.0) (ROUND 1 0) NIL 1.0 (NIL NIL))) ((0.05 10.0 NIL) (TEXT (136.0 . 120.0) ("0") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((134.0 117.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (136.0 . 136.0) ("4") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((134.0 133.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (136.0 . 152.0) ("8") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((134.0 149.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (136.0 . 168.0) ("12") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((132.0 165.0 8.0 10.0)) 0)) ((0.016 16.0 (PRI 0)) (BOX (176.0 144.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.05 10.0 (PRI 0)) (TEXT (184.0 . 128.0) ("7") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((182.0 125.0 4.0 10.0)) 0)) ((0.0 56.0 NIL) (WIRE ((304.0 . 144.0) (192.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (191.0 143.0 114.0 2.0))) ((0.0 16.0 NIL) (WIRE ((192.0 . 112.0) (192.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (191.0 111.0 2.0 34.0))) ((0.05 10.0 (PRI 0)) (TEXT (200.0 . 156.0) ("14") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((196.0 153.0 8.0 10.0)) 0)) ((0.05 12.0 (PRI 0)) (TEXT (112.0 . 188.0) ("Background") 1.0 (CENTER BASELINE) (MODERN 10 (BOLD REGULAR REGULAR)) ((84.0 185.0 56.0 12.0)) 0)) ((0.05 12.0 (PRI 0)) (TEXT (240.0 . 188.0) ("Background Border") 1.0 (CENTER BASELINE) (MODERN 10 (BOLD REGULAR REGULAR)) ((195.0 185.0 90.0 12.0)) 0)) ((0.0 16.0 NIL) (WIRE ((208.0 . 144.0) (208.0 . 176.0)) (ROUND 1 0) NIL NIL 1.0 (207.0 143.0 2.0 34.0))) ((0.0 16.0 NIL) (WIRE ((224.0 . 176.0) (224.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (223.0 143.0 2.0 34.0))) ((0.05 10.0 (PRI 0)) (TEXT (216.0 . 156.0) ("13") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((212.0 153.0 8.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (232.0 . 156.0) ("12") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((228.0 153.0 8.0 10.0)) 0)) ((0.016 16.0 (PRI 0)) (BOX (208.0 112.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.06400001 64.0 NIL) (BOX (176.0 112.0 128.0 64.0) (ROUND 1 0) NIL 1.0 (NIL NIL))) ((0.05 10.0 (PRI 0)) (TEXT (200.0 . 128.0) ("6") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((198.0 125.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (232.0 . 128.0) ("4") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((230.0 125.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (248.0 . 128.0) ("3") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((246.0 125.0 4.0 10.0)) 0)) ((0.0 16.0 NIL) (WIRE ((240.0 . 144.0) (240.0 . 112.0)) (ROUND 1 0) NIL NIL 1.0 (239.0 111.0 2.0 34.0))) ((0.016 16.0 (PRI 0)) (BOX (240.0 144.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.0 16.0 NIL) (WIRE ((256.0 . 144.0) (256.0 . 112.0)) (ROUND 1 0) NIL NIL 1.0 (255.0 111.0 2.0 34.0))) ((0.016 16.0 (PRI 0)) (BOX (272.0 112.0 16.0 32.0) (ROUND 1 0) NIL 1.0 (65535 NIL NIL))) ((0.05 10.0 (PRI 0)) (TEXT (264.0 . 128.0) ("2") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((262.0 125.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (264.0 . 156.0) ("10") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((260.0 153.0 8.0 10.0)) 0)) ((0.0 16.0 NIL) (WIRE ((272.0 . 176.0) (272.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (271.0 143.0 2.0 34.0))) ((0.05 10.0 (PRI 0)) (TEXT (280.0 . 156.0) ("9") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((278.0 153.0 4.0 10.0)) 0)) ((0.0 16.0 NIL) (WIRE ((288.0 . 176.0) (288.0 . 144.0)) (ROUND 1 0) NIL NIL 1.0 (287.0 143.0 2.0 34.0))) ((0.05 10.0 (PRI 0)) (TEXT (296.0 . 128.0) ("0") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((294.0 125.0 4.0 10.0)) 0)) ((0.05 10.0 (PRI 0)) (TEXT (296.0 . 156.0) ("8") 1.0 (CENTER BASELINE) (MODERN 8 (BOLD REGULAR REGULAR)) ((294.0 153.0 4.0 10.0)) 0)) ((0.05 12.0 (PRI 1)) (TEXT (192.0 . 92.0) ("34850 = 2^15 + 2^11 + 2^5 + 2^1") 1.0 (CENTER BASELINE) (MODERN 10 (BOLD REGULAR REGULAR)) ((109.0 89.0 166.0 12.0)) 0))) (78.0 88.0 228.0 110.0) 1.0 4 (EDITBACKGROUND) [Function] Brings up an edit tool (also available from the background menu) which lets you edit both a normal shade and a border shade and see how they combine: ?~Â0@DF"0@J&0AC*0%B@B*0&BB20$DDB"0ÄC000000UUUT UTUTUT0Ϊ0Ϊ0UUUT UTUTUT0UUUT UTUTUT0Ϊ0Ϊ0UUUT UTUTUT0UUUT UTUTUT0Ϊ0Ϊ0UUUT UTUTUT0UUUT UTUTUT0Ϊ0Ϊ0UWUV UTUTUT0UUUT UTUTUT000UUUT UTUTUT0UUUT UTUTUT000UUUT UTUTUT0UUUT UTUTUT000UUUT UTUTUT0UUUT UTUTUT000UWUVUVUVUV0UUUW UTUTUT000UUUW UTUTUT0UUUW UTUTUT000UUUW UTUTUT0UUUW UTUTUT000UUUW UTUTUT0UUUW UTUTUT000UWUW UTUTUT0UW UTUTUT000UW UTUTUT0UW UTUTUT000UW UTUTUT0UW UTUTUT000UW UTUTUT0UW UTUTUT000UWUVUVUV00000 The bottom half of the window has a background texture editor on the left and a border texture editor on the right. The top half of the window shows the background texture within the border texture as it would appear on the screen. Buttoning the small box in the center of the window will change the background and border textures on the screen to those displayed.(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "") STARTINGPAGE# 72) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "" "")) (174 42 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL NIL (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (282 42 72 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 444 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL NIL (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (282 42 72 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 444 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))))),3T2, ,,8,8H PAGEHEADING RUNNINGHEAD CLASSICCLASSICCLASSICMODERN MODERN ?1(DEFAULTFONT 1 (GACHA 10) (GACHA 8) (TERMINAL 8))  HELVETICA MODERN MODERN MODERN MODERN   HRULE.GETFNMODERN  HRULE.GETFNMODERN  HRULE.GETFNMODERN   HRULE.GETFNMODERN   HRULE.GETFNMODERN  3  SKIO.GETFN.2?1(DEFAULTFONT 1 (GACHA 10) (GACHA 8) (TERMINAL 8))   BMOBJ.GETFN3MODERN n1.z