Haberler:

Foruma Resim Yükleme ve Boyut Sınırlaması ( ! )  https://bit.ly/2GMFb8H

Ana Menü

LOOKUP DONGUSU YARDIM

Başlatan hyardimci, 17 Şubat 2006, 10:40:53

hyardimci

MERHABA ARKARDASLAR

LOOKUP DONGUSU ICINDE KULLANILAN DEGERLERI DEGISKEN OLARAK KULLANMAK ISTIYORUM NASIL YAPABILIRIM...

seco06

SANA LOOKUP İLE YAPILMIŞ BİR KAYAN YAZI ÖRNEĞİ
'-------------------------------------------------------------------------------
'****************************************************************
'*  Name    : UNTITLED.BAS                                      *
'*  Author  : [select VIEW...EDITOR OPTIONS]                    *
'*  Notice  : Copyright (c) 2006 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 17.02.2006                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'****************************************************************
@ DEVICE pic16F876
@ DEVICE pic16F876, WDT_OFF
@ DEVICE pic16F876, PWRT_ON
@ DEVICE pic16F876, PROTECT_OFF
@ DEVICE pic16F876, XT_OSC
'-------------------------------------------------------------------------------
DEFINE LCD_DREG      PORTB   
DEFINE LCD_DBIT      4      
DEFINE LCD_EREG      PORTB   
DEFINE LCD_EBIT      3      
define LCD RWREG    PORTB  
define LCD_RWBIT    2      
DEFINE LCD_RSREG   PORTB   
DEFINE LCD_RSBIT   1      
DEFINE LCD_BITS      4      
DEFINE LCD_LINES   2   

B1 VAR BYTE
B0 VAR BYTE
B2 VAR BYTE

lcdout $fe,1
pause 100
CLEAR

reset:
B0 = 0
loop:
pause 200
LCDOut $fe,2
For B2= 0 TO 15
LookUp B0, ["               SEBAHATTIN ERARSLAN AYSEN ELEKTRONIK A.S.                #"], B1
IF B1 = "#" Then GoTo reset
LCDOut B1
B0 = B0 + 1
Next B2
pause 100
B0 = B0 - 15
GoTo loop
END

Lütfi AYYILDIZ

Sanırım LOOKUP döngüsünün içine değişken yazmak mümkün değil. Bizzat bende denedim ve en son kitaptan şunu buldum;
LOOKUP İndeks,[sabit {,sabit...}],değişken
Komutun kullanılışından da anlaşıldığı gibi döngüde sabitlerin olması gerek.

seco06

Doğrudur. KOmut setinden de anlaşıldığı gibi bir sabiti değişkene atamak amaç.

Lütfi AYYILDIZ

LOOKUP komutu yerine değişkenlerini eproma yazdırabilirsin.Okurken Bir For..Next döngüsü kullanarak okursan Aynı komutu icra etmiş olursun.

cihantasdemir

Lookup komutunda kullanılan sabitlerimi değişken olarak kullanmak istiyorsuni.....