| 0,0 → 1,241 |
|---|
| #include 16C84.INC |
| |
| org 0 |
| |
| goto Start |
| ;-------------------- |
| org 4 |
| ;-------------------- |
| goto Start |
| |
| #include Delay.asm |
| |
| zap: |
| movf CT2, w |
| movwf xxx ;xxx promena z delay.asm |
| call Delay1ms |
| return |
| ;---------------------------------------------------- |
| |
| Start: |
| page1 |
| movlw 00000000B ; inicializace citace a prescaleru |
| movwf TMR0 |
| movlw 00000000B ; konfigurace preruseni |
| movwf INTCON |
| |
| page1 |
| movlw 00000000B ; nastaveni portu na vstup nebo vystup |
| movwf PORTA ; 1=vstup 0=vystup |
| movlw 01000011B |
| movwf PORTB |
| |
| bsf TMR0, 7 ; vypni pull-up na PORTB (OPTION registr) |
| |
| page0 |
| |
| clrw ; vynulovani portu |
| movwf PORTA |
| movwf PORTB |
| |
| |
| MainLoop: |
| ; movlw 50 ; Otacky |
| ; movwf CT2 |
| ; movlw 45 ; Pocet kroku zrychleni |
| ; movwf CT1 |
| ;rozj2: |
| ; decf CT2, f |
| |
| |
| movlw 250 ; Pocet otacek jednoho kroku zrychleni |
| movwf CT3 |
| |
| movlw 150 |
| movwf CT4 |
| |
| movlw 200 |
| movwf CT5 |
| |
| movlw 250 |
| movwf CT5 |
| |
| rozj: ; Rozjezd |
| bsf PORTA, 0 |
| bcf PORTA, 1 ;100 |
| bcf PORTA, 2 |
| Delay 5 |
| |
| ; call zap |
| |
| bsf PORTA, 0 ;110 |
| bsf PORTA, 1 |
| bcf PORTA, 2 |
| Delay 5 |
| |
| bcf PORTA, 0 ;010 |
| bsf PORTA, 1 |
| bcf PORTA, 2 |
| Delay 4 |
| |
| bcf PORTA, 0 ;011 |
| bsf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 4 |
| |
| bcf PORTA, 0 ;001 |
| bcf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 3 |
| |
| bsf PORTA, 0 ;101 |
| bcf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 3 |
| |
| decfsz CT3, f |
| goto rozj |
| |
| ; decfsz CT1, f |
| ; goto rozj2 |
| ; goto rozj |
| |
| rychle: |
| bsf PORTA, 0 |
| bcf PORTA, 1 ;100 |
| bcf PORTA, 2 |
| Delay 2 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| |
| bcf PORTA, 0 ;010 |
| bsf PORTA, 1 |
| bcf PORTA, 2 |
| Delay 2 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| |
| bcf PORTA, 0 ;001 |
| bcf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 2 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| |
| decfsz CT4, f |
| goto rychle |
| |
| rychle2: |
| |
| bsf PORTA, 0 |
| bcf PORTA, 1 ;100 |
| bcf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| |
| bcf PORTA, 0 ;010 |
| bsf PORTA, 1 |
| bcf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| |
| bcf PORTA, 0 ;001 |
| bcf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 3 |
| decfsz CT5, f |
| goto rychle2 |
| |
| rychle3: |
| bsf PORTA, 0 |
| bcf PORTA, 1 ;100 |
| bcf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 2 |
| |
| bcf PORTA, 0 ;010 |
| bsf PORTA, 1 |
| bcf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 2 |
| |
| bcf PORTA, 0 ;001 |
| bcf PORTA, 1 |
| bsf PORTA, 2 |
| Delay 1 |
| |
| movlw 0 |
| movwf PORTA |
| Delay 2 |
| ; decfsz CT3, f |
| goto rychle3 |
| |
| ;rychle4: |
| ; bsf PORTA, 0 |
| ; bcf PORTA, 1 ;100 |
| ; bcf PORTA, 2 |
| ; Delay 1 |
| ; |
| ; movlw 0 |
| ; movwf PORTA |
| ; Delay 1 |
| ; |
| ; bcf PORTA, 0 ;010 |
| ; bsf PORTA, 1 |
| ; bcf PORTA, 2 |
| ; Delay 1 |
| ; |
| ; movlw 0 |
| ; movwf PORTA |
| ; Delay 1 |
| ; |
| ; bcf PORTA, 0 ;001 |
| ; bcf PORTA, 1 |
| ; bsf PORTA, 2 |
| ; Delay 1 |
| ; |
| ; movlw 0 |
| ; movwf PORTA |
| ; Delay 1 |
| ; |
| ; goto rychle4 |
| |
| ;______________________________________________________________ |
| |
| ;---------------------------- |
| ; Definice promenych |
| ;---------------------------- |
| |
| cblock |
| |
| CT1 |
| CT2 |
| CT3 |
| CT4 |
| CT5 |
| CT6 |
| endc |
| |
| end |