Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *-----------------------------------------------------------
- * Title : Practicas Hardware Mapeado de Memoria
- * Written by : Lisandro Rocha
- * Date : 20/9/2018
- *-----------------------------------------------------------
- ORG $1000
- SHOWHWIN:
- MOVEM.W D0-D1,-(A7)
- MOVE.B #32,D0
- CLR.B D1
- TRAP #15
- MOVEM.W (A7)+,D0-D1
- RTS
- GTHWADDR:
- MOVEM.L D0-D1/A0-A1,-(A7)
- MOVE.B #32,D0
- LEA .DATA,A1
- .LOOP MOVE.B (A1)+,D1
- BEQ .END
- TRAP #15
- MOVE.L D1,(A0)+
- BRA .LOOP
- .END MOVEM.L (A7)+,D0-D1/A0-A1
- RTS
- .DATA DC.B 1,2,3,7,0
- DS.W 0
- WRTSEGM:
- START:
- BSR SHOWHWIN
- LEA DISPADDR,A0
- BSR GTHWADDR
- MOVE.L (DISPADDR), A0
- MOVE.L (SWTADDR), A1
- .LOOP MOVE.B (A1),D0
- MOVE.B D0,(A0) #Num 14 se refiere al num que controlamos
- BRA .LOOP
- SIMHALT
- DISPADDR DS.L 1
- LEDADDR DS.L 1
- SWTADDR DS.L 1
- BUTADDR DS.L 1
- END START
- *-----------------------------------------------------------
- * Title : Practicas Hardware Mapeado de Memoria
- * Written by : Lisandro Rocha
- * Date : 20/9/2018
- *-----------------------------------------------------------
- ORG $1000
- SHOWHWIN:
- MOVEM.W D0-D1,-(A7)
- MOVE.B #32,D0
- CLR.B D1
- TRAP #15
- MOVEM.W (A7)+,D0-D1
- RTS
- GTHWADDR:
- MOVEM.L D0-D1/A0-A1,-(A7)
- MOVE.B #32,D0
- LEA .DATA,A1
- .LOOP MOVE.B (A1)+,D1
- BEQ .END
- TRAP #15
- MOVE.L D1,(A0)+
- BRA .LOOP
- .END MOVEM.L (A7)+,D0-D1/A0-A1
- RTS
- .DATA DC.B 1,2,3,7,0
- DS.W 0
- WRTSEGM:
- START:
- BSR SHOWHWIN
- LEA DISPADDR,A0
- BSR GTHWADDR
- MOVE.L (DISPADDR), A0
- MOVE.L (SWTADDR), A1
- .LOOP MOVE.B (A1),D0
- MOVE.B D0,(A0) #Num 14 se refiere al num que controlamos
- BRA .LOOP
- SIMHALT
- DISPADDR DS.L 1
- LEDADDR DS.L 1
- SWTADDR DS.L 1
- BUTADDR DS.L 1
- END START
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement