home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 December / WPCDEC97.ISO / DXRS / FAEWDEC.DXR / 00006_ADDAdvertBreak.ls < prev    next >
Encoding:
Text File  |  1997-10-14  |  1.2 KB  |  34 lines
  1. on ADDAdvertBreak x
  2.   global ADDAdCount, ADDADvertSprite, ADDADCOntTwo, IFLButtonList
  3.   set ADDAdCount to 1 + ADDAdCount
  4.   if ADDAdCount < 401 then
  5.     if (ADDAdCount > 399) and (ADDAdCount < 403) then
  6.       set TempInfoList to getAt(IFLButtonList, x)
  7.       set the castNum of sprite ADDADvertSprite to getAt(TempInfoList, 6)
  8.       set the locH of sprite ADDADvertSprite to getAt(TempInfoList, 7)
  9.       set the locV of sprite ADDADvertSprite to getAt(TempInfoList, 8)
  10.     end if
  11.   else
  12.     set ADDADCOntTwo to 1 + ADDADCOntTwo
  13.     if ADDADCOntTwo < 100 then
  14.       if (ADDAdCount > 402) and (ADDAdCount < 406) then
  15.         set TempInfoList to getAt(IFLButtonList, x)
  16.         set the castNum of sprite ADDADvertSprite to getAt(TempInfoList, 6) + 1
  17.       else
  18.         if ADDAdCount = 406 then
  19.           set ADDAdCount to 399
  20.           set TempInfoList to getAt(IFLButtonList, x)
  21.           set the castNum of sprite ADDADvertSprite to getAt(TempInfoList, 6)
  22.         end if
  23.       end if
  24.     else
  25.       set ADDADCOntTwo to 0
  26.       set ADDAdCount to 0
  27.       set TempInfoList to getAt(IFLButtonList, x)
  28.       set the castNum of sprite ADDADvertSprite to getAt(TempInfoList, 6)
  29.       set the locH of sprite ADDADvertSprite to 2000
  30.     end if
  31.   end if
  32.   updateStage()
  33. end
  34.