2020-10-05 20:58:02 +00:00
|
|
|
void main()
|
|
|
|
const nomodify byte* screen = (byte*) 1024
|
|
|
|
void scrollup1()
|
|
|
|
word~ scrollup1::$4 zp[2]:5 1501.5
|
|
|
|
byte*~ scrollup1::$5 zp[2]:7 1001.0
|
|
|
|
byte*~ scrollup1::$6 zp[2]:5 2002.0
|
|
|
|
byte scrollup1::c
|
|
|
|
byte scrollup1::c#1 reg byte x 2002.0
|
|
|
|
byte scrollup1::c#2 reg byte x 667.3333333333334
|
|
|
|
word scrollup1::line
|
|
|
|
word scrollup1::line#1 line zp[2]:9 202.0
|
|
|
|
word scrollup1::line#2 line zp[2]:9 144.88888888888889
|
|
|
|
void scrollup2()
|
|
|
|
byte scrollup2::c
|
|
|
|
byte scrollup2::c#1 reg byte x 1501.5
|
|
|
|
byte scrollup2::c#2 reg byte x 500.5
|
|
|
|
byte scrollup2::l
|
|
|
|
byte scrollup2::l#1 l zp[1]:2 151.5
|
|
|
|
byte scrollup2::l#4 l zp[1]:2 28.857142857142858
|
|
|
|
byte* scrollup2::line1
|
|
|
|
byte* scrollup2::line1#1 line1 zp[2]:3 350.5
|
|
|
|
byte* scrollup2::line1#2 line1 zp[2]:3 1552.0
|
|
|
|
byte* scrollup2::line1#3 line1 zp[2]:3 202.0
|
|
|
|
byte* scrollup2::line2
|
|
|
|
byte* scrollup2::line2#1 line2 zp[2]:9 420.59999999999997
|
|
|
|
byte* scrollup2::line2#2 line2 zp[2]:9 1034.6666666666667
|
|
|
|
byte* scrollup2::line2#3 line2 zp[2]:9 202.0
|
|
|
|
void scrollup3()
|
|
|
|
byte*~ scrollup3::$3 zp[2]:7 1001.0
|
|
|
|
byte*~ scrollup3::$4 zp[2]:9 2002.0
|
|
|
|
byte scrollup3::c
|
|
|
|
byte scrollup3::c#1 reg byte x 2002.0
|
|
|
|
byte scrollup3::c#2 reg byte x 500.5
|
|
|
|
word scrollup3::l2
|
|
|
|
word scrollup3::l2#1 l2 zp[2]:5 1001.0
|
|
|
|
word scrollup3::l2#2 l2 zp[2]:5 821.0
|
|
|
|
word scrollup3::l2#4 l2 zp[2]:5 202.0
|
|
|
|
word scrollup3::line
|
|
|
|
word scrollup3::line#1 line zp[2]:3 202.0
|
|
|
|
word scrollup3::line#2 line zp[2]:3 40.4
|
2019-06-10 14:39:25 +00:00
|
|
|
|
2020-06-27 21:26:57 +00:00
|
|
|
reg byte x [ scrollup1::c#2 scrollup1::c#1 ]
|
2019-10-12 09:40:36 +00:00
|
|
|
zp[1]:2 [ scrollup2::l#4 scrollup2::l#1 ]
|
2019-06-10 14:39:25 +00:00
|
|
|
reg byte x [ scrollup2::c#2 scrollup2::c#1 ]
|
2020-06-27 21:26:57 +00:00
|
|
|
zp[2]:3 [ scrollup3::line#2 scrollup3::line#1 scrollup2::line1#2 scrollup2::line1#3 scrollup2::line1#1 ]
|
|
|
|
reg byte x [ scrollup3::c#2 scrollup3::c#1 ]
|
2020-09-30 22:18:56 +00:00
|
|
|
zp[2]:5 [ scrollup1::$4 scrollup1::$6 scrollup3::l2#2 scrollup3::l2#4 scrollup3::l2#1 ]
|
|
|
|
zp[2]:7 [ scrollup3::$3 scrollup1::$5 ]
|
2020-06-27 21:26:57 +00:00
|
|
|
zp[2]:9 [ scrollup3::$4 scrollup2::line2#2 scrollup2::line2#3 scrollup2::line2#1 scrollup1::line#2 scrollup1::line#1 ]
|