home *** CD-ROM | disk | FTP | other *** search
/ Human & Space in Asia / ARIF_ASCI.ISO / pc / arif.dir / 01311.ls < prev    next >
Encoding:
Text File  |  1996-09-25  |  268 b   |  12 lines
  1. on cakisiklar
  2.   global Grouplist
  3.   set templist to getAt(Grouplist, 68)
  4.   set maxn to count(templist)
  5.   repeat with a = 1 to maxn
  6.     set Fotnam to getAt(templist, a)
  7.     if ThereisText(Fotnam) and ThereisArif(Fotnam) then
  8.       put Fotnam
  9.     end if
  10.   end repeat
  11. end
  12.