basicten protona Lookup uyarlaması

Başlatan satilla, 09 Ekim 2010, 02:25:17

satilla

basictetki bir lookup kod içeirgini protonda derleyeme kalkıyorum hata veriyor
örn lookup'ta çift tırnak içine almam lazım lookup degerini fakat protonda tek satırı kapsıyor böyle olunca,
kodu tek satıra çeviriyorum bu defada teks atırda 250 karakteri geçtiğime dair uyarı veriyor


LookUp data_reg,[$FF,$FF,$03,$F3,$F3,$F3,$73,$73,$73,$F3,$F3,$E3,$03,$B3,$B3,$B3,$03,$03,$83,$83,$83,$83,$83,$83,$03,$83,$83,$83,$83,$83,$83,$83_
,$03,$03,$03,$83,$83,$83,$83,$83,$03,$03,$83,$83,$83,$83,$83,$83,$03,$03,$B3,$B3,$B3,$03,$03,$83,$83,$83,$83,$83,$03,$03,$FF,$FF_
,$FF,$FF,$00,$FF,$FF,$FF,$1C,$1C,$1C,$1F,$1F,$0F,$00,$FF,$FF,$FF,$00,$FF,$FF,$FF,$83,$83,$83,$83,$00,$FF,$FF,$FF,$83,$83,$83,$FF_
,$FF,$00,$FF,$FF,$FF,$03,$01,$00,$00,$FF,$FF,$C7,$83,$83,$C7,$FF,$FF,$00,$FF,$FF,$FF,$00,$FF,$FF,$B3,$B3,$B3,$BF,$1F,$00,$FF,$FF_
,$FF,$FF,$00,$03,$03,$03,$00,$00,$00,$00,$00,$00,$00,$03,$03,$03,$00,$01,$03,$03,$03,$03,$03,$03,$00,$1F,$1F,$1F,$03,$03,$03,$01_
,$01,$00,$03,$03,$03,$00,$00,$00,$00,$01,$03,$03,$03,$03,$03,$03,$01,$60,$7F,$7F,$3F,$00,$01,$03,$03,$03,$03,$03,$03,$00,$FF,$FF_
,$FF,$FF,$00,$00,$00,$00,$02,$02,$FE,$02,$02,$00,$F8,$02,$00,$82,$F8,$00,$F8,$10,$08,$00,$FE,$20,$D0,$08,$00,$FA,$00,$18,$60,$80_
,$60,$18,$00,$F0,$28,$28,$28,$B0,$00,$0E,$00,$F8,$08,$08,$08,$F0,$00,$FA,$00,$F8,$08,$08,$08,$F0,$00,$00,$00,$00,$00,$00,$FF,$FF],veri
data_reg=data_reg+1  :  Return

drmp

VAR1 = LOOKUP INDEX , [ 10 , 20 , 30 ]  bu şekile olması gerekmiyormuydu  ? birde böyle dene bakalım

Ruzgarbey

Dim Index as Byte
Dim VERI as Byte
Dim data_reg as Byte
VERI = LookUp Index,[$FF,$FF,$03,$F3,$F3,$F3,$73,$73,$73,$F3,$F3,$E3,$03,$B3,$B3,$B3,$03,$03,$83,$83,$83,$83,$83,$83,$03,$83,$83,$83,$83,$83,$83]
INC data_reg
Return
kolay gelsin.

Hayatta En Hakiki Mürşid İlimdir. M.K. ATATÜRK

OG

#3
Alıntı yapılan: drmp - 09 Ekim 2010, 07:17:44
VAR1 = LOOKUP INDEX , [ 10 , 20 , 30 ]  bu şekile olması gerekmiyormuydu  ? birde böyle dene bakalım

Buna ilave

Satır bitimini
$83_  ' bu şekilde değil
$83,_ ' bu şekilde deneyin

tabi bu durumda satırın başlamasındaki virgül olmayacak, çünkü virgül satır sonuna alındı. Yani,
,$03  ' değil
$03  ' olacak

İlk iki satır için örnek
LookUp data_reg,[$FF,$FF,$03,$F3,$F3,$F3,$73,$73,$73,$F3,$F3,$E3,$03,$B3,$B3,$B3,$03,$03,$83,$83,$83,$83,$83,$83,$03,$83,$83,$83,$83,$83,$83,$83,_
$03,$03,$03,$83,$83,$83,$83,$83,$03,$03,$83,$83,$83,$83,$83,$83,$03,$03,$B3,$B3,$B3,$03,$03,$83,$83,$83,$83,$83,$03,$03,$FF,$FF,_
FORUMU İLGİLENDİREN KONULARA ÖM İLE CEVAP VERİLMEZ.

muhittin_kaplan


satilla

yardımlarınız için tşk ederim

bu arada lookupl 'nin farkı ne ?


muhittin_kaplan

LookUp ta kullanılan Sabitler 8bitlik dir.LookUpL de farklı ve büyük olabiliyor. ama Bundada Ekeleyebileceğimiz değişken yada sabit 85 i geçemiyor.

satilla

yani 85 tane 16 bitlik tanımlama yapılabilir mi?

muhittin_kaplan

Denemedim ama Yapılabilir Görünüyor.