home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / muzea / exemusei / shared.cst / 00931_Script_931 < prev    next >
Text File  |  1987-04-12  |  256b  |  9 lines
  1. on VaTem cod, Lab, nM
  2.   if chars(Lab, 1, 1) = cod then
  3.     put chars(Lab, 1, (length(Lab)-5)) & "e.pic" into Lab 
  4.   else if  chars(Lab, 2, 2) = cod then
  5.     put chars(Lab, 1, (length(Lab)-5)) & "f.pic" into Lab 
  6.   end if
  7.   play Lab of movie nM
  8. end
  9.