home *** CD-ROM | disk | FTP | other *** search
/ Cani & Cani / CANI.ISO / pc / program / ferme.dxr / Scripts_23.ls < prev    next >
Encoding:
Text File  |  1997-11-11  |  446 b   |  17 lines
  1. on enterFrame
  2.   global listeSearch, NoResField, gTypeRech
  3.   set gTypeRech to 5
  4.   EndPuppet(1, 47)
  5.   StartNoDog()
  6.   set listeSearch to [1: 0, 2: 0, 3: 0, 4: 0]
  7.   set NoResField to [1, 2]
  8.   put EMPTY into field "RESULTAT1"
  9.   put EMPTY into field "RESULTAT2"
  10.   repeat with i = 1 to 4
  11.     set NoTrait to 29 + i - 1
  12.     set NoTrait0 to 23 + i - 1
  13.     set the visible of sprite NoTrait0 to 1
  14.     set the visible of sprite NoTrait to 0
  15.   end repeat
  16. end
  17.