on open argv open for access (choose file name) with write permission returning total repeat with i in argv open for access i returning part write (read part) to total close access part end repeat close access total end open