home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 July / WPCJUL96.ISO / file.exe / ARTSFINJ.DXR / 00024_ARTCheckBrowser.ls < prev    next >
Encoding:
Text File  |  1996-05-15  |  984 b   |  38 lines
  1. on ARTCheckBrowser
  2.   global browserID, IFLBrowsercounter, IFLMistake, GTSWIN95
  3.   repeat while BrowserRunning()
  4.     if the mouseUp then
  5.       if IFLMistake = 0 then
  6.         set the castNum of sprite 36 to 900
  7.         set the locH of sprite 36 to 225
  8.         set the locV of sprite 36 to 210
  9.         updateStage()
  10.       end if
  11.       StopBrowser()
  12.       exit repeat
  13.     end if
  14.   end repeat
  15.   if BrowserRunning() then
  16.     set IFLMistake to 1
  17.     if GTSWIN95 = 1 then
  18.       set the castNum of sprite 36 to 51
  19.       set the locH of sprite 36 to 232
  20.       set the locV of sprite 36 to 75
  21.       updateStage()
  22.     else
  23.       set the castNum of sprite 36 to 50
  24.       set the locH of sprite 36 to 232
  25.       set the locV of sprite 36 to 75
  26.       updateStage()
  27.     end if
  28.   end if
  29.   if not BrowserRunning() then
  30.     set the locH of sprite 36 to 2000
  31.     set the locV of sprite 36 to 2000
  32.     updateStage()
  33.     set IFLBrowsercounter to 0
  34.     set browserID to 0
  35.     set IFLMistake to 0
  36.   end if
  37. end
  38.