Вверх ↑
Ответов: 876
Рейтинг: 101
#1: 2009-03-13 10:24:56 ЛС | профиль | цитата
nesco писал(а):
Это что ж за IC такое


что то типо этого

Add(InlineCode,11970995,469,542)
{
@Hint=#
WorkPoints=#6:doWork|
EventPoints=#7:onEvent|
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|28:uses kol,Share,Debug,OpenGL;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|23: onEvent:THI_Event;|5: |50: procedure doWork(var Data:TData; index:word);|5: end;|0:|14:implementation|0:|57:procedure THiAsmClass.doWork(var Data:TData; index:word);|5:begin|0:|25:glDisable(GL_TEXTURE_2D);|22:glEnable(GL_LIGHTING);|23:glEnable(GL_NORMALIZE);|0:|22:glBegin(GL_TRIANGLES);|0:|42: glNormal3d(0.000000,-1.000000,0.000000);|43: glVertex3d(-2.500000,0.000000,-2.500000);|42: glVertex3d(2.500000,0.000000,-2.500000);|41: glVertex3d(2.500000,0.000000,2.500000);|0:|42: glNormal3d(0.000000,-1.000000,0.000000);|43: glVertex3d(-2.500000,0.000000,-2.500000);|41: glVertex3d(2.500000,0.000000,2.500000);|42: glVertex3d(-2.500000,0.000000,2.500000);|0:|41: glNormal3d(0.894427,0.447214,0.000000);|41: glVertex3d(2.500000,0.000000,2.500000);|42: glVertex3d(2.500000,0.000000,-2.500000);|41: glVertex3d(0.000000,5.000000,0.000000);|0:|42: glNormal3d(0.000000,0.447214,-0.894427);|42: glVertex3d(2.500000,0.000000,-2.500000);|43: glVertex3d(-2.500000,0.000000,-2.500000);|41: glVertex3d(0.000000,5.000000,0.000000);|0:|42: glNormal3d(-0.894427,0.447214,0.000000);|43: glVertex3d(-2.500000,0.000000,-2.500000);|42: glVertex3d(-2.500000,0.000000,2.500000);|41: glVertex3d(0.000000,5.000000,0.000000);|0:|42: glNormal3d(-0.000000,0.447214,0.894427);|42: glVertex3d(-2.500000,0.000000,2.500000);|41: glVertex3d(2.500000,0.000000,2.500000);|41: glVertex3d(0.000000,5.000000,0.000000);|0:|8:glEnd();|0:|4:end;|0:|4:end.|
}

тока + еще 300000 строк
карма: 1

0