Arkadaslar bende bi kod var bunu günlerce hexe çevirmeye çalısıyorum ama bir türlü yapamıyorum bu işlerde biraz acemiyimdir lütfen yardımcı olabilirmisiniz ?
pıc16f84a
(TRISA=0TRISB=001110
PORTB=000000
SOLSENSOR VAR PORTB.1
ORTASENSOR VAR PORTB.2
SAGSENSOR VAR PORTB.3
MAG VAR PORTB.4
MAI VAR PORTB.5
MBG VAR PORTB.6
MBI VAR PORTB.7
MAG=0 : MAI=0 : MBG=0 : MBI=0
DONGU:
IF SOLSENSOR=0 AND ORTASENSOR=0 AND SAGSENSOR=0 THEN
MAI=0 : MAG=0 : MBI=0 : MBG=0
ENDIF
IF SOLSENSOR=1 AND ORTASENSOR=0 AND SAGSENSOR=1 THEN
MAI=1 : MAG=0 : MBI=1 : MBG=0
ENDIF
IF SOLSENSOR=0 AND ORTASENSOR=0 AND SAGSENSOR=1 THEN
MAI=0 : MAG=1 : MBI=1 : MBG=0
PAUSE 1
ENDIF
IF SOLSENSOR=0 AND ORTASENSOR=1 AND SAGSENSOR=1 THEN
MAI=0 : MAG=1 : MBI=1 : MBG=0
PAUSE 1
ENDIF
IF SOLSENSOR=1 AND ORTASENSOR=0 AND SAGSENSOR=0 THEN
MAI=1 : MAG=0 : MBI=0 : MBG=1
PAUSE 1
ENDIF
IF SOLSENSOR=1 AND ORTASENSOR=1 AND SAGSENSOR=0 THEN
MAI=1 : MAG=0 : MBI=0 : MBG=1
PAUSE 1
ENDIF
IF SOLSENSOR=1 AND ORTASENSOR=1 AND SAGSENSOR=1 THEN
WHILE ORTASENSOR=1
MAI=0 : MAG=1 : MBI=0 : MBG=1
WEND
ENDIF
GOTO DONGU
END )