1
0
mirror of synced 2026-01-12 00:42:56 +00:00
Interlisp.medley/lispusers/BITMAPFNS.TEDIT
2020-11-15 19:22:14 -08:00

10 lines
4.1 KiB
Plaintext
Raw Permalink 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.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

en·vÅos BITMAPFNS
2
4
1
BITMAPFNS
1
4
By: Larry Masinter (Masinter.PA@Xerox.COM)
This document last edited on 4-mar-87
(READBINARYBITMAP WIDTH HEIGHT FILE) [Function]
reads a series of bytes from FILE and creates a WIDTH times HEIGHT bit map with contents. Note that each scanline of the bit map is rounded up to the nearest multiple of 16 bits (two bytes).
(WRITEBINARY BITMAP BITMAP FILE) [Function]
writes out BITMAP to FILE in format read by READBINARYBITMAP. Please note that READBINARYBITMAP must be supplied with width and height.
(WRITEBM FILE BITMAP) [Function]
writes BITMAP on FILE first preceding with width and height (in binary) such that it can be read in with READBM.
(READBM FILE) [Function]
reads width, height, and then appropriate size bit map.
(WRITEBMLST FILE LST) [Function]
writes a list of bit maps on FILE.
(READBMLST FILE) [Function]
reads a list of bit maps.
The following functions open and close FILE.
(READPRESS PRESSFILE) [Function]
reads press file PRESSFILE and returns a bit map. Can only handle press files generated by PRESSBITMAP and a couple of other utilities. Has no smarts, and is not easily extended.
(WINDOWBM BITMAP POSITION) [Function]
creates and returns a window containing image of BITMAP. Will be at POSITION or (GETPOSITION).
(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "") STARTINGPAGE# 26) (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 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL (PAPERSIZE NIL . LETTER) (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 NIL) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL (PAPERSIZE NIL . LETTER) (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 NIL) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL)))))2ÈÈ3ÈÈT,È,ŠŠ8,È ,ŠŠ8HÈÈ PAGEHEADING RUNNINGHEADCLASSICCLASSICCLASSICMODERN
MODERN MODERNMODERN

 HRULE.GETFNMODERN
 HRULE.GETFNMODERN
 HRULE.GETFNMODERN

 HRULE.GETFNMODERN  HRULE.GETFNMODERN ,&
} 
 n 
[
8  


'  

 
1) izº