-+-+-+-+-+-+-+-+ START OF PART 184 -+-+-+-+-+-+-+-+
X
Xextern ptkboolean ptk_pickscanwindows ARGS((  Ppickpath *  pickpath,
X    Ppathorder  pathorder,   Pint *  windowid,   ptkewindowarea *  windoware
Va));
X
Xextern ptkboolean ptk_locscanwindows ARGS((  Pint  wsid,   Ppoint *  point,
X          Pint *  windowid,   ptkewindowarea *  windowarea,   Ppoint *  valu
Ve));
X
Xextern ptkboolean ptk_scanwindows ARGS((  Pint  wsid,   ptksgeneralinput *
V  input,
X                                 ptkswindowoutput *  output));
X
Xextern void ptk_inqpostedwindows ARGS((  Pint  wsid,   Pint  size,
X                               Pintlst *  windowids,   Pint *  totalsize,
X                               Pint *  err));
X
Xextern void ptk_inqwindowids ARGS((  Pint  size,   Pintlst *  windowids,
X                             Pint *  totalsize,   Pint *  err));
X
Xextern void ptk_inqwindowstructid ARGS((  Pint  windid,   Pint *  windowstid
V,
X                                    Pint *  iconstid,   Pint *  err));
X
Xextern void ptk_inqwindowname ARGS((  Pint  windid,   Pint *  name,
X                              Pint *  err));
X
Xextern ptkboolean ptk_inqfrontbackwindowid ARGS((  Pint  wsid,   Pint *  fro
Vntid,
X                  ptkewindowstate *  frontstate,   Pint *  backid,
X                  ptkewindowstate *  backstate,   Pint *  err));
X
Xextern void ptk_inqwindowposition ARGS((  Pint  windid,   Ppoint *  position
V,
X                                    Pint *  err));
X
Xextern void ptk_inqwindowsize ARGS((  Pint  windid,   Ppoint *  size,
X                                Pint *  err));
X
Xextern void ptk_inqiconposition ARGS((  Pint  windid,   Ppoint *  position,
X                                  Pint *  err));
X
Xextern void ptk_inqiconsize ARGS((  Pint  windid,   Ppoint *  size,   Pint *
V  err));
X
Xextern void ptk_inqusericon ARGS((  Pint  windid,   Pint *  iconstid,
X                               Pint *  err));
X
Xextern void ptk_inqframesize ARGS((  Pint  windid,   Ppoint *  size,
X                                Pint *  err));
X
Xextern void ptk_inqwindowtype ARGS((  Pint  windid,   ptkewindowtype *  type
V,
X                                Pint *  err));
X
Xextern void ptk_inqwindowattrs ARGS((  Pint  windid,
X        Pint *  titlefont,   Pint *  titlecolour,   Pint *  bannercolour,
X        Pint *  backgdcolour,   Pint *  edgecolour,
X        Pint *  frametlcolour,   Pint *  framebrcolour,   Pint *  err));
X
Xextern void ptk_seticonposition ARGS((  Pint  windid,   Ppoint *  position))
V;
X
Xextern void ptk_seticonsize ARGS((  Pint  windid,   Ppoint *  size));
X
Xextern void ptk_setusericon ARGS((  Pint  windid,   Pint  usericon));
X
Xextern void ptk_setbannercolours ARGS((  Pint  windid,   Pint  bannercolour,
X                                 Pint  titlecolour));
X
Xextern void ptk_setbannerheight ARGS((  Pint  windid,   Pfloat  bannerheight
V));
X
Xextern void ptk_inqbannerheight ARGS((  Pint  windid,   Pfloat *  bannerheig
Vht,
X                                  Pint *  err));
X
Xextern void ptk_setbannertitle ARGS((  Pint  windid,   Pchar *  titlestring)
V);
X
Xextern void ptk_inqbannertitle ARGS((  Pint  windid,   Pint  len,
X                      Pchar *  titlestr,   Pint *  totlen,   Pint *  err));
X
Xextern void ptk_scrollterminal ARGS((  Pint  windid,   Ptxpath  scrolldir,
X                             Pint  numlines));
X
Xextern void ptk_setterminaldata ARGS((  Pint  windid,   Pint  numlines,
X                                  Pint  txfont,   Pint  txcolour));
X
Xextern void ptk_inqterminaldata ARGS((  Pint  windid,   Pint *  numlines,
X              Pint *  numcolms,   Pint *  txfont,   Pint *  txcolour,
X              Pint *  err));
X
Xextern void ptk_refreshterminal ARGS((  Pint  windid));
X
Xextern void ptk_writeterminal ARGS((  Pint  windid,   Pchar *  str));
X
Xextern void ptk_writelnterminal ARGS((  Pint  windid,   Pchar *  str));
X
Xextern void ptk_printfterminal ARGS((  Pint  windid,   Pchar *  format, va_a
Vlist));
X
Xextern void ptk_clearterminal ARGS((  Pint  windid));
X
Xextern void ptk_writeintterminal ARGS((  Pint  windid,   Pint  number));
X
Xextern void ptk_writefloatterminal ARGS((  Pint  windid,   Pfloat  number));
X
Xextern void ptk_setterminalfloatformat ARGS((  Pint  windid,   Pchar *  rfor
Vmat));
X
Xextern void ptk_inqterminalfloatformat ARGS((  Pint  windid,   Pint  size,
X              Pint *  totalsize,   Pchar *  rformat,   Pint *  err));
X
Xextern void ptk_inqterminalstructid ARGS((  Pint  windid,   Pint *  termtext
Vstid,
X              Pint *  err));
X
Xextern void ptk_settopologyviewarea ARGS((  Pint  windid,   Plimit *  viewar
Vea));
X
Xextern void ptk_inqtopologyviewarea ARGS((  Pint  windid,   Plimit *  viewar
Vea,
X                                      Pint *  err));
X
Xextern void ptk_setcontentviewrange ARGS((  Pint  windid,   Pint  range1,
X                                      Pint  range2));
X
Xextern void ptk_inqcontentviewrange ARGS((  Pint  windid,   Pint *  range1,
X                                  Pint *  range2,   Pint *  err));
X
Xextern void ptk_setwindowtype ARGS((  Pint  windid,   ptkewindowtype  windty
Vpe));
$ CALL UNPACK [.INCLUDE]WINDFNS.H;1 1531765124
$ create 'f'
X/* types from wind.c */
X
X#ifndef _WINDTYPE_
X#define _WINDTYPE_
X
Xtypedef enum
X`7B
X  PTKESTRUCTWINDOW,
X  PTKETERMINALWINDOW,
X  PTKETOPOLOGYWINDOW,
X  PTKECONTENTWINDOW
X`7D ptkewindowtype;
X
Xtypedef enum
X`7B
X  PTKEWINDOWBANNER,
X  PTKEWINDOWFRAME,
X  PTKEWINDOWVIEW,
X  PTKEWINDOWICON
X`7D ptkewindowarea;
X
Xtypedef enum
X`7B
X  PTKEWINDOWOPEN,
X  PTKEWINDOWCLOSED,
X`7D ptkewindowstate;
X
Xtypedef enum
X`7B
X  PTKECAMERAON,
X  PTKECAMERAOFF,
X`7D ptkecamerastate;
X
Xtypedef struct
X`7B
X  Pint windowid;
X  ptkewindowarea windowarea;
X  ptkboolean measure;
X  Ppoint value;
X`7D ptkswindowoutput;
X
X#endif
X
X/* end of windtype.h */
$ CALL UNPACK [.INCLUDE]WINDTYPE.H;1 186678539
$ create 'f'
X$
X$! Creating ptk.olb
X$
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dtran.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dhash.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dplib.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dcns.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dmenu.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dphin.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dtopo.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dstct.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dmisc.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dtsl.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dwind.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Ddbug.c
X$ cc/noopt/define="VMS"/include_directory=`5B-.include`5D `5B-.source.librar
Vy`5Dview.c
X$ library/create/log ptk
X$ library/log ptk tran.obj
X$ library/log ptk hash.obj
X$ library/log ptk plib.obj
X$ library/log ptk cns.obj
X$ library/log ptk menu.obj
X$ library/log ptk phin.obj
X$ library/log ptk topo.obj
X$ library/log ptk stct.obj
X$ library/log ptk misc.obj
X$ library/log ptk tsl.obj
X$ library/log ptk wind.obj
X$ library/log ptk dbug.obj
X$ library/log ptk view.obj
X$ purge
$ CALL UNPACK [.LIBRARY]INSTALL.COM;1 106769397
$ create 'f'
X#
X# makefile for the PHIGS Toolkit library.
X# J.G. Williams 14/12/90
X#
X
X#DBG = debug/noopt/
XDBG = noopt/
X
XCFLAGS = $(DBG)define\="VMS"/include_directory\=`5B-.include`5D
XSRCDIR = `5B-.source.library`5D
X
Xptk.olb: tran.obj hash.obj plib.obj cns.obj menu.obj \
X             phin.obj topo.obj stct.obj misc.obj tsl.obj \
X             wind.obj dbug.obj view.obj
X`09library/create/log ptk
X        library/log ptk tran.obj
X        library/log ptk hash.obj
X        library/log ptk plib.obj
X        library/log ptk cns.obj
X        library/log ptk menu.obj
X        library/log ptk phin.obj
X        library/log ptk topo.obj
X        library/log ptk stct.obj
X        library/log ptk misc.obj
X        library/log ptk tsl.obj
X        library/log ptk wind.obj
X        library/log ptk dbug.obj
X        library/log ptk view.obj
X        purge
X`20
Xtran.obj: $(SRCDIR)tran.c`20
X`09cc/$(CFLAGS) $(SRCDIR)tran.c
X
Xhash.obj: $(SRCDIR)hash.c
X`09cc/$(CFLAGS) $(SRCDIR)hash.c
X
Xplib.obj: $(SRCDIR)plib.c
X`09cc/$(CFLAGS) $(SRCDIR)plib.c
X
Xcns.obj: $(SRCDIR)cns.c
X`09cc/$(CFLAGS) $(SRCDIR)cns.c
X
Xmenu.obj: $(SRCDIR)menu.c
X        cc/$(CFLAGS) $(SRCDIR)menu.c
X
Xphin.obj: $(SRCDIR)phin.c
X        cc/$(CFLAGS) $(SRCDIR)phin.c
X
Xtopo.obj: $(SRCDIR)topo.c
X        cc/$(CFLAGS) $(SRCDIR)topo.c
X
Xstct.obj: $(SRCDIR)stct.c
X        cc/$(CFLAGS) $(SRCDIR)stct.c
X
Xmisc.obj: $(SRCDIR)misc.c
X        cc/$(CFLAGS) $(SRCDIR)misc.c
X
Xtsl.obj: $(SRCDIR)tsl.c
X        cc/$(CFLAGS) $(SRCDIR)tsl.c
X
Xwind.obj: $(SRCDIR)wind.c
X        cc/$(CFLAGS) $(SRCDIR)wind.c
X
Xdbug.obj: $(SRCDIR)dbug.c
X        cc/$(CFLAGS) $(SRCDIR)dbug.c
X
Xview.obj: $(SRCDIR)view.c
X        cc/$(CFLAGS) $(SRCDIR)view.c
X
Xclean:
X`09delete tran.obj;, hash.obj;, plib.obj;, cns.obj;, \
X        menu.obj;, phin.obj;, topo.obj;, stct.obj;, misc.obj;, \
X        tsl.obj;, wind.obj;
X
$ CALL UNPACK [.LIBRARY]MAKEFILE.MAK;3 124193043
$ create 'f'
Xopen_structure "lamp"
Xlabel
X507
Xset_local_transformation3
X1.000000 0.000000 0.000000 0.500000
X0.000000 1.000000 0.000000 0.000000
X0.000000 0.000000 1.000000 0.500000
X0.000000 0.000000 0.000000 1.000000
XREPLACE
Xexecute_structure
X"base"
Xclose_structure
X
Xopen_structure "base"
Xset_local_transformation3
X0.300000 0.000000 0.000000 0.000000
X0.000000 0.300000 0.000000 0.000000
X0.000000 0.000000 0.300000 0.000000
X0.000000 0.000000 0.000000 1.000000
XREPLACE
Xadd_names_to_set
X1
X99
Xpolyline3
X5
X0.000000 0.300000 0.000000
X0.050000 0.300000 0.000000
X0.050000 0.300000 0.000000
X0.000000 0.300000 0.000000
X0.000000 0.300000 0.000000
Xpolyline3
X5
X0.050000 0.300000 0.000000
X0.050000 0.200000 0.000000
X0.050000 0.200000 0.000000
X0.050000 0.300000 0.000000
X0.050000 0.300000 0.000000
Xpolyline3
X5
X0.050000 0.200000 0.000000
X0.100000 0.200000 0.000000
X0.100000 0.200000 0.000000
X0.050000 0.200000 0.000000
X0.050000 0.200000 0.000000
Xpolyline3
X5
X0.100000 0.200000 0.000000
X0.150000 0.150000 0.000000
X0.150000 0.150000 0.000000
X0.100000 0.200000 0.000000
X0.100000 0.200000 0.000000
Xpolyline3
X5
X0.150000 0.150000 0.000000
X0.400000 0.050000 0.000000
X0.400000 0.050000 0.000000
X0.150000 0.150000 0.000000
X0.150000 0.150000 0.000000
Xpolyline3
X5
X0.400000 0.050000 0.000000
X0.450000 0.000000 0.000000
X0.450000 0.000000 0.000000
X0.400000 0.050000 0.000000
X0.400000 0.050000 0.000000
Xpolyline3
X5
X0.000000 0.300000 0.000000
X0.050000 0.300000 0.000000
X0.047553 0.300000 -0.015451
X0.000000 0.300000 0.000000
X0.000000 0.300000 0.000000
Xpolyline3
X5
X0.050000 0.300000 0.000000
X0.050000 0.200000 0.000000
X0.047553 0.200000 -0.015451
X0.047553 0.300000 -0.015451
X0.050000 0.300000 0.000000
Xpolyline3
X5
X0.050000 0.200000 0.000000
X0.100000 0.200000 0.000000
X0.095106 0.200000 -0.030902
X0.047553 0.200000 -0.015451
X0.050000 0.200000 0.000000
Xpolyline3
X5
X0.100000 0.200000 0.000000
X0.150000 0.150000 0.000000
X0.142658 0.150000 -0.046353
X0.095106 0.200000 -0.030902
X0.100000 0.200000 0.000000
Xpolyline3
X5
X0.150000 0.150000 0.000000
X0.400000 0.050000 0.000000
X0.380423 0.050000 -0.123607
X0.142658 0.150000 -0.046353
X0.150000 0.150000 0.000000
Xpolyline3
X5
X0.400000 0.050000 0.000000
X0.450000 0.000000 0.000000
X0.427975 0.000000 -0.139058
X0.380423 0.050000 -0.123607
X0.400000 0.050000 0.000000
Xpolyline3
X5
X0.000000 0.300000 0.000000
X0.047553 0.300000 -0.015451
X0.040451 0.300000 -0.029389
X0.000000 0.300000 0.000000
X0.000000 0.300000 0.000000
Xpolyline3
X5
X0.047553 0.300000 -0.015451
X0.047553 0.200000 -0.015451
X0.040451 0.200000 -0.029389
X0.040451 0.300000 -0.029389
X0.047553 0.300000 -0.015451
Xpolyline3
X5
X0.047553 0.200000 -0.015451
X0.095106 0.200000 -0.030902
X0.080902 0.200000 -0.058779
X0.040451 0.200000 -0.029389
X0.047553 0.200000 -0.015451
Xpolyline3
X5
X0.095106 0.200000 -0.030902
X0.142658 0.150000 -0.046353
X0.121353 0.150000 -0.088168
X0.080902 0.200000 -0.058779
X0.095106 0.200000 -0.030902
Xpolyline3
X5
X0.142658 0.150000 -0.046353
X0.380423 0.050000 -0.123607
X0.323607 0.050000 -0.235114
X0.121353 0.150000 -0.088168
X0.142658 0.150000 -0.046353
Xpolyline3
X5
X0.380423 0.050000 -0.123607
X0.427975 0.000000 -0.139058
X0.364058 0.000000 -0.264503
X0.323607 0.050000 -0.235114
X0.380423 0.050000 -0.123607
Xpolyline3
X5
X0.000000 0.300000 0.000000
X0.040451 0.300000 -0.029389
X0.029389 0.300000 -0.040451
X0.000000 0.300000 0.000000
X0.000000 0.300000 0.000000
Xpolyline3
X5
X0.040451 0.300000 -0.029389
X0.040451 0.200000 -0.029389
X0.029389 0.200000 -0.040451
X0.029389 0.300000 -0.040451
X0.040451 0.300000 -0.029389
Xpolyline3
X5
X0.040451 0.200000 -0.029389
X0.080902 0.200000 -0.058779
X0.058779 0.200000 -0.080902
X0.029389 0.200000 -0.040451
X0.040451 0.200000 -0.029389
Xpolyline3
X5
X0.080902 0.200000 -0.058779
X0.121353 0.150000 -0.088168
X0.088168 0.150000 -0.121353
X0.058779 0.200000 -0.080902
X0.080902 0.200000 -0.058779
Xpolyline3
X5
X0.121353 0.150000 -0.088168
X0.323607 0.050000 -0.235114
X0.235114 0.050000 -0.323607
X0.088168 0.150000 -0.121353
X0.121353 0.150000 -0.088168
Xpolyline3
X5
X0.323607 0.050000 -0.235114
X0.364058 0.000000 -0.264503
X0.264503 0.000000 -0.364058
X0.235114 0.050000 -0.323607
X0.323607 0.050000 -0.235114
Xpolyline3
X5
X0.000000 0.300000 0.000000
X0.029389 0.300000 -0.040451
X0.015451 0.300000 -0.047553
X0.000000 0.300000 0.000000
X0.000000 0.300000 0.000000
Xpolyline3
X5
X0.029389 0.300000 -0.040451
X0.029389 0.200000 -0.040451
X0.015451 0.200000 -0.047553
X0.015451 0.300000 -0.047553
X0.029389 0.300000 -0.040451
Xpolyline3
X5
X0.029389 0.200000 -0.040451
X0.058779 0.200000 -0.080902
X0.030902 0.200000 -0.095106
+-+-+-+-+-+-+-+-  END  OF PART 184 +-+-+-+-+-+-+-+-