home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / artwaug.dxr / 00015_ARTViewArt.ls < prev    next >
Encoding:
Text File  |  1996-06-17  |  378 b   |  12 lines
  1. on ARTViewArt
  2.   global ARTGraphicsVeiwFrame, ARTGraphicsFrameNoList, ARTWhichGraphics, ARTTwoGraphicsFrameNoList
  3.   if ARTWhichGraphics = 2 then
  4.     set whichFrame to getAt(ARTGraphicsFrameNoList, ARTGraphicsVeiwFrame)
  5.   else
  6.     if ARTWhichGraphics = 1 then
  7.       set whichFrame to getAt(ARTTwoGraphicsFrameNoList, ARTGraphicsVeiwFrame)
  8.     end if
  9.   end if
  10.   go(whichFrame)
  11. end
  12.