Sayfa 23

kullanılan altprogram. 4K'nın saklanması için 90 saniye gerekli olduğunu düşünerek kasetin uzunluğunun hesaplanması. Kasetin 'C' uzunluğu her iki yüz içindir ki bulunan değer iki misli büyüklüktedir.

490-540 Disketten kasete. File ismi her seferinde TBUFFR'a konur.

550-650 Kasetten diskete.

550 Header'ı oku.

560 Sequential ise atla.

565 Eğer kasetin sonuna eriştiysen listeyi bas.

570 RAM'ı oku.

580 Eğer isim yoksa, girilmiş olan ismi ve bir sayı yaz.

600-650 File'ı sil ve sakla.