\r
\r
elsif (nt_step_cnt = 5 * cpu_io_multi) then\r
- --set vram addr 23c1 (attribute)\r
- io_out(16#2006#, 16#23#);\r
+ io_out(16#2006#, 16#20#);\r
elsif (nt_step_cnt = 6 * cpu_io_multi) then\r
- io_out(16#2006#, 16#c1#);\r
+ io_out(16#2006#, 16#2a#);\r
elsif (nt_step_cnt = 7 * cpu_io_multi) then\r
- --attr=11011000\r
- io_out(16#2007#, 16#d8#);\r
-\r
-\r
+ io_out(16#2007#, 16#44#);\r
elsif (nt_step_cnt = 8 * cpu_io_multi) then\r
- io_out(16#2006#, 16#20#);\r
- elsif (nt_step_cnt = 9 * cpu_io_multi) then\r
- io_out(16#2006#, 16#60#);\r
-\r
- elsif (nt_step_cnt = 10 * cpu_io_multi) then\r
- io_out(16#2007#, 48);\r
- elsif (nt_step_cnt = 11 * cpu_io_multi) then\r
- io_out(16#2007#, 49);\r
- elsif (nt_step_cnt = 12 * cpu_io_multi) then\r
- io_out(16#2007#, 50);\r
- elsif (nt_step_cnt = 13 * cpu_io_multi) then\r
- io_out(16#2007#, 51);\r
- elsif (nt_step_cnt = 14 * cpu_io_multi) then\r
- io_out(16#2007#, 52);\r
- elsif (nt_step_cnt = 15 * cpu_io_multi) then\r
- io_out(16#2007#, 53);\r
- elsif (nt_step_cnt = 16 * cpu_io_multi) then\r
- io_out(16#2007#, 54);\r
- elsif (nt_step_cnt = 17 * cpu_io_multi) then\r
- io_out(16#2007#, 55);\r
- elsif (nt_step_cnt = 18 * cpu_io_multi) then\r
- io_out(16#2007#, 56);\r
+ io_out(16#2007#, 16#44#);\r
+ \r
+-- elsif (nt_step_cnt = 5 * cpu_io_multi) then\r
+-- --set vram addr 23c1 (attribute)\r
+-- io_out(16#2006#, 16#23#);\r
+-- elsif (nt_step_cnt = 6 * cpu_io_multi) then\r
+-- io_out(16#2006#, 16#c1#);\r
+-- elsif (nt_step_cnt = 7 * cpu_io_multi) then\r
+-- --attr=11011000\r
+-- io_out(16#2007#, 16#d8#);\r
+--\r
+--\r
+-- elsif (nt_step_cnt = 8 * cpu_io_multi) then\r
+-- io_out(16#2006#, 16#20#);\r
+-- elsif (nt_step_cnt = 9 * cpu_io_multi) then\r
+-- io_out(16#2006#, 16#60#);\r
+--\r
+-- elsif (nt_step_cnt = 10 * cpu_io_multi) then\r
+-- io_out(16#2007#, 48);\r
+-- elsif (nt_step_cnt = 11 * cpu_io_multi) then\r
+-- io_out(16#2007#, 49);\r
+-- elsif (nt_step_cnt = 12 * cpu_io_multi) then\r
+-- io_out(16#2007#, 50);\r
+-- elsif (nt_step_cnt = 13 * cpu_io_multi) then\r
+-- io_out(16#2007#, 51);\r
+-- elsif (nt_step_cnt = 14 * cpu_io_multi) then\r
+-- io_out(16#2007#, 52);\r
+-- elsif (nt_step_cnt = 15 * cpu_io_multi) then\r
+-- io_out(16#2007#, 53);\r
+-- elsif (nt_step_cnt = 16 * cpu_io_multi) then\r
+-- io_out(16#2007#, 54);\r
+-- elsif (nt_step_cnt = 17 * cpu_io_multi) then\r
+-- io_out(16#2007#, 55);\r
+-- elsif (nt_step_cnt = 18 * cpu_io_multi) then\r
+-- io_out(16#2007#, 56);\r
\r
-- elsif (nt_step_cnt = 5 * cpu_io_multi) then\r
-- --set vram addr 21d1\r
\r
else\r
io_brk;\r
- if (nt_step_cnt > 4 * cpu_io_multi) then\r
+ if (nt_step_cnt > 7 * cpu_io_multi) then\r
global_step_cnt := global_step_cnt + 1;\r
end if;\r
end if;\r
io_out(16#2005#, nmi_scl_y);\r
else\r
nmi_oam_x := nmi_oam_x + 1;\r
- --bug!!! scroll reg doesn't work....\r
- --nmi_scl_y := nmi_scl_y + 1;\r
- nmi_scl_y := 80;\r
+ if (nmi_step_cnt mod 30 = 0) then\r
+ nmi_scl_y := nmi_scl_y + 1;\r
+ end if;\r
+ --nmi_scl_y := 75;\r
io_brk;\r
if (nmi_step_cnt > 3 * cpu_io_multi) then\r
global_step_cnt := global_step_cnt + 1;\r