Hello @CCV
This is a modified version of your code:
AREA mycode, CODE
EXPORT __main
myclock EQU 0x40023830
myDmode EQU 0x40020000
myDout EQU 0x40020014
myPU_PD EQU 0x4002080C
myPC4I EQU 0x40020810 ; PA4 as Input
myPC7O EQU 0x40020C14 ; PC7 as Output
ENTRY
__main PROC
NOP
;------------------------------Port C Clock Enable
LDR R1,=myclock
LDR R5,[R1]
MOV R2,#1
LSL R2,#2
ORR R5,R2
STR R5,[R1]
;------------------------------PC4 Pull-Up Pull-Down
LDR R1,=myPU_PD
LDR R5,[R1]
MOV R2,#1
LSL R2,#4
ORR R5,R2
STR R5,[R1]
;---------------------------Clock uygulama PA5 LED, PC7 Output
LDR R1,=myclock
LDR R5,[R1]
MOV R2,#1
LSL R2,#0
ORR R5,R2
STR R5,[R1]
;----------------------------Çikis uclari seçimi PC7 (0100)
LDR R1,=myDmode
LDR R5,[R1]
MOV R2,#0x4
LSL R2,#28
ORR R5,R2
STR R5,[R1]
;------------------------------Read PA4 pin
Re_PA4 LDR R1,=myPC4I
LDR R5,[R1]
MOV R2,#0x10
AND R5,R2
CMP R5,#0
BEQ myRun
B Re_PA4
;----------------------------Led On (PC7 High)
myRun LDR R1,=myDout
LDR R5,[R1]
MOV R2,#0x80
ORR R5,R2
STR R5,[R1]
;---------------------------- Gecikme
LDR R6,=0XFFFFF
Two1 SUB R6,#1
CMP R6,#0
BEQ One1
B Two1
;---------------------------- LED off (PC7 Low)
One1 LDR R1,=myDout
LDR R5,[R1]
MOV R2,#0xFFFFFF7F
AND R5,R2
STR R5,[R1]
;---------------------------- Gecikme
LDR R6,=0XFFFFF
Two2 SUB R6,#1
CMP R6,#0
BEQ Re_PA4
B Two2
ENDP
END
Hope this is helpful. If your question is answered please check this answer as best answer to be diffused.
Best regards.
II
