кейін Tab, EQU (нұсқағыш EQU equal ;(англ.) – ;бірдей), бір азат жол және
Con EQU h'25'
Con1 EQU h'26'
; Осы бөлікте бағдарламалар жадысына құрылған бағдарламаны жазу
бойынша ;нұсқаулар жазылады.
org h’00’; келесі нұсқаулық (NOP) бағдарламалар жадысына h’00’
адресіне жазылады.
nop; бос нұсқаулық (NOP) бағдарламалар жадысына h’00’ адресіне
жазылады.
nop; бос нұсқаулық (NOP) бағдарламалар жадысына h’01’ адресіне
жазылады. адресі h'04' деректер жадысы нұсқаулықты шақыруды жазу үшін ;
резервке қойылды, пайда болған үзуді өңдеу үшін іске қосылатын
;бағдарлама.
org h’05’; келесі нұсқаулық h’05’адресінен бастап жазылады. ; МК
баптау үшін нұсқаулық.
CLRF STATUS; Status регистрінің 5,6,7 биттерін өшіреміз және
;нөлінші банкті таңдаймыз. CLRF нұсқаулығы мен регистр атының арасында
;бір бос орын. PrtScв терезесін Word-файлда симулятор режимінде жобаны
;қосқаннан кейін сақтау қажет.
BSF STATUS,5; 5 - разрядқа ‘1’ жазып (нұсқаулықтан кейін бос ;
орынсыз), бірінші банк таңдаймыз.
MOVLW B'11110000'; W аккумуляторға В’11110000’ санын жіберу, ;
PORTC портының шығысын баптау бойынша тапсырмаға сәйкес. ;TRISC
регистрін, тапсырмасы сәйкес келетін PORTC шығыс ; разрядтарында
энергия беруге рұқсат беретін режимге баптау.
MOVWF TRISC; PORTC 0-3 биттерін шығысқа, ал 4-7 биттерін кіріске
баптау.
BCF STATUS,5; нөлінші банкқа
қайтып келу ;онда жұмыс бөлімі;
Бағдарламаның жұмыс бөлімі
NACH; таңба, , нұсқаулықты орындағаннан кейін оған ораламыз;GOTO
MOVLW B'11111111'; W аккумуляторға В’11111111’ санын жіберу
MOVWF PORTC; Watch терезесінде 0-3 разрядтарда бірліктер пайда
;болады, ал 4-7 разрядтарда – нөлдер. PrtSc терезесін Word-файлда сақтау.
BCF PORTC,0; 0 разрядта - 0. ; PrtSc терезесін Word-файлда сақтау.
BSF PORTC,0; в 0 разрядқа 1 енгізу
MOVLW B'10000001'; аккумуляторға тапсырма бойынша екінші санды
:жіберу
MOVWF Con; константаны ЖМР-ға
Con атымен жіберу
CLRW ; аккумуляторды тазалау, Watch терезесінде тексеру
MOVF Con,w; Con регистрінен константаны аккумуляторға жіберу
;PrtSc терезесін Word-файлда сақтау.
MOVWF PORTC; константаны PORTC портына жіберу ;PrtSc терезесін
Word-файлда сақтау. 13 GOTO NACH; қайталау үшін NACH таңбасына көшу.
END; бағдарлама соңы
2.1 кесте – Тапсырма нұсқалары
Нұсқа
11
TRISC
00000011
Өзгеру биті
5
2-сан
11111001
Достарыңызбен бөлісу: