Sayfa 15

ATN fonksiyonu TAN fonksiyonunun tam tersidir. ATN(0.1) size (radyan cinsinden) 45 derece verecektir,

PRINT 57.30*ANT(1)

Yukarıdaki satırı yazarsanız bilgisayar parantez içindeki açının tanjantını derece cinsinden ekrana yazar. Peki de Sinüs ve Cosinüs'ün niye ters fonksiyonu yok. Bunun ana nedenleri şunlar: 1) Trigonometrik fonksiyonlarda bunlara fazla gerek yoktur 2) Eğer gerek olsa bile ATN ile diğerlerini hesaplayabilirsiniz. Şimdi size ters sinüs ve ters kosinüs'ün fonksiyonlarını veriyorum.

DEF FNACS(X)—ATN(SOR(1-X*X)/(x4 (1-

Diğer fonksiyonlardan farklı olarak bu fonksiyon size negatif ve değerleri doğru olarak verir. Herneyse ATN hakkında yeterince konuştuk,

Ekleme

En son ne zaman iki sequential dosyayı birleştirdiniz. Doğrusu bunu ben de hatırlayamıyorum. BASIC 7.0'da bunun için CONCAT diye hazır bir komut var ama C-64 kullanıcıları COPY komutuyla bir kombinasyon yazmak zorundalar. Aslında bu komutlar sadece sequential dosyalarla çalışabilir. C-64'ün komut kombinasyonu C-128'in CONCAT komutundan daha kullanışlıdır. İki komutun formatı şöyledir,

10 CONCAT veya 20 “COP

BASIC 2.0 ile (BASIC 7.0'ın kapsamındaki) yeni dosya ismi diğer dosya isimlerinden farklı olabilir. 20. satırda maximum 4 tane dosyayı birleştirebiliyorsunuz. Birleştirilecek dosyalar virgüllerle ayrılmalıdırlar. BASIC 7.0'da daha az kullanılan bir komut ise APPEND'dir. Bu komut size arkasına daha fazla bilgi eklenebilecek bir sequential dosya açmanızı sağlar. BASIC 2.0 ise bu işi “A” seçenekli bir dosya açarak yapar (satır 20).

10 veya 20 OPEN

Artık PRINT #1 komutuyla SEQ dosyanıza bilgi ekleyebilirsiniz.

Input'u Kesmek

C-128 sahipleri INPUT'u kesememelerini hiç sevmezler. INPUT kesebilmek için ilk önce RUN/STOP'a sonra da HELP tuşuna veya nümerik klavyedeki ENTER tuşuna basmaları gerekir. Bu tuşlar INPUT ile bekletilirken araya CHR$(13) koyarlar, Bu sayede INPUT komutu kesilmiş olur.

C64 kullanıcılarının işi biraz daha zor, INPUT komutunda soru işareti ekranda belirdiğinde: 1) CONTROL tuşuna basılı tutun. 2) M tuşuna basın, 3) Hemen CONTROL ve M tuşlarını bırakın, 4) Bundan hemen sonra Run/Stop tuşuna basın. CONTROL-M tuşu INPUT'a CHR$(13) koymanın bir yoludur. Bu sayede INPUT kesilir. Aşağıdaki programla alıştırma yapabilirsiniz.

10 INPUT X 20 GOTO 10

Negatif Bir Bit

NOT inceleyeceğimiz bir sonraki komut. NOT mantıksal operasyonlar için kullanılır yani bit işlemlerinde, Mesela mantıksal değer atamanın standart yolu şudur.

10 FALSE-0 10 TRUE-NOT FALSE

Mantıksal değişkenler sadece iki değer alabilirler true(doğru) veya false(yanlış). Bu değişkenler program akışını değiştirmek için kullanılabilir. Diyelim ki programınızda bir altrutin var ve bu rutin herhangi bir zaman çağrılabilir. Ama siz bu rutinin çağıran yerden bağımsız olarak sadece bir kere işleme konulmasını istiyorsunuz.

30 FALSE Alt rutininiz şu şekilde olabilir.

10 TF DUN- TRUE THEN RETURN 10**#*Rutininizi buraya köyün****