home *** CD-ROM | disk | FTP | other *** search
/ 1&1 Multimedia Trend 1996 11 D / MM_TREND.ISO / prog / basics / service.dir / 00085.txt < prev    next >
Encoding:
Text File  |  1996-09-16  |  528 b   |  25 lines
  1. -- Auftragsformular
  2. on mousedown
  3.   
  4.   global pfad
  5.   schreibetext pfad & "director.inf", "auftragt"
  6.   
  7.   
  8.   
  9.   
  10.   global balkenT3
  11.   set balkenT3=balkenT3+1
  12.   if balkenT3>1 then set balkenT3=0
  13.   
  14.   puppetSound "click"
  15.   set the castnum of sprite 44 to the number of cast "but1BalkenT3"+2
  16.   updateStage
  17.   puppetSound "raus"
  18.   set the castnum of sprite 35 to the number of cast "BalkenT3"+1
  19.   updateStage
  20.   set the blend of sprite 35 to 0
  21.   set the blend of sprite 44 to 0
  22.   set the blend of sprite 45 to 0
  23.   updateStage
  24.   quit
  25. end