Haberler:

Forum kuralları güncellendi LÜTFEN  okuyunuz:  https://bit.ly/2IjR3ME

Ana Menü

Pic Basic yardım!

Başlatan ilker_32, 13 Haziran 2007, 19:51:45

ilker_32

Herkeze slm,

Arkadaşlar ben aşağıdaki pic basic kodlarını derleyemiyorum. Sorun nedir çözemedim. Hata alıyorum. Pic basic kullanan arkadaşlar yardım ederlerse çok sevinirim.

-----------------------------------------------------------------------

CMCON=07

TRISB=%00000010

DEFINE HSER_RCSTA 90th
DEFINE HSER_TXSTA 20th
DEFINE HSER_BAUD 2400
DEFINE HSER_CLROERR 1

SOLILERI VAR PORTB.3
SOLGERI VAR PORTB.4
SAGILERI VAR PORTB.5
SAGGERI VAR PORTB.6
K VAR BYTE
ERRCHK VAR BYTE
PAUSE 250


ANADONGU:

HSERIN[WAIT(254),K,ERRCHK]
SOLGERI=0: SAGGERI=0: SAGILERI=0: SOLILERI=0:

IF ERRCHK=192 THEN

   IF K.BIT0=1 THEN

     SOLILERI=1

   ELSE

     SOLILERI=0

   ENDIF

   IF K.BIT1=1 THEN

     SOLGERI=1

   ELSE

     SOLGERI=0

   ENDIF

   IF K.BIT2=1 THEN

     SAGILERI=1

   ELSE

     SAGILERI=0

   ENDIF

   IF K.BIT3=1 THEN

     SAGGERI=1

   ELSE

     SAGGERI=0

   ENDIF

ENDIF

PAUSE 10

GOTO ANADONGU

-----------------------------------------------------------------------------

Verdiği hatalar;


____________
Kolay gelsin...

ilker_32

Arkadaşlar sorunu sonunda çözebildim. :lol:  :lol:  :lol:  :lol:  :lol:

sorun th miş.
____________
Kolay gelsin...