Subversion Repositories svnkaklik

Compare Revisions

Ignore whitespace Rev 5 → Rev 6

/programy/ASM/3Fmotor1/budic1.asm
0,0 → 1,229
#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 250 ; Pocet otacek jednoho kroku zrychleni
movwf CT3
movlw 170
movwf CT4
 
movlw 150
movwf CT5
 
movlw 250
movwf CT5
 
rozj: ; Rozjezd
bsf PORTA, 0
bcf PORTA, 1 ;100
bcf PORTA, 2
Delay 6
 
bsf PORTA, 0 ;110
bsf PORTA, 1
bcf PORTA, 2
Delay 6
 
bcf PORTA, 0 ;010
bsf PORTA, 1
bcf PORTA, 2
Delay 5
 
bcf PORTA, 0 ;011
bsf PORTA, 1
bsf PORTA, 2
Delay 5
 
bcf PORTA, 0 ;001
bcf PORTA, 1
bsf PORTA, 2
Delay 5
 
bsf PORTA, 0 ;101
bcf PORTA, 1
bsf PORTA, 2
Delay 5
 
decfsz CT3, f
goto rozj
 
 
rychle:
bsf PORTA, 0
bcf PORTA, 1 ;100
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 5
 
bcf PORTA, 0 ;010
bsf PORTA, 1
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 5
 
bcf PORTA, 0 ;001
bcf PORTA, 1
bsf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 5
 
decfsz CT4, f
goto rychle
 
rychle2:
 
bsf PORTA, 0
bcf PORTA, 1 ;100
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 3
 
bcf PORTA, 0 ;010
bsf PORTA, 1
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 3
 
bcf PORTA, 0 ;001
bcf PORTA, 1
bsf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 3
decfsz CT5, f
goto rychle2
 
rychle3:
bsf PORTA, 0
bcf PORTA, 1 ;100
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 2
 
bcf PORTA, 0 ;010
bsf PORTA, 1
bcf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 2
 
bcf PORTA, 0 ;001
bcf PORTA, 1
bsf PORTA, 2
Delay 3
 
movlw 0
movwf PORTA
Delay 2
decfsz CT3, f
goto rychle3
 
rychle4:
bsf PORTA, 0
bcf PORTA, 1 ;100
bcf PORTA, 2
Delay 2
 
movlw 0
movwf PORTA
Delay 2
 
bcf PORTA, 0 ;010
bsf PORTA, 1
bcf PORTA, 2
Delay 2
 
movlw 0
movwf PORTA
Delay 2
 
bcf PORTA, 0 ;001
bcf PORTA, 1
bsf PORTA, 2
Delay 2
 
movlw 0
movwf PORTA
Delay 2
 
goto rychle4
;______________________________________________________________
 
;----------------------------
; Definice promenych
;----------------------------
 
cblock
 
CT1
CT2
CT3
CT4
CT5
CT6
endc
 
end