serin2 den gelen datayı case de düzenlemek

[i-rot]

öncelikle ilgilendiğniiz için teşekkür ediyorum.gelelim soruma serin2 den gelen datayı

Serin2 Porta.2,3313,[wait ("Q","Q","Q","Q",45,45,45,45),  gelen]

 



buradaki case'ler ile ascii yapıp

SELECT CASE lcdData
 
 
    case "A"'65   $7F,$09,$09,$09,$7F,$00,
    COLUMN(0)=$7E
    COLUMN(1)=$11
    COLUMN(2)=$11
    COLUMN(3)=$11
    COLUMN(4)=$7E
    COLUMN(5)=$00
    case "B"'65
    COLUMN(0)=$7F
    COLUMN(1)=$49
    COLUMN(2)=$49
    COLUMN(3)=$49
    COLUMN(4)=$36
    COLUMN(5)=$00
    case "C"
    COLUMN(0)=$3E
    COLUMN(1)=$41
    COLUMN(2)=$41
    COLUMN(3)=$41
    COLUMN(4)=$22
    COLUMN(5)=$00

buradan da ekrana yazdırmak istiyorum

   PosX=1:PosY=1:GOSUB LCD_GotoXY
    FOR Chr=0 TO 11
   LOOKUP2 Chr,[gelen],LCDDATA  'bu kısım hata veriyor
   
    GOSUB LCD_StringOut
    NEXT Chr

ancak bu kısım hata veriyor

bütün kodlar burada  >>  http://uploaded.to/?id=uqzsvq

bunun yöntemi nedir?

teşekkürler

[crypto]

Kodları inceledim fakat tam olarak ne yapmak istediğini anlayamadım.

Hata veriyor dediğin satırı olduğu gibi alıp derledim, herhangi bir hata vermedi. Değişkenleri tanımlamış olduğundan emin ol.

LOOKUP2 komutunu yazdığın şekilde kullanmanın mantığını da çözemedim.

Yazmış olduğun:

LOOKUP2 Chr,[gelen],LCDDATA  'bu kısım hata veriyor

kod satırında sadece "gelen" olarak tek karakter yazmışsın.
LOOKUP2 komutu "Chr" değişkenindeki değeri alıp sonrasında yazılan değer ya da değişken sırasına denk gelen değeri "LCDDATA" değişkenine atıyor.
Yani bu satırın olması gereken şekli:

LOOKUP2 Chr,[gelen0,gelen1,gelen2,...],LCDDATA

şeklinde olmalı. Bu komut satırında "Chr=0" ise "LCDDATA=gelen0", "Chr=2" ise "LCDDATA=gelen2", .... şeklinde olur.