Text preview for : Lisa_Pascal_3.0_System_Software_1984.pdf part of apple Lisa Pascal 3.0 System Software 1984 apple lisa workshop_3.0 Lisa_Pascal_3.0_System_Software_1984.pdf



Back to : Lisa_Pascal_3.0_System_So | Home

Lisa.Systems Software

BEGIN {main program}
{----- Initialization - Generic to all applications using QuickDraw -----}
QDInit(@heapBuf, @heapBuf[8192], @heapError);

OpenPort(@myPort);
PaintRect(thePort' .portRect);
InitIcons; {moved to here from below stuffhex}
InitScales; {moved to here from below stuffhex}

DrawStuff;
REPEAT UNTIL KeyBdEvent(FALSE,FALSE,event) AND
(event.ascii () CHR(l));

PaintRect(thePort' .portRect);
SetRect(srcRect,O,O, 720,360); PROCEDl.Rf Dr awfi gure(vi twAng, rOllRng, pi tChAng :
myPicture := OpenPicture (srcRect); BEGIt! ewAngl e(vi eWAng);
vi
DrawStuff; Identi ty;
Roll (rollRng) ;
Pi tc~ ( pi tchAng);
Er aseRect( port1' . portRect) ;
fr aMeRect( portl' . portRect) ;
PI otGri d;
Lisa Pascal 3.0 Systems Software
Copyright
This manual and the software described in it are copyrighted with all rights
reserved. Under the copyright laws.. this manual or the software may not be
copied.. in whole or in part.. without the written consent of Apple.. except in
the normal use of t.he software or to make a backup copy. The same
proprietary and copyright notices must be affixed to any permitted copies as
were affixed to t.he originaL This exception does not allow copies to be
made for others.. whether or not sold.. but all the material purchased (with all
backup copies) may be SOld.. given, or loaned to another person. Under the
law.. copying includes translating into another language or format.
You may use the software on any computer owned by you, but extra copies
cannot be made for this purpose. For some products.. a multiuse license may
be purchased to allow the software to be used on more than one computer
ol,lmed by the purchaser.. including a shared-disk system. (Contact your
authorized Apple dealer for information on multiuse licenses.)


Licensing Requirements far Software Developers
Apple has a low-cost licensing program, which permits developers of
software for the Lisa to incorporate Apple-developed libraries and object
codes into their products. Both in-house and external distribution require a
license. Before distributing any products that incorporate Apple software,
please contact Software Licensing at the address below for both licensing and
technical information.



@1983" 1984 Apple Computer.. Inc.
20525 Mariani (fve.
Cupertino, CA 95014
(408) 996-1010


Apple.. Lisa.. ProFile" MacWorks, and the Apple logo are trademarks of Apple
Computer, Inc.
Macintosh is a trademark licensed to Apple Computer.. Inc.
Priam is a registered t.rademark of Priam, Inc. So~/ is a registered
trademark of Sony Corporation. Centronics is a registered trademark of
Centronics Dat.a Computer Corporation. VT52 and VT100 Me trademarks of
Digital Equipment Corporation.
Simultaneously published in the U.S.A. and Canada
Reorder Apple Product 1620-6149-8.
Limited Warranty on Media and Manuals
If you discove.r physical defects in the media on which this software is
distributed, or in the manuals distributed with the software, Apple will
replace the media or manuals at. no charge to you, provided you return the
item to be replaced with proof of purchase to Apple or an authorized Apple
dealer during the 9O-day period after you purchased the software. In some
countries the replacement period may be different; check with your
authorized Apple dealer.
ALL IMPLIED WARRANTIES ON THE MEDIA AND MANUAl, INCLUDING
IMPUED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
PARTICULAR PURPOSE, ARE LIMITED IN DURATION TO NINETY (90) DAYS
FROM THE DATE OF Tt-E ORIGINAL RETAIL PURCHASE OF THE
PRODUCT_
Even though Apple has tested the software and reviewed the documentation,
APPlE MAKES NO WARRANTY OR REPRESENTATION, EITt-ER EXPRESS
OR IMPlIED, WITH RESPECT TO THIS SOFTWARE, ITS QUALITY,
PERFORMANCE, MERCHANTABILITY, OR FITNESS FOR A PARTICULAR
PURPOSE- AS A RESULT, THIS SOFTWARE IS SOlD liAS IS,