home *** CD-ROM | disk | FTP | other *** search
/ Comic Book Maker: The Smurfs / COMIC.iso / mac / data_m / dialog / 00158_test.ls < prev    next >
Encoding:
Text File  |  1999-07-07  |  415 b   |  14 lines
  1. property pDataFileDirectoryContents, pLastDirectorySelection, pCurrentFileName, pColorMode
  2.  
  3. on new me
  4.   set pColorMode to 0
  5.   set pCurrentFileName to "hallo"
  6.   set pLastDirectorySelection to 3
  7.   set pDataFileDirectoryContents to EMPTY
  8.   repeat with i = 1 to 110
  9.     put numToChar(i + 64) && i & RETURN after pDataFileDirectoryContents
  10.   end repeat
  11.   delete char -30000 of pDataFileDirectoryContents
  12.   return me
  13. end
  14.