Здравейте всички
Нов съм в света на микроконтролерите и в езикът асемблер и това е първата ми тема във форумът Ви. Надявам че с помощта Ви ще напредна Целта на изпитанието на което се подложих е да постигна нещо като това :
http://www.instructables.com/id/Super-Easy-Reversible-Motor-Control-for-Arduino-/
или накратко да управлявам посоката и скоростта на електромоторче чрез микроконтролер (използвам PIC16F84A който няма вграден ШИМ и се налага това да бъде постигнато програмно).
Схемата се състои от реле свързано със микроконтролера към порт Б и по-точно към пинове 1 и 2 (има и един светодиод свързан към пин 0 който използвам само за индикация на случващото се). При подаване на логическа "1" към пин 1 се включва моторчето , а при подаване на логическа "1" към пин 2 се променя посоката му на въртене .... осъществих схемата и всичко съм тествал и работи ,но имам голям проблем с част от програмата ... целта на програмата е следната :
1.моторчето се върти по часовниковата стрелка за определено време със скорост 100%
2.пауза
3.моторчето се върти по часовниковата стрелка за определено време със скорост 50%
4.пауза
5.моторчето се върти обратно на часовниковата стрелка за определено време със скорост 100%
6.пауза
7.моторчето се върти обратно на часовниковата стрелка за определено време със скорост 50%
8.пауза
9. всичко от начало се повтаря до безкрай
а ето и какво се получава при мен:
1.моторчето се върти по часовниковата стрелка за определено време със скорост 100%
2.пауза
3.моторчето се върти по часовниковата стрелка за определено време със скорост 50% и програмата не продължава напред ...
По пътят на логиката проблема на програмата ми е в броячът ("cou") който трябва да отчете кога подпрограмата за ШИМ ("pwmf50") да прехвърли управлението на главната програма - main.
Ще може ли някой да помогне ?
Ето и кодът (на пръв поглед изглежда сложен заради размерът му но всъщност има две подпрограми които се дублират/с разлика в стойностите/ и една главна програма - main):
 | | |
| Цитат: list p=16F84A #include <p16F84A.inc> __CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC w EQU 0 f EQU 1 Counter EQU H'0C' c equ 0 portb equ 0x06 ; port b equate duty equ 0x0c ; length of duty cycle temp equ 0x0d ; length of duty cycle cou set d'100' ORG H'0000' goto start start bsf STATUS,RP0 movlw B'11010111' movwf OPTION_REG bcf STATUS,RP0 clrf PORTB bsf STATUS,RP0 movlw B'11111000' movwf TRISB bcf STATUS,RP0 goto main ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;deley for the pause between subroutines ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; WaitP movlw D'30' movwf Counter clrf TMR0 againP bcf INTCON,T0IF loopP btfss INTCON,T0IF goto loopP decfsz Counter,f goto againP return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;delay for the time of Action on pwm100b and pwm100f ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; WaitA movlw D'70' movwf Counter clrf TMR0 againA bcf INTCON,T0IF loopA btfss INTCON,T0IF goto loopA decfsz Counter,f goto againA return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;pwm 50% forward ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; pwm50f movlw d'0' movwf portb movlw d'90' ; Duty cycle length movwf duty movf duty,w movwf temp bsf portb,0 bsf portb,1 pwma50f nop nop nop decfsz temp goto pwma50f movlw d'255' movwf temp movf duty,w subwf temp,f bcf portb,0 bcf portb,1 pwmb50f nop nop nop decfsz temp goto pwmb50f bcf INTCON,T0IF btfss INTCON,T0IF goto pwm50f decfsz cou clrf TMR0 return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;pwm 50% backward ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; pwm50b movlw d'0' movwf portb movlw d'90' ; Duty cycle length movwf duty movf duty,w movwf temp bsf portb,0 bsf portb,1 bsf portb,2 pwma50b nop nop nop decfsz temp goto pwma50b movlw d'255' movwf temp movf duty,w subwf temp,f bcf portb,0 bcf portb,1 bcf portb,2 pwmb50b nop nop nop decfsz temp goto pwmb50b bcf INTCON,T0IF btfss INTCON,T0IF goto pwm50b decfsz cou clrf TMR0 return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;pwm 100% forward ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; pwm100f bsf portb,0 bsf portb,1 call WaitA bcf portb,0 bcf portb,1 return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;pwm 100% backward ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; pwm100b bsf portb,0 bsf portb,1 bsf portb,2 call WaitA bcf portb,0 bcf portb,1 bcf portb,2 return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; main call pwm100f call WaitP call pwm50f call WaitP call pwm100b call WaitP call pwm50b call WaitP goto main END | |
| | |
ПП: Незнам как да постна кода така че директивите да са разделени на колонки
Направих го 
Благодаря за помощта 
