Yayınlama: 25 Temmuz 2020
Güncelleme: 28 Temmuz 2020
GET
Dosya işlemlerinde kullanılan
GET komutundan farklı olarak grafik işlemlerinde kullanılan farklı bir
GET komutu vardır. Kullanımları farklıdır.
Kullanımı:
GET [STEP] (x1-y1)-[STEP](x2,y2),değişkenadı[(indeks)]
Ekran üzerinde x1,y1 ile x2,y2 dikdörtgeni içinde kalan görüntü bilgisi belirtilen boyutlu değişkenadı'na aktarılır. Değişkene aktarılan görüntü PUT komutu ile ekranın istenilen konumuna basılır(aktarılır).
STEP : Göreceli koordinat kullanmak içindir. Bir önceki komutun aktif noktası 0,0 kabul edilir.
(x1,y1) : seçim alanı başlangıç köşe noktası
(x2,y2) : seçim alanı bitiş karşı köşe noktası
değişkenadı : Görüntü bilgilerinin aktarılacağı çok boyutlu değişken. Değişken boyutu görüntü bilgilerini aktaracak büyüklükte olmalıdır aksi halde GET komutu çalıştırılmaz. Illegal function call hatası verir.
Boyutun ne kadar olacağını hesaplamak için kullanılan formül Qbasic yardım'da verilmiştir.
4 + INT(((x2 - x1 + 1) * (düzlemdeki pikselin bit sayısı) + 7)/8) * düzlem * ((y2 - y1) + 1)
Ekran
Modu | Düzlemdeki pikselin
bit sayısı | Düzlem |
| 1 | 2 | 1 |
| 2 | 1 | 1 |
| 7 | 1 | 4 |
| 8 | 1 | 4 |
| 9 | 1 | 2 |
| 10 | 1 | 2 |
| 11 | 1 | 1 |
| 12 | 1 | 4 |
| 13 | 8 | 1 |
Örneğin, SCREEN 2, sol üst köşe (0,0) sağ alt köşe (32,32) için değişkenin bayt cinsinden gerekli boyutu:
= 4 + INT ((33 * 1 + 7) / 8) * 1 * (33)
Sonuç = 169 bayt.
Bu 85 elemanlı INTEGER(2 bayt) bir değişken görüntüyü aktarmak için yeterli olacaktır.
INTEGER değişken yerine LONG, SINGLE veya DOUBLE değişken türü de kullanılabilir. Değişkenin türünün bellekte kapladığı bayt miktarına göre eleman sayısı değişir. Formülden çıkan sonuç değişken türü bayt miktarına bölünür.
INTEGER için Sonuç / 2
LONG için Sonuç / 4
SINGLE için Sonuç / 4
DOUBLE için için Sonuç / 8
Örnek:
'©2020 Mesut Akcan
SCREEN 1
' bayt sayısı = 4+int(((32-0+1)*2+7)/8)*1*((32-0)+1)
' bayt sayısı = 301
' integer için 301/2 = 151
' DIM a(150) AS INTEGER '0 dahil toplam 151
' long için 301/4 = 76
' DIM a(75) AS LONG
' single için 301/4 = 76
' DIM a(75) AS SINGLE
' double için 301/8 = 38
DIM a(37) AS DOUBLE
CIRCLE (16, 16), 16, 2, , , 1
PAINT STEP(0, 0), 1, 2
CIRCLE (16, 16), 10, 0, , , 1
PAINT STEP(0, 0), 2, 0
CIRCLE (12, 13), 4, 3, , , 1
PAINT STEP(0, 0), 3, 3
GET (0, 0)-(32, 32), a
PUT (40, 0), a
PUT (73, 0), a
PUT (40, 0), a, XOR
PUT
Dosya işlemlerinde kullanılan PUT komutunun grafik işlemlerinde kullanılan farklı bir kullanımı daha vardır.
Kullanımı:
PUT [STEP](x,y), değişkenadı[(indeks)], baskıyöntemi
GET komutu ile değişkene aktarılan görüntü PUT komutu ile (x,y) koordinatına basılır.
STEP : Göreceli koordinat kullanmak içindir. Bir önceki komutun aktif noktası 0,0 kabul edilir.
