-+-+-+-+-+-+-+-+ START OF PART 139 -+-+-+-+-+-+-+-+
Xf(may)0 1703 y(be)d(one)f(of)g(BANNER,)h(VIEW)l(,)g(FRAME)g(or)f(ICON.)g(The
V)
Xh(function)e(returns)h(TRUE)h(if)f(a)h(window)e(was)i(picked,)g(otherwise)0
X1753 y(F)m(ALSE.)p 1373 1850 494 2 v 1373 1929 2 80 v 1387
X1904 a Fb(ptkf_posttowindow)p 1864 1929 V 1373 1931 494 2 v
X11 2005 a Fq(SUBROUTINE)g Fp(ptkf_posttowindow)d Fq(\(windid,)h(id\))25
X2094 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X2144 y(IN)50 b(INTEGER)g Fa(id)122 b Fq(item)11 b(identi\256er)n(.)0
X2219 y(This)e(function)f(posts)h(an)h(item)f(to)g(a)h(window)e(depending)h
X(on)g(the)g(window)f(type.)15 b(In)9 b(the)g(case)i(of)e(STRUCT)h(and)f
X(CONTENT)0 2269 y(windows,)i Fi(id)h Fq(is)g(a)g(structure)f(identi\256er)n
X(.)k(For)d(T)o(OPOLOGY)g(windows,)f Fi(id)i Fq(is)e(a)h(topology)e
X(identi\256er)n(.)15 b(If)c(the)h(window)e(is)i(a)0 2319 y(TERMINAL)g(window
V)
Xe(this)g(function)g(is)h(ignored.)0 2956 y(13th)22 b(May)m(,)12
Xb(1992)626 b(236)828 b(2.01)p eop
X%%Page: 237 238
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1419 -19 447 2 v 1419 60 2 80 v 1434 35 a Fb(ptkf_postwindow)p
X1864 60 V 1419 62 447 2 v 11 136 a Fq(SUBROUTINE)12 b Fp(ptkf_postwindow)e
XFq(\(windid\))25 236 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10
Xb(identi\256er)n(.)0 335 y(This)16 b(function)f(posts)h(a)h(window)e
X(structure)g(to)h(the)g(workstation)f(speci\256ed)i(when)f(the)g(window)f
X(was)i(initially)d(created.)0 385 y(W)n(indows)d(are)h(bound)f(to)g
X(workstation)e(because)k(they)f(each)g(use)g(one)g(view)f(table)h(entry)f(to
V)
Xf(de\256ne)j(the)e(window)f(view)m(.)17 b(The)0 435 y(priority)8
Xb(of)i(the)g(window)f(structure)h(is)g(controlled)f(by)g(the)i(PHIGS)f(T)m
X(oolkit)f(window)g(system)h(to)g(provide)f(an)i(ordered)f(stack-)0
X485 y(ing)g(mechanism)j(for)e(windows.)p 1347 582 520 2 v 1347
X661 2 80 v 1361 636 a Fb(ptkf_refreshterm)o(ina)o(l)p 1864
X661 V 1347 663 520 2 v 11 737 a Fq(SUBROUTINE)h Fp(ptkf_r)o(efr)o
X(eshterminal)g Fq(\(windid\))25 837 y(IN)50 b(INTEGER)g Fa(windid)f
XFq(terminal)10 b(window)h(identi\256er)n(.)0 936 y(This)g(function)f
X(refreshes)i(the)f(TERMINAL)h(window)e(so)i(that)e(the)i(last)f(text)f(line)
Vh
X(is)g(visible.)p 1426 1033 440 2 v 1426 1113 2 80 v 1440 1087
Xa Fb(ptkf_resetcamer)o(a)p 1864 1113 V 1426 1115 440 2 v 11
X1189 a Fq(SUBROUTINE)h Fp(ptkf_r)o(esetcamera)h Fq(\(windid\))25
X1288 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)0
X1388 y(This)h(function)f(resets)i(the)f(camera)i(variables)f(to)e(their)h
X(default)g(values.)k(The)d(camera)h(view)f(volume)e(is)i(left)e(unchanged.)p
X1210 1485 656 2 v 1210 1564 2 80 v 1225 1539 a Fb(ptkf_rotatec)o(am)o(era)o
X(positi)o(on)p 1864 1564 V 1210 1566 656 2 v 11 1640 a Fq(SUBROUTINE)i
XFp(ptkf_r)o(otatecameraposition)e Fq(\(windid,)g(spinangle\))25
X1729 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X1779 y(IN)50 b(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e
X(degrees.)0 1854 y(This)j(function)f(rotates)i(the)f(camera)j(position)11
Xb(in)i(a)h(circle)g(centred)g(at)f(the)h(point)e(of)h(interest)g(and)g(about
V)
Xg(the)g(axis)h(de\256ned)0 1904 y(by)d(the)g(function)e Fi
X(ptk_setpositionaxis)p Fq(.)19 b(The)12 b(amount)e(of)h(rotation)f(is)h
XFi(angle)h Fq(degrees)g(and)f(the)g(function)e(is)i(useful)g(for)0
X1953 y(rotating)f(around)g(an)i(object.)p 1181 2051 686 2 v
X1181 2130 2 80 v 1195 2104 a Fb(ptkf_rotateca)o(me)o(rap)o(tint)o(ere)o(st)p
X1864 2130 V 1181 2132 686 2 v 11 2206 a Fq(SUBROUTINE)g Fp(ptkf_r)o
X(otatecameraptinter)o(est)g Fq(\(windid,)e(swivelangle\))25
X2295 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X2344 y(IN)50 b(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e
X(degrees.)0 2419 y(This)k(function)e(rotates)h(the)h(camera)h(point)d(of)i
X(interest)f(in)g(a)h(circle)g(centred)g(at)f(the)h(camera)i(position)11
Xb(and)j(about)f(the)g(axis)0 2469 y(de\256ned)e(by)g(the)f(function)g
XFi(ptk_setptinterestaxis)p Fq(.)19 b(The)11 b(amount)g(of)f(rotation)f(is)i
XFi(angle)h Fq(degrees)g(and)e(the)h(function)e(is)0 2519 y(useful)i(for)g
X(panning)f(around)h(a)g(scene.)0 2956 y(13th)22 b(May)m(,)12
Xb(1992)626 b(237)828 b(2.01)p eop
X%%Page: 238 239
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1194 -19 673 2 v 1194 60 2 80 v 1208 35 a Fb(ptkf_rotateca)o(me)
Vo
X(raupve)o(ct)o(or)p 1864 60 V 1194 62 673 2 v 11 136 a Fq(SUBROUTINE)12
Xb Fp(ptkf_r)o(otatecameraupvector)g Fq(\(windid,)e(twistangle\))25
X225 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X275 y(IN)50 b(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e(degrees.
V)
X0 350 y(This)15 b(function)e(rotates)i(the)g(camera)i(up)d(vector)h(about)f
X(the)h(axis)g(joining)d(the)j(camera)i(position)c(to)h(the)h(point)e(of)i
X(interest)0 400 y(by)c Fi(angle)h Fq(degrees.)p 1257 497 610
X2 v 1257 576 2 80 v 1271 551 a Fb(ptkf_rotateposit)o(ionxa)o(xis)p
X1864 576 V 1257 578 610 2 v 11 652 a Fq(SUBROUTINE)g Fp(ptkf_r)o
X(otatepositionxaxis)d Fq(\(windid,)h(angle\))25 741 y(IN)50
Xb(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X791 y(IN)50 b(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e(degrees.
V)
X0 866 y(This)k(function)f(rotates)i(the)f(camera)j(position)12
Xb(in)i(a)h(circle)g(centred)g(at)f(the)h(point)e(of)h(interest)g(and)g(about
V)
Xg(the)h(y)f(axis)g(of)h(a)0 915 y(right-handed)10 b(coordinate)g(system)i
X(whose)f(z)h(axis)g(is)f(de\256ned)g(by)g(the)g(camera)j(position)9
Xb(point)h(of)h(interest.)p 1257 1013 V 1257 1092 2 80 v 1271
X1066 a Fb(ptkf_rotateposit)o(ionya)o(xis)p 1864 1092 V 1257
X1094 610 2 v 11 1168 a Fq(SUBROUTINE)h Fp(ptkf_r)o(otatepositionyaxis)d
XFq(\(windid,)h(angle\))25 1257 y(IN)50 b(INTEGER)g Fa(windid)f
XFq(window)10 b(identi\256er)n(.)25 1306 y(IN)50 b(REAL)119
Xb Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e(degrees.)0 1382
Xy(This)k(function)f(rotates)i(the)f(camera)j(position)12 b(in)i(a)h(circle)g
X(centred)g(at)f(the)h(point)e(of)h(interest)g(and)g(about)g(the)h(x)f(axis)g
X(of)h(a)0 1431 y(right-handed)10 b(coordinate)g(system)i(whose)f(z)h(axis)g
X(is)f(de\256ned)g(by)g(the)g(camera)j(position)9 b(point)h(of)h(interest.)p
X1227 1528 640 2 v 1227 1608 2 80 v 1241 1582 a Fb(ptkf_rotatepti)o(nter)o
X(estxa)o(xis)p 1864 1608 V 1227 1610 640 2 v 11 1684 a Fq(SUBROUTINE)h
XFp(ptkf_r)o(otateptinter)o(estxaxis)f Fq(\(windid,)f(angle\))25
X1772 y(IN)50 b(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X1822 y(IN)50 b(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e
X(degrees.)0 1897 y(This)16 b(function)f(rotates)g(the)h(camera)i(point)d(of)
Vh
X(interest)f(in)g(a)i(circle)f(centred)h(at)f(the)g(camera)i(position)c(and)i
X(about)f(the)h(y)0 1947 y(axis)11 b(of)g(a)h(right-handed)e(coordinate)g
X(system)i(whose)g(z)f(axis)h(is)f(de\256ned)g(by)g(the)g(camera)j(position)9
Xb(point)h(of)h(interest.)p 1227 2044 V 1227 2123 2 80 v 1241
X2098 a Fb(ptkf_rotatepti)o(nter)o(estya)o(xis)p 1864 2123 V
X1227 2125 640 2 v 11 2199 a Fq(SUBROUTINE)h Fp(ptkf_r)o(otateptinter)o
X(estyaxis)f Fq(\(windid,)f(angle\))25 2288 y(IN)50 b(INTEGER)g
XFa(windid)f Fq(window)10 b(identi\256er)n(.)25 2338 y(IN)50
Xb(REAL)119 b Fa(angle)62 b Fq(rotation)9 b(angle)j(in)e(degrees.)0
X2413 y(This)16 b(function)f(rotates)g(the)h(camera)i(point)d(of)h(interest)f
X(in)g(a)i(circle)f(centred)h(at)f(the)g(camera)i(position)c(and)i(about)f
X(the)h(x)0 2463 y(axis)11 b(of)g(a)h(right-handed)e(coordinate)g(system)i
X(whose)g(z)f(axis)h(is)f(de\256ned)g(by)g(the)g(camera)j(position)9
Xb(point)h(of)h(interest.)0 2956 y(13th)22 b(May)m(,)12 b(1992)626
Xb(238)828 b(2.01)p eop
X%%Page: 239 240
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1283 -19 583 2 v 1283 60 2 80 v 1298 35 a Fb(ptkf_scalevie)o
X(wwindow)p 1864 60 V 1283 62 583 2 v 11 136 a Fq(SUBROUTINE)12
Xb Fp(ptkf_scaleviewwindow)e Fq(\(windid,)g(scalefactor\))25
X225 y(IN)50 b(INTEGER)g Fa(windid)119 b Fq(window)10 b(identi\256er)n(.)25
X275 y(IN)50 b(REAL)119 b Fa(scalefactor)46 b Fq(scale)13 b(factor)n(.)0
X350 y(This)g(function)e(scales)j(the)f(view)f(window)g(uniformly)f(by)h
XFi(scalefactor)p Fq(.)22 b(A)13 b(scalefactor)h(in)e(the)h(range)g(`5B0,)g(1
V`5D)g
X(will)e(scale)0 400 y(down)g(the)g(view)g(window)f(and)h(create)i(a)f
X(zoom-in)f(ef)o(fect.)16 b(A)11 b(scalefactor)h(greater)g(than)f(1.0)g(will)
Vf
X(give)h(a)h(zoom-out)f(ef)o(fect.)p 1380 497 487 2 v 1380 576
X2 80 v 1394 551 a Fb(ptkf_scrollterm)o(ina)o(l)p 1864 576 V
X1380 578 487 2 v 11 652 a Fq(SUBROUTINE)h Fp(ptkf_scr)o(ollterminal)e
XFq(\(windid,)g(scrolldir)n(,)g(numlines\))25 741 y(IN)50 b(INTEGER)g
XFa(windid)90 b Fq(terminal)11 b(window)f(identi\256er)n(.)25
X791 y(IN)50 b(INTEGER)g Fa(scrolldir)67 b Fq(scroll)11 b(direction)e(\(up)i
X(or)g(down\).)25 840 y(IN)50 b(INTEGER)g Fa(numlines)e Fq(number)11
Xb(of)g(lines)g(to)g(scroll)f(by)m(.)0 909 y(This)h(function)f(scrolls)h(the)
Vg
X(contents)g(of)g(the)g(TERMINAL)h(window)e(either)h(UP)g(or)g(DOWN)h(by)f
XFi(numlines)p Fq(.)p 1307 1006 560 2 v 1307 1086 2 80 v 1321
X1060 a Fb(ptkf_setbannerco)o(lours)p 1864 1086 V 1307 1088
X560 2 v 11 1162 a Fq(SUBROUTINE)h Fp(ptkf_setbanner)o(colours)g
XFq(\(windid,)e(bannercolour)n(,)h(titlecolour\))25 1250 y(IN)50
Xb(INTEGER)g Fa(windid)155 b Fq(window)10 b(identi\256er)n(.)25
X1300 y(IN)50 b(INTEGER)g Fa(bannercolo)o(ur)d Fq(banner)11
Xb(colour)f(index.)25 1350 y(IN)50 b(INTEGER)g Fa(titlecolour)102
Xb Fq(title)10 b(string)g(colour)g(index.)0 1419 y(This)k(function)f(sets)h
X(the)g(colour)f(indicies)h(of)g(a)g(window)f(banner)n(.)24
Xb(It)13 b(is)h(useful)g(for)g(highlighti)o(ng)d(a)k(current)e(window)m(,)i
X(for)0 1469 y(example)d(in)f(a)h(`60point)d(and)j(click')e(window)h(system.)
Vp
X1333 1566 533 2 v 1333 1645 2 80 v 1347 1620 a Fb(ptkf_setbannerheigh)o(t)p
X1864 1645 V 1333 1647 533 2 v 11 1721 a Fq(SUBROUTINE)h Fp
X(ptkf_setbannerheight)g Fq(\(windid,)e(bannerheight\))25 1810
Xy(IN)50 b(INTEGER)g Fa(windid)155 b Fq(window)10 b(identi\256er)n(.)25
X1860 y(IN)50 b(REAL)119 b Fa(bannerheig)o(ht)47 b Fq(height)10
Xb(of)h(banner)n(.)0 1935 y(This)i(function)f(sets)i(the)g(height)e(of)h(the)
Vh
X(window)e(banner)i(to)f Fi(bannerheight)i Fq(which)e(is)h(given)f(in)f(the)i
X(range)g(`5B0,)g(1`5D.)22 b(The)0 1985 y(window)10 b(title)g(is)h(re-scaled)
Vi(to)
Xd(\256t)h(the)g(new)h(height.)p 1390 2082 477 2 v 1390 2161
X2 80 v 1404 2135 a Fb(ptkf_setbannerti)o(tl)o(e)p 1864 2161
XV 1390 2163 477 2 v 11 2237 a Fq(SUBROUTINE)g Fp(ptkf_setbannertitle)f
XFq(\(windid,)f(titlestring\))25 2326 y(IN)50 b(INTEGER)193
Xb Fa(windid)90 b Fq(window)10 b(identi\256er)n(.)25 2375 y(IN)50
Xb(CHARACTER*\(*\))e Fa(titlestring)f Fq(title)10 b(string)g(of)h(window)f
X(banner)n(.)0 2451 y(This)15 b(function)e(sets)i(the)g(title)f(string)f(of)i
X(a)g(window)m(.)25 b(The)16 b(title)d(is)i(displayed)f(in)g(the)h(window)f
X(banner)g(and)h(is)g(automati-)0 2500 y(cally)c(scaled)h(to)f(\256t)g(inside
V)
Xg(the)g(banner)g(area.)0 2956 y(13th)22 b(May)m(,)12 b(1992)626
Xb(239)828 b(2.01)p eop
X%%Page: 240 241
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1337 -19 530 2 v 1337 60 2 80 v 1351 35 a Fb(ptkf_setcame)o(ral)
Vo
X(imi)o(ts)p 1864 60 V 1337 62 530 2 v 11 136 a Fq(SUBROUTINE)12
Xb Fp(ptkf_setcameralimits)e Fq(\(windid,)g(limits,)g(adjust\))25
X225 y(IN)50 b(INTEGER)k Fa(windid)73 b Fq(window)10 b(identi\256er)n(.)25
X275 y(IN)50 b(REAL)123 b Fa(limits\(6\))49 b Fq(camera)13 b(viewing)d(limits
V)
Xg(in)h(WC.)25 324 y(IN)50 b(LOGICAL)f Fa(adjust)78 b Fq(adjust)10
Xb(given)h(limits.)0 393 y(This)h(function)e(sets)i(the)f(view)g(volume)h(of)
Vf
X(the)g(camera)j(to)d(the)g(speci\256ed)i(bounding)c(box)i(given)g(in)g(W)m
X(orld)f(Coordinates.)15 b(If)0 443 y Fi(adjust)10 b Fq(is)f(set)h(to)f(TRUE)
Vg
X(then)g(the)g(bounding)e(box)i(will)f(be)h(adjusted)g(to)g(be)g(the)g
X(bounding)f(box)g(of)h(a)h(sphere)g(which)f(encloses)0 493
Xy(the)i(original)f(box.)p 1280 590 587 2 v 1280 669 2 80 v
X1294 644 a Fb(ptkf_setcamera)o(positi)o(on)p 1864 669 V 1280
X671 587 2 v 11 745 a Fq(SUBROUTINE)i Fp(ptkf_setcameraposition)e
XFq(\(windid,)g(position\))25 834 y(IN)50 b(INTEGER)g Fa(windid)113
Xb Fq(window)11 b(identi\256er)n(.)25 884 y(IN)50 b(REAL)119
Xb Fa(position\(3\))46 b Fq(camera)14 b(position.)0 959 y(This)d(function)f
X(sets)i(the)f(camera)i(position)c(to)i Fi(position)i Fq(which)e(is)g(given)f
X(in)h(W)m(orld)f(Coordinates.)p 1274 1056 593 2 v 1274 1135
X2 80 v 1288 1110 a Fb(ptkf_setcame)o(rapro)o(jtyp)o(e)p 1864
X1135 V 1274 1137 593 2 v 11 1211 a Fq(SUBROUTINE)i Fp(ptkf_setcamerapr)o
X(ojtype)g Fq(\(windid,)e(proj\))25 1300 y(IN)50 b(INTEGER)g
XFa(windid)f Fq(window)10 b(identi\256er)n(.)25 1350 y(IN)50
Xb(INTEGER)g Fa(proj)90 b Fq(camera)13 b(projection)d(type.)0
X1425 y(This)i(function)f(sets)i(the)f(projection)e(type)i(of)g(the)g(view)h
X(given)e(by)h(the)g(camera)j(to)c(P)l(ARALLEL)j(or)e(PERSPECTIVE.)i(The)0
X1475 y(default)d(is)g(P)l(ARALLEL.)p 1250 1572 616 2 v 1250
X1651 2 80 v 1264 1626 a Fb(ptkf_setcamerap)o(tint)o(ere)o(st)p
X1864 1651 V 1250 1653 616 2 v 11 1727 a Fq(SUBROUTINE)h Fp
X(ptkf_setcameraptinter)o(est)g Fq(\(windid,)e(ptinterest\))25
X1816 y(IN)50 b(INTEGER)g Fa(windid)137 b Fq(window)10 b(identi\256er)n(.)25
X1866 y(IN)50 b(REAL)119 b Fa(ptinterest\(3)o(\))47 b Fq(point)10
Xb(of)h(interest.)0 1941 y(This)g(function)f(sets)i(the)f(camera)i(point)d(of
V)
Xh(interest)f(to)h Fi(ptinterest)i Fq(which)e(is)g(given)g(in)g(W)m(orld)f
X(Corrdinates.)p 1363 2038 503 2 v 1363 2117 2 80 v 1377 2092
Xa Fb(ptkf_setcamera)o(stat)o(e)p 1864 2117 V 1363 2119 503
X2 v 11 2193 a Fq(SUBROUTINE)i Fp(ptkf_setcamerastate)f Fq(\(windid,)f
X(cameraswitch\))25 2282 y(IN)50 b(INTEGER)g Fa(windid)164 b
XFq(window)11 b(identi\256er)n(.)25 2332 y(IN)50 b(INTEGER)g
XFa(cameraswitch)d Fq(camera)14 b(on)d(or)g(of)o(f.)0 2407 y(This)g(function)
Vf
X(sets)i(the)f(camera)i(of)e(the)g(window)f Fi(windid)j Fq(to)e(ON)g(or)g(OFF
V)
Xm(.)g(The)h(default)f(is)g(ON.)0 2956 y(13th)22 b(May)m(,)12
Xb(1992)626 b(240)828 b(2.01)p eop
X%%Page: 241 242
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1333 -19 533 2 v 1333 60 2 80 v 1347 35 a Fb(ptkf_setcameraworl)
Vo
X(d)p 1864 60 V 1333 62 533 2 v 11 136 a Fq(SUBROUTINE)12 b
XFp(ptkf_setcameraworld)f Fq(\(windid,)f(num,)i(stids\))25 225
Xy(IN)50 b(INTEGER)g Fa(windid)58 b Fq(window)11 b(identi\256er)n(.)25
X275 y(IN)50 b(INTEGER)g Fa(stids\(*\))d Fq(structure)11 b(identi\256er)f
X(list.)0 350 y(This)16 b(function)f(sets)h(the)g(view)g(volume)g(of)g(the)g
X(camera)i(so)e(that)g(it)f(contains)h(the)g(combined)g(bounding)e(box)i(of)g
X(all)f(the)0 400 y(structures)c(and)g(structure)g(networks)f(in)h
+-+-+-+-+-+-+-+-  END  OF PART 139 +-+-+-+-+-+-+-+-