Human & Space in Asia/ARIF_ASCI.ISO/pc/arif.dir/01313.ls

Text File | 1996-09-25 | 207 b | 8 lines

on yenile
  set cno to 1241
  repeat with cno = 1241 to 1341
    set nokta to point(getAt(the rect of cast cno, 1), getAt(the rect of cast cno, 2))
    set the regPoint of cast cno to nokta
  end repeat
end