Dark Bit Factory & Gravity
PROGRAMMING => Freebasic => Topic started by: Shockwave on May 29, 2006
-
I got the inclination to code this after I watched Optimus's quick 4 hour demo.
This routine is very basic and is just a 1 pixels sine scroll.
Please feel free to use it if you want... It would probably look a lot nicer with a better font to be honest but Courier is the only binary font I've converted so far with all the characters :)
#define dbfcls redim as integer buffer (800*600)
#Include Once "tinyptc.bi"
If( ptc_open( "Sine Scroll By Shockwave.", 800, 600 ) = 0 ) Then
End -1
End If
option dynamic
Dim Shared As Integer Buffer( 800 * 600 )
dim shared kk as string
dim shared gadd,gadd2 as integer
declare sub DBFTEXT(BYVAL BX AS INTEGER , BYVAL BY AS INTEGER , BYVAL CH AS INTEGER , BYVAL CLR AS INTEGER)
dim shared FONT (63 * 95) as integer
FOR LP=1 TO (63*95)
READ FONT(LP)
NEXT
DECLARE SUB MESSAGE()
DIM SHARED SCPTR AS INTEGER:' Letter Pointer In Scroll String.
DIM SHARED SCROFF AS DOUBLE:' Offset Used To Scroll Text
Dim Shared scrolltext as string:' Holds Text.
'=======================================================================
'Our Text;
'=======================================================================
scrolltext=" "
scrolltext=scrolltext+" "
scrolltext=scrolltext+" "
scrolltext=scrolltext+"**** A SINESCROLL IN FREEBASIC **** COOL! THIS IS USING TINYPTC "
scrolltext=scrolltext+" ---------------------- JUST HACKED TOGETHER SO THAT NEWBIES CAN USE AND ABUSE IT IN THEIR OWN STUFF! "
scrolltext=scrolltext+" ----------------------- "
scrolltext=scrolltext+" Feel free to use it... Coded by Shockwave ^ DBF "
scrolltext=scrolltext+" Tata... "
scrolltext=scrolltext+" "
scrolltext=scrolltext+" "
SCROFF=0
SCPTR=0
DO
gadd=gadd+1
gadd2=gadd2+3
'**************************************
' Remove comment to wait for vblank ***
'**************************************
wait &H3DA,8
kk=inkey$
message()
Ptc_update @buffer(0)
dbfcls
LOOP until kk=chr$(27)
Ptc_Close()
SUB MESSAGE()
dim hop,ecl as integer
HOP=0:' Used to jumpto next letter pos
FOR LP=1 TO 101
CH=(ASC(MID(SCROLlTEXT,LP+SCPTR,1)))-31:' Get Ascii for char
'-----------------------------------------------------------------------
' Call DBF Custom Text Routine;
'-----------------------------------------------------------------------
DBFTEXT (HOP-scroff,296,CH,RGB(100,100,255))
HOP=HOP+8
NEXT
'--------------------------------
'Scroll And Update If Needed; ---
'--------------------------------
scroff=scroff+1
if scroff> 8 then
scptr=scptr+1
if scptr>(len(scrolltext)-75) then scptr=0
scroff=scroff-8
end if
END SUB
sub DBFTEXT(BYVAL BX AS INTEGER , BYVAL BY AS INTEGER , BYVAL CH AS INTEGER , BYVAL CLR AS INTEGER)
dim blx,bly as integer
IF CH<0 OR CH>95 THEN CH=1
'---------------------------------
'Calculate Offset In Font Data;---
'---------------------------------
bm=(ch*63)-63
FOR BLY=0 TO 8
FOR BLX=1 TO 7
snval=60*COS((BLX+BX+GADD)/100)
snval2=60*COS((BLX+BX+GADD2)/73)
'--------
'Clip;---
'--------
IF (BX+BLX>0) AND (BX+BLX<=799) AND (BY+BLY+snval+snval2>0) AND (BY+BLY+snval+snval2<599) THEN
'----------------------------------------------------
'Draw Pixel In Buffer If Onscreen And If Binary 1 ---
'----------------------------------------------------
MM= FONT(((BLY*7)+BLX)+BM)
IF MM >0 THEN BUFFER (((BY+BLY+snval+snval2)*800)+BX+BLX)=CLR
END IF
NEXT
NEXT
END SUB
'==============================================================================
' Binary Font By Shockwave / DBF; (95 Chars)
'==============================================================================
'space
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'!
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
'"
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'#
data 0,0,0,1,0,1,0
data 0,0,0,1,0,1,0
data 0,1,1,1,1,1,1
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 1,1,1,1,1,1,0
data 0,1,0,1,0,0,0
data 0,1,0,1,0,0,0
'£
data 0,0,0,0,0,0,0
data 0,0,1,1,0,0,0
data 0,1,0,0,1,0,0
data 0,1,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,1,1,1,1
'%
data 0,1,0,0,0,0,0
data 1,0,1,0,0,0,1
data 0,1,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,1,0
data 1,0,0,0,1,0,1
data 0,0,0,0,0,1,0
'&
data 0,0,1,1,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,0,0,0,0
data 1,0,0,1,0,0,1
data 1,0,0,1,0,1,0
data 1,0,0,0,1,0,0
data 0,1,1,1,0,1,1
''
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'(
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,0,0
')
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
'*
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,0,1,1,0
data 0,0,1,1,1,0,0
data 1,1,1,1,1,1,1
data 0,0,1,1,1,0,0
data 0,1,1,0,1,1,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'+
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 1,1,1,1,1,1,1
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
',
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,0
'-
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,1,1,1,1
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'.
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
'/
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,1
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,0
data 1,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'0
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'1
data 0,0,0,1,0,0,0
data 0,1,1,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,1,1,1,0
'2
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,1,1,1,1,0
'3
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,1,1,0,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'4
data 0,0,0,0,1,0,0
data 0,0,0,1,1,0,0
data 0,0,0,1,1,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,1,0,0,1,0,0
data 0,1,1,1,1,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,1,1,0
'5
data 0,1,1,1,1,1,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'6
data 0,0,0,1,1,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'7
data 0,1,1,1,1,1,0
data 0,1,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
'8
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'9
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,1,1,0,0,0
':
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
';
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
'<
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,0
data 1,0,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
'=
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'>
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,0,1
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
'?
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,1,0,0,0
'@
data 0,0,1,1,1,1,0
data 0,1,0,0,0,0,1
data 1,0,0,1,1,0,1
data 1,0,1,0,1,0,1
data 1,0,1,0,1,0,1
data 1,0,1,0,1,0,1
data 1,0,0,1,1,1,0
data 0,1,0,0,0,0,0
data 0,0,1,1,1,0,0
'a
data 0,0,1,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,1,0,0,0,1,0
data 0,1,1,1,1,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'b
data 1,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 1,1,1,1,1,1,0
'c
data 0,0,1,1,1,1,0
data 0,1,0,0,0,0,1
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 0,1,0,0,0,0,1
data 0,0,1,1,1,1,0
'd
data 1,1,1,1,1,0,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,1,0
data 1,1,1,1,1,0,0
'e
data 1,1,1,1,1,1,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,0
data 0,1,0,0,1,0,0
data 0,1,1,1,1,0,0
data 0,1,0,0,1,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,1
data 1,1,1,1,1,1,1
'f
data 1,1,1,1,1,1,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,0
data 0,1,0,0,1,0,0
data 0,1,1,1,1,0,0
data 0,1,0,0,1,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 1,1,1,1,0,0,0
'g
data 0,0,1,1,1,1,0
data 0,1,0,0,0,0,1
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,1,1,1
data 1,0,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,0,1,1,1,1,0
'h
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,1,1,1,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'i
data 0,1,1,1,1,1,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,1,1,1,0
'j
data 0,0,0,0,1,1,1
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'k
data 1,1,1,0,0,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,1,0,0
data 0,1,0,0,1,0,0
data 0,1,0,1,0,0,0
data 0,1,1,1,0,0,0
data 0,1,0,0,1,0,0
data 0,1,0,0,0,1,0
data 1,1,1,0,0,1,1
'l
data 1,1,1,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,1
data 1,1,1,1,1,1,1
'm
data 1,1,0,0,0,1,1
data 0,1,0,0,0,1,0
data 0,1,1,0,1,1,0
data 0,1,1,0,1,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'n
data 1,1,0,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,1,0,0,1,0
data 0,1,1,0,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,0,1,1,0
data 0,1,0,0,1,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,0,1,0
'o
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'p
data 1,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,1,1,1,1,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 1,1,1,1,0,0,0
'q
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
data 0,0,1,1,0,1,1
'r
data 1,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,1,1,1,1,0
data 0,1,0,0,1,0,0
data 0,1,0,0,1,0,0
data 0,1,0,0,0,1,0
data 1,1,1,0,0,1,1
's
data 0,1,1,1,1,1,0
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 0,0,0,0,0,0,1
data 0,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 0,1,1,1,1,1,0
't
data 1,1,1,1,1,1,1
data 1,0,0,1,0,0,1
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,1,1,0,0
'u
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
'v
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
'w
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
'x
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'y
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,1,1,1,0,0
'z
data 1,1,1,1,1,1,1
data 1,0,0,0,0,1,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,0,1
data 1,1,1,1,1,1,1
'[
data 0,0,1,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,1,1,0,0
'\
data 0,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,0,1
data 0,0,0,0,0,0,0
']
data 0,0,1,1,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,1,1,1,0,0
'^
data 0,0,0,1,0,0,0
data 0,0,1,0,1,0,0
data 0,1,0,0,0,1,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'_
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,1,1,1,1
'`
data 0,0,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
'a
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,0,0,0,1,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 0,1,1,1,1,0,1
'b
data 1,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 1,1,1,1,1,1,0
'c
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,1
data 0,1,1,1,1,1,0
'd
data 0,0,0,0,1,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,0,1,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 0,1,1,1,1,1,1
'e
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,0,1
data 1,1,1,1,1,1,1
data 1,0,0,0,0,0,0
data 1,0,0,0,0,0,1
data 0,1,1,1,1,1,0
'f
data 0,0,0,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,1,1,0,0
'g
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,1
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 0,1,1,1,1,1,0
data 0,0,0,0,0,1,0
data 0,1,1,1,1,0,0
'h
data 1,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,1,1,0,0
data 0,1,1,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'i
data 0,0,0,1,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,1,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,1,1,1,0
'j
data 0,0,0,0,1,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,0,0,0,1,0,0
data 0,1,1,1,0,0,0
'k
data 1,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,0,0,0
data 0,1,0,0,1,1,0
data 0,1,0,0,1,0,0
data 0,1,0,1,0,0,0
data 0,1,1,1,0,0,0
data 0,1,0,0,1,0,0
data 1,1,0,0,0,1,1
'l
data 0,0,1,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,1,1,1,0
'm
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,0,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 1,1,0,1,0,1,1
'n
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,0,1,1,0,0
data 0,1,1,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'o
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 1,0,0,0,0,0,1
data 0,1,1,1,1,1,0
'p
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,1,1,1,0
data 0,1,0,0,0,0,1
data 0,1,0,0,0,0,1
data 0,1,1,1,1,1,0
data 0,1,0,0,0,0,0
data 1,1,1,0,0,0,0
'q
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,1
data 1,0,0,0,0,1,0
data 1,0,0,0,0,1,0
data 0,1,1,1,1,1,0
data 0,0,0,0,0,1,0
data 0,0,0,0,1,1,1
'r
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,1,0
data 0,0,1,1,0,0,1
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 1,1,1,1,1,0,0
's
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,1,1,1,1,1,0
data 1,0,0,0,0,0,1
data 0,1,1,1,0,0,0
data 0,0,0,0,1,1,0
data 1,0,0,0,0,0,1
data 0,1,1,1,1,1,0
't
data 0,0,0,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,1,1,1,1,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,0,0
data 0,0,1,0,0,1,0
data 0,0,0,1,1,0,0
'u
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,0,0,1,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,1,0,0,1,1,0
data 0,0,1,1,0,1,1
'v
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
data 0,0,0,1,0,0,0
'w
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,1,0,1,0
data 0,1,0,1,0,1,0
data 0,0,1,0,1,0,0
data 0,0,1,0,1,0,0
'x
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,0,1,1,1,0,0
data 0,0,1,1,1,0,0
data 0,1,0,0,0,1,0
data 1,1,1,0,1,1,1
'y
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,0,1,1,1
data 0,1,0,0,0,1,0
data 0,1,0,0,0,1,0
data 0,0,1,0,1,0,0
data 0,0,0,1,0,0,0
data 0,1,1,0,0,0,0
'z
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 1,1,1,1,1,1,0
data 1,0,0,0,1,0,0
data 0,0,0,1,0,0,0
data 0,0,1,0,0,0,0
data 0,1,0,0,0,1,0
data 1,1,1,1,1,1,0
'{
data 0,0,0,0,1,1,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,1,0
'|
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
'}
data 0,1,1,0,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,0,1,1,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,0,0,1,0,0,0
data 0,1,1,0,0,0,0
'~
data 0,0,0,0,0,0,0
data 0,1,1,0,0,0,1
data 1,0,0,1,0,0,1
data 1,0,0,0,1,1,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
data 0,0,0,0,0,0,0
-
Cool mate, and real handy source to learn from in any demo coders tool box! :)
Cheers and nice one,
Clyde.
-
It really needs a better fornt to be honest Mate but I'm glad you like it :)
I'll have to make a new font soon. I don't think courier looks good in demos like this.
-
Courier is really only good when doing ASCII art, as its a fixed width font where most others are naff for spacing out.
The routine is still neat. Nice one.