@verb #605:"title_screen" this none this rxdo #55
@program #605:"title_screen" this none this
{v} = args
this:glMatrixMode(v, "projection")
this:glLoadIdentity(v)
"this:glFrustum(v, -1.0, 1.0, -1.0, 1.0, 0.1, 100.0);"
this:gluPerspective(v, 30.0, 1.3333, 1.0, 10.0)
this:glMatrixMode(v, "modelview")
this:glLoadIdentity(v)
this:gluLookAt(v, 0.0, 0.5, 3.0, 0.0, 0.0, 0.0, 0.0, 3.0, -0.5)
"this:gluLookAt(v, 0.0, -3.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 1.0);"
this:glClear(v, "color_buffer", "depth_buffer")
this:glColor(v, 1.0, 0.0, 0.0)
this:glBegin(v, "quads")
this:glVertex(v, 0.0, 0.0, 0.0)
this:glVertex(v, 1.0, 0.0, 0.0)
this:glVertex(v, 1.0, 0.0, 1.0)
this:glVertex(v, 0.0, 0.0, 1.0)
this:glEnd(v)
"this:glScale(v, 0.3, 1.0, 0.3);"
"this:glEnable(v, \"lighting\");"
"this:glEnable(v, \"depth_test\");"
"#604:draw_string(this, v, \"M\");"
this:glXSwapBuffers(v)
"Last modified by manta (#7165) on Tue Apr 18 02:49:43 2000 EDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:06 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:06 2002 MDT."
.