Hmm...might work...be sure to include special tags like [ Name ] for the character's name and [ Cash ] for money. For colors, don't use rgb-ish coordinates, since you could just use a simple tag like
[ Red ] or [ Purple ], and simply set the color values for "purple" and "red" at the start of your program using variables.
oof...I had a few bugs in the last snippit. here's the revised version. It's 2d so it should work...
rem Here's a snippit.
mess$="[Red] This [B]is[/RED] a [/B]test. [red]Another test.[/red] [b]Another test.[/b] [red][b]Another test.[/b][/red] Another test."
textbox(mess$)
wait key
end
function textbox(text$)
leng=len(text$)
set text size 12
red=rgb(255,0,0)
white=rgb(255,255,255)
rem Make a blue box.
ink rgb(0,0,255),0
box 0,screen height()-100,screen width(),screen height()
set cursor 1,screen height()-100
ink white,0
for index=1 to leng
read$=mid$(text$,index)
if read$="["
tag$="["
repeat
inc index
read$=mid$(text$,index)
tag$=tag$+read$
until read$="]"
tag$=upper$(tag$)
rem You can add more tags when you need them.
if tag$="[RED]" then ink red,0
if tag$="[/RED]" then ink white,0
if tag$="[B]" then set text to bold
if tag$="[/B]" then set text to normal
else
print read$;
wait 10
endif
next index
endfunction
"Not all that is gold does not glitter, not all those who wander are lost, not all that is old does not whither, deep roots are not reached by the frost..." - Aragorn (Strider)
