Apple-2gs-SW/xrick2gs - xrick2gs - Applefritter: Git

Apple-2gs-SW/xrick2gs

mirror of https://github.com/dwsJason/xrick2gs.git synced 2024-06-16 00:29:28 +00:00

1 line

290 B

Plaintext

Raw Normal View History

blit.s: more routines for full screen image presents, SCBs, and palettes. import a macros file, to try and get ORCA lup to work

2018-09-01 03:24:12 +00:00

 MACRO
&lab _pushpage
&lab lcla &addr
&addr   seta    254
	lcla    &loop
&loop   seta    128
.ploop
        pei     &addr
&addr   seta &addr-2
&loop   seta &loop-1
	aif &loop,^ploop
 MEND
 macro
&lab asl4
&lab lcla &ct
&ct  seta 4
.top
     asl a
&ct  seta &ct-1
     aif &ct>0,^top
 mend