… | |
… | |
2549 | const_iv (GL_INTENSITY), |
2549 | const_iv (GL_INTENSITY), |
2550 | const_iv (GL_LUMINANCE), |
2550 | const_iv (GL_LUMINANCE), |
2551 | const_iv (GL_LUMINANCE_ALPHA), |
2551 | const_iv (GL_LUMINANCE_ALPHA), |
2552 | const_iv (GL_FLOAT), |
2552 | const_iv (GL_FLOAT), |
2553 | const_iv (GL_UNSIGNED_INT_8_8_8_8_REV), |
2553 | const_iv (GL_UNSIGNED_INT_8_8_8_8_REV), |
|
|
2554 | const_iv (GL_COMPRESSED_ALPHA_ARB), |
|
|
2555 | const_iv (GL_COMPRESSED_LUMINANCE_ARB), |
|
|
2556 | const_iv (GL_COMPRESSED_LUMINANCE_ALPHA_ARB), |
|
|
2557 | const_iv (GL_COMPRESSED_INTENSITY_ARB), |
|
|
2558 | const_iv (GL_COMPRESSED_RGB_ARB), |
|
|
2559 | const_iv (GL_COMPRESSED_RGBA_ARB), |
2554 | const_iv (GL_COMPILE), |
2560 | const_iv (GL_COMPILE), |
2555 | const_iv (GL_PROXY_TEXTURE_1D), |
2561 | const_iv (GL_PROXY_TEXTURE_1D), |
2556 | const_iv (GL_PROXY_TEXTURE_2D), |
2562 | const_iv (GL_PROXY_TEXTURE_2D), |
2557 | const_iv (GL_TEXTURE_1D), |
2563 | const_iv (GL_TEXTURE_1D), |
2558 | const_iv (GL_TEXTURE_2D), |
2564 | const_iv (GL_TEXTURE_2D), |
… | |
… | |
2597 | const_iv (GL_PERSPECTIVE_CORRECTION_HINT), |
2603 | const_iv (GL_PERSPECTIVE_CORRECTION_HINT), |
2598 | const_iv (GL_POINT_SMOOTH_HINT), |
2604 | const_iv (GL_POINT_SMOOTH_HINT), |
2599 | const_iv (GL_LINE_SMOOTH_HINT), |
2605 | const_iv (GL_LINE_SMOOTH_HINT), |
2600 | const_iv (GL_POLYGON_SMOOTH_HINT), |
2606 | const_iv (GL_POLYGON_SMOOTH_HINT), |
2601 | const_iv (GL_GENERATE_MIPMAP_HINT), |
2607 | const_iv (GL_GENERATE_MIPMAP_HINT), |
|
|
2608 | const_iv (GL_TEXTURE_COMPRESSION_HINT), |
2602 | const_iv (GL_FASTEST), |
2609 | const_iv (GL_FASTEST), |
2603 | const_iv (GL_DONT_CARE), |
2610 | const_iv (GL_DONT_CARE), |
2604 | const_iv (GL_NICEST), |
2611 | const_iv (GL_NICEST), |
2605 | const_iv (GL_V2F), |
2612 | const_iv (GL_V2F), |
2606 | const_iv (GL_V3F), |
2613 | const_iv (GL_V3F), |
… | |
… | |
2614 | |
2621 | |
2615 | texture_av = newAV (); |
2622 | texture_av = newAV (); |
2616 | AvREAL_off (texture_av); |
2623 | AvREAL_off (texture_av); |
2617 | } |
2624 | } |
2618 | |
2625 | |
|
|
2626 | void |
|
|
2627 | disable_GL_EXT_blend_func_separate () |
|
|
2628 | CODE: |
|
|
2629 | gl.BlendFuncSeparate = 0; |
|
|
2630 | gl.BlendFuncSeparateEXT = 0; |
|
|
2631 | |
2619 | char * |
2632 | char * |
2620 | gl_vendor () |
2633 | gl_vendor () |
2621 | CODE: |
2634 | CODE: |
2622 | RETVAL = (char *)glGetString (GL_VENDOR); |
2635 | RETVAL = (char *)glGetString (GL_VENDOR); |
2623 | OUTPUT: |
2636 | OUTPUT: |
… | |
… | |
2743 | glTexCoord2f (s, t); |
2756 | glTexCoord2f (s, t); |
2744 | |
2757 | |
2745 | void glRect (float x1, float y1, float x2, float y2) |
2758 | void glRect (float x1, float y1, float x2, float y2) |
2746 | CODE: |
2759 | CODE: |
2747 | glRectf (x1, y1, x2, y2); |
2760 | glRectf (x1, y1, x2, y2); |
|
|
2761 | |
|
|
2762 | void glRect_lineloop (float x1, float y1, float x2, float y2) |
|
|
2763 | CODE: |
|
|
2764 | glBegin (GL_LINE_LOOP); |
|
|
2765 | glVertex2f (x1, y1); |
|
|
2766 | glVertex2f (x2, y1); |
|
|
2767 | glVertex2f (x2, y2); |
|
|
2768 | glVertex2f (x1, y2); |
|
|
2769 | glEnd (); |
2748 | |
2770 | |
2749 | PROTOTYPES: ENABLE |
2771 | PROTOTYPES: ENABLE |
2750 | |
2772 | |
2751 | void glBegin (int mode) |
2773 | void glBegin (int mode) |
2752 | |
2774 | |
… | |
… | |
2905 | glEnd (); |
2927 | glEnd (); |
2906 | glDisable (GL_BLEND); |
2928 | glDisable (GL_BLEND); |
2907 | } |
2929 | } |
2908 | } |
2930 | } |
2909 | #if 0 |
2931 | #if 0 |
2910 | if ($ENV{CFPLUS_DEBUG} & 1) { |
2932 | // draw borders, for debugging |
2911 | glPushMatrix; |
2933 | glPushMatrix (); |
2912 | glColor 1, 1, 0, 1; |
2934 | glColor4f (1., 1., 0., 1.); |
2913 | glTranslate 0.375, 0.375; |
2935 | glTranslatef (.5, .5, 0.); |
2914 | glBegin GL_LINE_LOOP; |
2936 | glBegin (GL_LINE_LOOP); |
2915 | glVertex 0 , 0; |
2937 | glVertex2f (0 , 0); |
2916 | glVertex $self->{w} - 1, 0; |
2938 | glVertex2f (w - 1, 0); |
2917 | glVertex $self->{w} - 1, $self->{h} - 1; |
2939 | glVertex2f (w - 1, h - 1); |
2918 | glVertex 0 , $self->{h} - 1; |
2940 | glVertex2f (0 , h - 1); |
2919 | glEnd; |
2941 | glEnd (); |
2920 | glPopMatrix; |
2942 | glPopMatrix (); |
2921 | #CFPlus::UI::Label->new (w => $self->{w}, h => $self->{h}, text => $self, fontsize => 0)->_draw; |
|
|
2922 | } |
|
|
2923 | #endif |
2943 | #endif |
2924 | PUSHMARK (SP); |
2944 | PUSHMARK (SP); |
2925 | XPUSHs (self); |
2945 | XPUSHs (self); |
2926 | PUTBACK; |
2946 | PUTBACK; |
2927 | call_method ("_draw", G_VOID | G_DISCARD); |
2947 | call_method ("_draw", G_VOID | G_DISCARD); |