[
Home |
Documentation |
Gallery |
Download |
Demo |
GameKit
]
[
Info |
MIDlet |
Sheets |
SDK
]
Programs
Assembly:
bgcol1
bgcol2
charset
ciao
fill1
fill2
gamekeys
idummy
iload
ipnggen1
ipnggen2
irawrgba
keypad
loop1
loop2
loop3
maze
resize
setpal
sprites
stdpal
tiles
vintage
C:
bounce
cciao
clock
cpubm
dpyinfo
fps
gperf
hello
mandelbrot
newline
pngtest
rand
time
Support Files
c64jb.c
cgetc.s
chline.s
clock.s
clrscr.s
color.s
cputc.s
crt0.s
ctype.s
cvline.s
gotox.s
gotoxy.s
gotoy.s
header.s
jbit.cfg
jbit.h
jbit.inc
kbhit.s
mainargs.s
randomize.s
vsync.s
wherex.s
wherey.s
_scrsize.s
_systime.s
;
; Written by Emanuele Fornara
;
; unsigned char __fastcall__ textcolor (unsigned char color);
; unsigned char __fastcall__ bgcolor (unsigned char color);
; unsigned char __fastcall__ bordercolor (unsigned char color);
;
.export _textcolor,_bgcolor,_bordercolor
.export TEXTCOLOR,BGCOLOR
.include "jbit.inc"
.code
.proc _textcolor
ldx TEXTCOLOR
sta TEXTCOLOR
txa
rts
.endproc
.proc _bgcolor
ldx BGCOLOR
sta BGCOLOR
txa
rts
.endproc
.proc _bordercolor
ldx #REQ_SETBGCOL
stx REQPUT
sta REQPUT
sta REQEND
ldx BORDERCOLOR
sta BORDERCOLOR
txa
rts
.endproc
.data
TEXTCOLOR:
.byte COLOR_BLACK
BGCOLOR:
.byte COLOR_WHITE
BORDERCOLOR:
.byte COLOR_WHITE