-
Notifications
You must be signed in to change notification settings - Fork 0
/
obl0.S
34 lines (28 loc) · 808 Bytes
/
obl0.S
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
.include "68k_inc/jaguar.inc"
.include "video.h"
.objproc
.org $1000
obl0:
branch VC < y_start*2+1,_stop0
branch VC < vde, obl0_scr
branch VC > vde, _stop0
_gpu0:
gpuobj 1
_stop0:
stop
.qphrase
obl0_scr:
scbitmap screen0,11,y_start+1,gr_phrase,gr_phrase,rez_y,320.0/rez_x,1.0*rez_y_screen/rez_y,1.0*rez_y_screen/rez_y,bpp,0,NOTRANS RELEASE,0,1
bitmap txt_screen, 11,y_start+1,(rez_x_txt/64),(rez_x_txt/64),rez_y_txt, 0,127, TRANS RELEASE,0,1
bitmap logo_screen, 11,logo_y-9,1,1,9, 0,127,TRANS RELEASE,0,1
obl0_scr_e:
stop
obl0_e:
obl_size equ obl0_e-obl0
obl_scr_size equ obl0_scr_e-obl0_scr
print "OPL (phrases) ",/u obl_size/8
print "OPL scr (phrases) ",/u obl_scr_size/8
print "OPL scr (address) ",/xl obl0_scr
print "Logo y ",/u logo_y
print "vde ",/u vde
print "vde ",/u _vde