forum.boolean.name - Полезный конкурс

forum.boolean.name (http://forum.boolean.name/index.php)

- Форумные конкурсы (http://forum.boolean.name/forumdisplay.php?f=42)

- - Полезный конкурс (http://forum.boolean.name/showthread.php?t=4248)

Полезный конкурс

Предлагаю такой конкурс: перед участниками (любой желающий) ставится задача написать какую либо часто используюмую в программах функцию. Победителем становится автор самой оригинальной, а главное быстродействующей программы. А код прораммы (с указание автора естественно) выкладывается в соответствующий раздел. Польза очевидна всем: автору - respect, а пользователям форума - помощь в создании программ.
Ну как?

Re: Полезный конкурс

Код:

Repeat

Forever

Написал :)
Нужно както ограничить, или сделать какие-то рамки, чтобы это небыло глупо:

Код:

Function mText(X%,Y%,Txt$)

  Text X,Y,Txt

End Function

Re: Полезный конкурс

даже незнаю. стоит ли? функций много всяких есть, причем на разные темы. ИМХО лучше написать что-то типа FAQ, чем я сейчас и занимаюсь. скоро выложу в соответствующем разделе. а функцию, ну вот, например:

Код:

Function screen(name$,keylog,fs=1,x=0,y=0) 

;name$ - имя файла

;keylog - доступно прекращение показа или нет (1,0)

;fs - на весь экран или нет (1-полный экран, 0-нет)

;x - x-координата левого верхнего угла

;y - y-координата левого верхнего угла

movie=OpenMovie(name$)

ed=0

Repeat

If keylog=1 Then If KeyHit(28) Or MouseHit(1) Then ed=1

If Not(MoviePlaying(movie)) Then ed=1

If fs=1 Then 

        DrawMovie movie,0,0,GraphicsWidth(),GraphicsHeight() 

Else 

        DrawMovie movie,x,y,MovieWidth(movie),MovieHeight(movie) 

EndIf 

Flip 

Until ed=1 

CloseMovie(movie) 

End Function

это функция воспроизведения видеофайла, например видеовставки в игре показывать...

Re: Полезный конкурс

Как конкурс - не катит.

Re: Полезный конкурс

JohnK, почему? Не ленись, распиши почему.

Re: Полезный конкурс

Конкурс - это в первую очередь творчество, на которое можно посмотреть и оценить...Если функцию оценить еще можно, то посмотреть уж не как. В общем, я считаю, тратить время на функции - не очень то и благодарное дело. Лучше рыть в направлении игр, там уж конкурсы куда забавнее и занимательнее получаются.

Re: Полезный конкурс

JohnK, посторонним не посмотреть, а кодеру (у нас же кодерский форум), так кодеру посмотреть есть на что и на стиль написания, и на манеру кода. На саму функцию, и много на что ещё.

Re: Полезный конкурс

Это, как говорится, мое имхо, так что говорю, что думаю.

Re: Полезный конкурс

А конкур не для всех желающих. Для новичков он бесполезен, в том плане они не сравнятся с бывалыми юзерами. Поэтому многие не примут в нём участия, а другим будет влом. Это маё мнение.

Re: Полезный конкурс

Да уж. Имхо конкурс не катит. Да и за функции никто и спасибо потом не скажет (новички нах или просто по народному нупы)...Если уж конкурс то лучше написание игры. Но я бы не учавствувал никак (по крайней мере сейчас) - у меня абсолютно нету времени :(

Re: Полезный конкурс

Вот считаю эти функции полезными (писал их не я ,просто пользуюсь)

Код:

Function MaskTexture(Texture, Red, Green, Blue)

Local MaskColor = (Red Shl 16) Or (Green Shl 8) Or Blue

Local MaskSizeX = TextureWidth(Texture)

Local MaskSizeY = TextureHeight(Texture)

Local MaskBuffer = TextureBuffer(Texture)

LockBuffer(MaskBuffer)

For x = 0 To MaskSizeX

For y = 0 To MaskSizeY

Pixel = ReadPixelFast(x, y, MaskBuffer) And $00FFFFFF

If (Pixel = MaskColor) Then

WritePixelFast(x, y, Pixel, MaskBuffer)

Else

WritePixelFast(x, y, Pixel Or $FF000000, MaskBuffer)

EndIf

Next

Next

UnlockBuffer(MaskBuffer)

End Function

-эта функция делайт альфоканал у созданой текстуры ! ВАЖНО: CreateTexture(x,y,2 или 4)
___________________

Код:

Function CreateSquare() 

mesh=CreateMesh() 

surf=CreateSurface(mesh) 

v1=AddVertex(surf, 1, 1,0, 1, 0) 

v2=AddVertex(surf, -1, 1,0, 0, 0) 

v3=AddVertex(surf, -1,  -1,0, 0, 1) 

v4=AddVertex(surf, 1,  -1,0, 1, 1) 

AddTriangle(surf, 1, 0, 3) 

AddTriangle(surf, 1, 3, 2) 

return mesh 

End Function

-Создаем квад (два треугольника) удобно для панелек имхо

Re: Полезный конкурс

Все, понял, молчу...

Re: Полезный конкурс

Написать как можно более быструю ф-ию нормализации, нормалей модели.
Или скажем ф-ию с булеановскими опреациями между мешами.
Оптимизировать что и так быстро работает - имхо незачем.
Оптимизировать то что и так редко используется - имхо незачем
Оптимизировать простые опирации которые часто используются - имхо незачем, все равно не соптимизируеш.
Вобщем, хз, что из етого выйдет.

Re: Полезный конкурс

Это будет соревнование по поиску на оффсайте (там все есть).