home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni E Inventori 1: Lavoro E Vita Quotidiana / invenzioni-inventori-1.iso / mac / Invenzio / CREDITS.DIR / 00011_Script_11 < prev    next >
Text File  |  1997-09-27  |  275b  |  10 lines
  1. on crd_show
  2.   global crd_linea
  3.   -- duplicate cast 10, 101
  4.   --  if crd_linea>1 then  delete line 1 to crd_linea-1 of field 101
  5.   --  duplicate cast 101,95
  6.   set posV to 41
  7.   set heigthLinea to 16
  8.   set the locV of sprite 4 to (posV-((crd_linea-1)*heigthLinea))
  9. end
  10.