megadrive_test1

annotate src/main.s @ 2:51d1d6761601

copied the bgset code from samurai's article to test that my dev setup is actually working
author John Tsiombikas <nuclear@member.fsf.org>
date Mon, 30 Jan 2017 16:57:51 +0200
parents 909c22dc18d2
children
rev   line source
nuclear@0 1 .text
nuclear@0 2 .global main
nuclear@0 3 main:
nuclear@2 4 move.l #0xc00000, %a0
nuclear@2 5 move.l #0xc00004, %a1
nuclear@2 6 move.w #0xc000, (%a1)
nuclear@2 7 move.w #0, (%a1)
nuclear@2 8 move.w #0x1f8, (%a0)
nuclear@2 9 move.w #0x8700, (%a1) | set bg color to 0
nuclear@2 10 move.w #0x8004, (%a1)
nuclear@2 11 move.w #0x8144, (%a1) | enable display
nuclear@0 12 rts