컨트롤러"picbasic위한

[jojokatada]

안녕하세요 사람이 날 picbasic 프로에 어셈블리 서브루틴을 번역하는데 도움이 될
내가 pic16f877a 사용하고 portb의 각 비트가 높은 경우에는 다음에 해당하는 간이 약간 높은 설정을 확인하려는

여기 어셈블리 서브루틴입니다

확인 portb

btfsc portb, 0
BSF 간이, 0
btfsc portb, 1
BSF 간이, 1
btfsc portb, 2
BSF 간이, 2
btfsc portb, 3
BSF 간이, 3

돌아가기

사람에 대한 감사 도울 수

 

[maneco]

쉬운 ...
루프 :
TRISA = $ FF로 '포트 입력
TRISB = 0 'portb 출력
PORTB = PORTA
고토 루프올린날짜 27 초 후 :쉬운 ...

TRISA = $ FF로 '포트 입력
TRISB = 0 'portb 출력
루프 :
PORTB = PORTA
고토 루프

 

[Guest]

[No message]

 

[jojokatada]

하지만 감사 picbasic 프로와 나는 모든 포트를 각각의 개별 핀하지 확인하고 싶지가 아니라 서브루틴을

 

[yo5oqa]

trisb = $ FF로
trisa = 0

확인 portb :
porta.0 portb.0 = 1 그리고 만약 = 1
portb.1 = 1 다음 porta.1 = 1; 등
돌아가기

하지만 아무 말도있다; 경우 '0 '을 반환합니다 porta.0에 portb.0 여전히 남아 '1'.

 

[jojokatada]

yo5oqa 썼습니다 :

trisb = $ FF로

trisa = 0확인 portb :

porta.0 portb.0 = 1 그리고 만약 = 1

portb.1 = 1 다음 porta.1 = 1; 등

돌아가기하지만 아무 말도있다; 경우 '0 '을 반환합니다 porta.0에 portb.0 여전히 남아 '1'.

 

[yo5oqa]

경우에는 '다음'이후 단일 명령어, 동일한 라인에, 당신은 'endif 필요'할;
...만약 당신이 하나 이상이 같아도 :
portb.0 = 1 그리고 만약
porta.0 = 1
portc.0 = 1
endif
만약 ...그런 다음
...
...
endif; 등