|
Post by PeterMaria on Dec 22, 2015 15:15:43 GMT -5
Hello, it's a rabbit. TextMode(TEXT_OVERLAID) glMatrixMode (GL_PROJECTION) glLoadIdentity() glOrtho (0,800,800,0,-1,1) glMatrixMode (GL_MODELVIEW) glDisable (GL_DEPTH_TEST)
dim f = loadtex("gl4font04.png") font(f)
Sub Line(x0,y0,x1,y1,lsize#) glLinewidth(lsize#) glBegin(GL_LINES) glVertex2i(x0,y0) glVertex2i(x1,y1) glEnd() End Sub
dim ti1#=0.666,ti2#=0.999,ti3#=0.334,da#=.9999 dim an2#=M_PI/2,xa#=370,ya#=370,an3#,an1#,st#=0.1 dim x1,y1,x2,y2,xc=400,yc=400,cr=32,cg=32,cb=96,e=5000,i
x1 = cos(an1#)*xa#*cos(an3#)+xc y1 = sin(an2#)*ya#*sin(an3#)+yc
for i=1 to e x2 =cos(an1#)*xa#*cos(an3#)+xc y2 =sin(an2#)*ya#*sin(an3#)+yc glcolor3ub(240,255,240) Line(x1, y1, x2, y2, 1) an1# = an1#+st#*ti1# an2# = an2#+st#*ti2# an3# = an3#+st#*ti3# xa# = xa#*da# ya# = ya#*da# x1 = x2 y1 = y2 next locate 1,0 print "SELECT RESOLUTION 800 x 600" drawtext() swapbuffers()
Attachments:gl4font04.zip (3.73 KB)
|
|
|
Post by matthew on Dec 23, 2015 14:46:26 GMT -5
Looks like a rabbit with cats whiskers. :-|
|
|