Вверх ↑
Этот топик читают: Гость
Ответов: 1535
Рейтинг: 176
#31: 2012-10-27 18:55:43 ЛС | профиль | цитата
foksov, вот бы этот эффект в обратную сторону запустить.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 1731
Рейтинг: 68
#32: 2012-10-27 19:10:51 ЛС | профиль | цитата
[flood]foksov, зачем плюсики поставили. Я же пошутил [/flood]
карма: 1

0
Ответов: 1376
Рейтинг: 197
#33: 2012-10-27 22:58:15 ЛС | профиль | цитата
ser_davkin писал(а):
вот бы этот эффект в обратную сторону запустить.
если только так сделать...

Add(MainForm,1447383,371,147)
{
Width=200
Height=200
Color=16777215
Caption="Время не вернуть"
BorderStyle=6
TaskBar=1
Position=1
Point(Handle)
Point(Height)
Point(Width)
link(onCreate,6072239:doPopup,[(412,167)(412,167)])
}
Add(Img_Copy,423875,357,252)
{
DrawSource=1
Point(Height)
Point(Width)
link(onCopy,6991831:doEvent1,[])
link(Source,13985067:Var2,[])
link(X,8816870:Var2,[(370,219)(328,219)])
link(Y,6306270:Var2,[(377,211)(342,211)])
link(Height,1447383:Height,[])
link(Width,1447383:Width,[])
}
Add(Img_Text,2286630,567,252)
{
X=15
Y=85
Font=[Tahoma,28,3,32768,204]
Point(doFont)
link(onDraw,1721088:doEvent,[])
link(Text,15425992:Var,[])
}
Add(Hub,6991831,420,252)
{
OutCount=3
link(onEvent1,2286630:doDraw,[])
link(onEvent2,13256847:doRandom,[(467,265)(467,202)])
link(onEvent3,16288053:doFont,[])
}
Add(Font,16288053,476,266)
{
Font=[Tahoma,26,3,65280,204]
link(onFont,2286630:doFont,[(538,272)(538,265)])
link(Color,13256847:Random,[])
}
Add(Random,13256847,483,196)
{
Min=100000
Max=2000000
link(onRandom,9392504:doRandom,[])
}
Add(VisualStrings,8755173,588,161)
{
Lines=#5:HiAsm|
Width=10
}
Add(Random,9392504,525,196)
{
Max=200
link(onRandom,15425992:doIndex,[])
}
Add(GetIndexData,15425992,574,196)
{
Count=7
link(Data1,2930078:Text,[])
link(Data2,15271252:Var1,[(587,187)])
link(Data3,8755173:Text,[])
link(Data4,15271252:Var2,[])
link(Data5,3188360:Var2,[])
link(Data6,6067344:Var2,[])
link(Data7,6067344:Var3,[(622,187)])
}
Add(VisualStrings,2930078,574,161)
{
Lines=#6:foksov|
Width=11
}
Add(Time,488481,595,147)
{
Format="h:m:s"
}
Add(GetDataEx,15271252,595,182)
{
link(Data,488481:FormatTime,[])
}
Add(GetDataEx,3188360,602,182)
{
Angle=3
link(Data,15271252:Var3,[])
}
Add(GetDataEx,6067344,609,182)
{
Angle=3
link(Data,3188360:Var3,[])
}
Add(Timer,14137203,28,245)
{
@Hint=#4:Такт|18:Подбирать по вкусу|
Interval=50
link(onTimer,10485054:doEvent1,[])
AddHint(-25,42,101,26,@Hint)
}
Add(Image,2818762,721,252)
{
Width=200
Height=200
Align=5
Font=[MS Sans Serif,8,0,-16777203,1]
Point(onMouseDown)
link(onMouseDown,3415031:doEvent,[(769,265)(769,258)])
}
Add(Hub,10485054,77,245)
{
OutCount=3
link(onEvent1,580015:doNext,[(99,251)(99,90)])
link(onEvent2,423875:doCopy,[])
link(onEvent3,9446914:doNext,[])
}
Add(Random,11299315,259,84)
{
Min=-1
Max=1
link(onRandom,1339345:doOperation,[])
}
Add(Math,1339345,336,84)
{
ResultType=0
Default=-3
Point(doClear)
link(Op1,6306270:Var1,[(342,74)(330,74)(330,124)])
}
Add(Hub,15366706,231,84)
{
OutCount=3
link(onEvent1,11299315:doRandom,[])
link(onEvent2,11299315:doRandomize,[])
link(onEvent3,5323986:doRandom,[(252,104)(252,146)])
}
Add(Random,5323986,259,140)
{
Min=-1
Max=1
link(onRandom,5233090:doOperation,[])
}
Add(Math,5233090,322,140)
{
ResultType=0
Default=-3
Point(doClear)
link(Op1,8816870:Var1,[(328,128)(316,128)(316,180)])
}
Add(CounterEx,580015,161,84)
{
Max=33
Point(onThroughMax)
Point(doMax)
link(onNext,15366706:doEvent1,[])
link(onThroughMax,12321919:doEvent1,[(201,97)(201,125)])
}
Add(GetDataEx,8816870,322,175)
{
link(Data,5233090:Result,[])
}
Add(GetDataEx,6306270,336,119)
{
link(Data,1339345:Result,[])
}
Add(Hub,6822776,287,119)
{
link(onEvent1,1339345:doClear,[(311,125)(311,97)])
link(onEvent2,5233090:doClear,[(311,132)(311,153)])
}
Add(Hub,12321919,210,119)
{
link(onEvent1,6822776:doEvent1,[])
link(onEvent2,14952116:doRandom,[(234,132)(234,146)(107,146)(107,97)])
}
Add(Random,14952116,119,91)
{
Min=20
Max=50
link(onRandom,580015:doMax,[])
}
Add(MoveWindow,12716834,847,224)
{
link(Handle,730246:Var,[])
}
Add(LineBreak,16766227,301,238)
{
Type=1
link(Data,13985067:Var1,[(307,229)])
Primary=[730246,546,-42]
}
Add(GetDataEx,13985067,357,224)
{
link(Data,14506557:Var1,[(363,194)])
}
Add(IndexToChanel,3415031,784,252)
{
link(onEvent1,12716834:doMove,[(828,258)(828,230)])
link(onEvent2,6848198:doPopupHere,[])
}
Add(WinTools,6072239,420,154)
{
link(Handle,14506557:Var3,[(426,146)(458,146)(458,194)])
}
Add(GetDataEx,14506557,371,189)
{
link(Data,1447383:Handle,[])
}
Add(PopupMenu,6848198,847,259)
{
Menu=#5:Выход|
link(onClick,10319870:doTimer,[])
}
Add(Timer,10319870,896,259)
{
Interval=3000
Enable=1
link(onTimer,1447383:doClose,[(937,265)(937,141)(359,141)(359,174)])
}
Add(MultiElement,1927502,721,308)
{
@Hint=#12:Bitmap stack|
link(Data1,2818762:ImageBitmap,[])
link(onEvent1,10946189:doWork3,[(765,314)(765,292)(704,292)])
link(onEvent2,5188810:doReset,[(765,321)(765,366)(456,366)(456,314)])
}
BEGIN_SDK
Add(EditMulti,10381605,14,21)
{
EventCount=2
WorkCount=2
DataCount=1
Width=461
Height=81
link(doWork1,3245156:doPack,[(45,27)(45,55)])
link(doWork2,4155302:doPop,[(36,34)(36,62)])
}
Add(Stack,4155302,196,49)
{
Point(doClear)
Point(onEmpty)
link(onPop,14297118:doConvert,[(241,62)(241,55)])
link(onEmpty,10381605:onEvent2,[(457,69)(457,34)])
}
Add(StreamPack,3245156,56,49)
{
DataCount=#3:bmp|
link(onPack,12352284:doCompress,[])
link(bmp,10381605:Data1,[(62,35)(20,35)])
}
Add(StreamUnPack,3461667,357,49)
{
DataCount=#3:bmp|
link(onUnPack,7507149:doData,[])
}
Add(DoData,7507149,406,49)
{
link(onEventData,10381605:onEvent1,[(449,55)(449,27)])
link(Data,3461667:bmp,[(412,37)(398,37)(398,92)(363,92)])
}
Add(ZLIB,12352284,105,49)
{
link(onStream,16020386:doConvert,[])
}
Add(ZLIB,6808317,308,49)
{
link(onStream,3461667:doUnPack,[])
}
Add(StreamConvertor,16020386,147,49)
{
Mode=6
link(onResult,4155302:doPush,[])
}
Add(StreamConvertor,14297118,259,49)
{
Mode=7
link(onResult,6808317:doDeCompress,[(299,55)(299,62)])
}
END_SDK
Add(Switch,5188810,476,301)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(doOn)
Point(onOff)
Point(onOn)
Point(State)
}
Add(CounterEx,9446914,154,259)
{
@Hint=#6:кадров|12:запоминается|
Max=1000
Point(onThroughMax)
link(onThroughMax,5188810:doOn,[(331,272)(331,321)])
AddHint(-6,-59,39,13,Max)
AddHint(-21,-42,73,26,@Hint)
}
Add(IndexToChanel,1721088,609,252)
{
Point(Index)
link(onEvent1,9309338:doEvent1,[])
link(onEvent2,1927502:doWork2,[(658,265)(658,321)])
link(Index,588110:Var,[])
}
Add(LineBreak,9270394,476,343)
{
Caption="state"
Type=1
link(Data,5188810:State,[])
Primary=[588110,133,-112]
}
Add(Hub,9309338,672,252)
{
link(onEvent1,10946189:doWork2,[])
link(onEvent2,1927502:doWork1,[(694,265)(694,314)])
}
Add(HubEx,10946189,700,252)
{
link(onEvent,2818762:doLoad,[])
}
ещё вариант, с добавлением эффекта от tig-rrr

Add(MainForm,1447383,371,147)
{
Width=200
Height=200
Color=16777215
Caption="Время не вернуть"
BorderStyle=6
TaskBar=1
SavePosName="HiClock"
Position=1
Point(Handle)
Point(Height)
Point(Width)
link(onCreate,6072239:doPopup,[])
}
Add(Img_Copy,423875,357,252)
{
DrawSource=1
Point(Height)
Point(Width)
link(onCopy,3086310:doWork1,[])
link(Source,13985067:Var2,[])
link(X,8816870:Var2,[(370,219)(328,219)])
link(Y,6306270:Var2,[(377,211)(342,211)])
link(Height,1447383:Height,[])
link(Width,1447383:Width,[])
}
Add(Img_Text,2286630,567,252)
{
X=15
Y=85
Font=[Tahoma,28,3,32768,204]
Point(doFont)
link(onDraw,1721088:doEvent,[])
link(Text,15425992:Var,[])
}
Add(Hub,6991831,448,252)
{
OutCount=3
link(onEvent1,2286630:doDraw,[])
link(onEvent2,13256847:doRandom,[(467,265)(467,202)])
link(onEvent3,16288053:doFont,[])
}
Add(Font,16288053,476,266)
{
Font=[Tahoma,26,3,65280,204]
link(onFont,2286630:doFont,[(538,272)(538,265)])
link(Color,13256847:Random,[])
}
Add(Random,13256847,483,196)
{
Min=100000
Max=2000000
link(onRandom,9392504:doRandom,[])
}
Add(VisualStrings,8755173,588,161)
{
Lines=#5:HiAsm|
Width=10
}
Add(Random,9392504,525,196)
{
Max=200
link(onRandom,15425992:doIndex,[])
}
Add(GetIndexData,15425992,574,196)
{
Count=7
link(Data1,2930078:Text,[])
link(Data2,15271252:Var1,[(587,187)])
link(Data3,8755173:Text,[])
link(Data4,15271252:Var2,[])
link(Data5,3188360:Var2,[])
link(Data6,6067344:Var2,[])
link(Data7,6067344:Var3,[(622,187)])
}
Add(VisualStrings,2930078,574,161)
{
Lines=#6:foksov|
Width=11
}
Add(Time,488481,595,147)
{
Format="h:m:s"
}
Add(GetDataEx,15271252,595,182)
{
link(Data,488481:FormatTime,[])
}
Add(GetDataEx,3188360,602,182)
{
Angle=3
link(Data,15271252:Var3,[])
}
Add(GetDataEx,6067344,609,182)
{
Angle=3
link(Data,3188360:Var3,[])
}
Add(Timer,14137203,28,245)
{
@Hint=#4:Такт|18:Подбирать по вкусу|
Interval=50
link(onTimer,10485054:doEvent1,[])
AddHint(-25,42,101,26,@Hint)
}
Add(Image,2818762,721,252)
{
Width=200
Height=200
Align=5
Font=[MS Sans Serif,8,0,-16777203,1]
Point(onMouseDown)
link(onMouseDown,3415031:doEvent,[(769,265)(769,258)])
}
Add(Hub,10485054,77,245)
{
OutCount=3
link(onEvent1,580015:doNext,[(99,251)(99,90)])
link(onEvent2,423875:doCopy,[])
link(onEvent3,9446914:doNext,[])
}
Add(Random,11299315,259,84)
{
Min=-1
Max=1
link(onRandom,1339345:doOperation,[])
}
Add(Math,1339345,336,84)
{
ResultType=0
Default=-3
Point(doClear)
link(Op1,6306270:Var1,[(342,74)(330,74)(330,124)])
}
Add(Hub,15366706,231,84)
{
OutCount=3
link(onEvent1,11299315:doRandom,[])
link(onEvent2,11299315:doRandomize,[])
link(onEvent3,5323986:doRandom,[(252,104)(252,146)])
}
Add(Random,5323986,259,140)
{
Min=-1
Max=1
link(onRandom,5233090:doOperation,[])
}
Add(Math,5233090,322,140)
{
ResultType=0
Default=-3
Point(doClear)
link(Op1,8816870:Var1,[(328,128)(316,128)(316,180)])
}
Add(CounterEx,580015,161,84)
{
Max=33
Point(onThroughMax)
Point(doMax)
link(onNext,15366706:doEvent1,[])
link(onThroughMax,12321919:doEvent1,[(201,97)(201,125)])
}
Add(GetDataEx,8816870,322,175)
{
link(Data,5233090:Result,[])
}
Add(GetDataEx,6306270,336,119)
{
link(Data,1339345:Result,[])
}
Add(Hub,6822776,287,119)
{
link(onEvent1,1339345:doClear,[(311,125)(311,97)])
link(onEvent2,5233090:doClear,[(311,132)(311,153)])
}
Add(Hub,12321919,210,119)
{
link(onEvent1,6822776:doEvent1,[])
link(onEvent2,14952116:doRandom,[(234,132)(234,146)(107,146)(107,97)])
}
Add(Random,14952116,119,91)
{
Min=20
Max=50
link(onRandom,580015:doMax,[])
}
Add(MoveWindow,12716834,847,224)
{
link(Handle,730246:Var,[])
}
Add(LineBreak,16186184,301,238)
{
Type=1
link(Data,13985067:Var1,[(307,229)])
Primary=[730246,546,-42]
}
Add(GetDataEx,13985067,357,224)
{
link(Data,14506557:Var1,[(363,194)])
}
Add(IndexToChanel,3415031,784,252)
{
link(onEvent1,12716834:doMove,[(828,258)(828,230)])
link(onEvent2,6848198:doPopupHere,[])
}
Add(WinTools,6072239,420,154)
{
link(Handle,14506557:Var3,[(426,146)(458,146)(458,194)])
}
Add(GetDataEx,14506557,371,189)
{
link(Data,1447383:Handle,[])
}
Add(PopupMenu,6848198,847,259)
{
Menu=#5:Выход|
link(onClick,10319870:doTimer,[])
}
Add(Timer,10319870,896,259)
{
Interval=3000
Enable=1
link(onTimer,1447383:doClose,[(937,265)(937,141)(359,141)(359,174)])
}
Add(MultiElement,1927502,721,301)
{
@Hint=#12:Bitmap stack|
link(onEvent1,10946189:doWork3,[(765,307)(765,292)(704,292)])
link(onEvent2,5188810:doReset,[(765,314)(765,365)(593,365)(593,314)])
}
BEGIN_SDK
Add(EditMulti,10381605,14,21)
{
EventCount=2
WorkCount=2
Width=461
Height=81
link(doWork1,3245156:doPack,[(33,27)(33,55)])
link(doWork2,4155302:doPop,[(25,34)(25,62)])
}
Add(Stack,4155302,196,49)
{
Point(doClear)
Point(onEmpty)
link(onPop,14297118:doConvert,[(241,62)(241,55)])
link(onEmpty,10381605:onEvent2,[(457,69)(457,34)])
}
Add(StreamPack,3245156,56,49)
{
DataCount=#3:bmp|
link(onPack,12352284:doCompress,[])
}
Add(StreamUnPack,3461667,357,49)
{
DataCount=#3:bmp|
link(onUnPack,7507149:doData,[])
}
Add(DoData,7507149,406,49)
{
link(onEventData,10381605:onEvent1,[(449,55)(449,27)])
link(Data,3461667:bmp,[(412,37)(398,37)(398,92)(363,92)])
}
Add(ZLIB,12352284,105,49)
{
link(onStream,16020386:doConvert,[])
}
Add(ZLIB,6808317,308,49)
{
link(onStream,3461667:doUnPack,[])
}
Add(StreamConvertor,16020386,147,49)
{
Mode=6
link(onResult,4155302:doPush,[])
}
Add(StreamConvertor,14297118,259,49)
{
Mode=7
link(onResult,6808317:doDeCompress,[(299,55)(299,62)])
}
END_SDK
Add(Switch,5188810,609,301)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(doOn)
Point(State)
}
Add(CounterEx,9446914,154,259)
{
@Hint=#6:кадров|12:запоминается|
Max=1000
Point(onThroughMax)
link(onThroughMax,5188810:doOn,[(331,272)(331,321)])
AddHint(-6,-59,39,13,Max)
AddHint(-21,-42,73,26,@Hint)
}
Add(IndexToChanel,1721088,609,252)
{
Point(Index)
link(onEvent1,9309338:doEvent1,[])
link(onEvent2,1927502:doWork2,[(658,265)(658,314)])
link(Index,588110:Var,[])
}
Add(LineBreak,6784504,609,343)
{
Caption="state"
Type=1
link(Data,5188810:State,[])
Primary=[588110,0,-112]
}
Add(Hub,9309338,672,252)
{
link(onEvent1,10946189:doWork2,[])
link(onEvent2,1927502:doWork1,[(694,265)(694,307)])
}
Add(HubEx,10946189,700,252)
{
link(onEvent,2818762:doLoad,[])
}
Add(MultiElement,3086310,406,252)
{
link(onEvent1,6991831:doEvent1,[])
}
BEGIN_SDK
Add(EditMulti,4981871,196,196)
{
EventCount=1
WorkCount=1
Width=377
Height=151
link(doWork1,4107360:doEvent1,[(206,202)(206,244)])
}
Add(Img_Rotate,5930058,448,294)
{
Angle=0
BackgroundColor=16777215
link(onResult,2455708:doEvent1,[])
link(Angle,10191035:State,[])
}
Add(Switch,10191035,455,238)
{
DataOn=Integer(4)
DataOff=Integer(-4)
Default=0
Point(State)
}
Add(CounterEx,6321101,406,231)
{
Max=200
Point(onThroughMax)
link(onThroughMax,10191035:doSwitch,[])
}
Add(Hub,2455708,511,294)
{
InCount=2
link(onEvent1,6321101:doNext,[(536,300)(536,221)(394,221)(394,237)])
link(onEvent2,4981871:onEvent1,[(547,307)(547,202)])
}
Add(IndexToChanel,6809884,350,294)
{
Point(Index)
link(onEvent1,5930058:doRotate,[])
link(onEvent2,2455708:doEvent2,[])
link(Index,15360138:State,[])
}
Add(Hub,4107360,217,238)
{
link(onEvent1,7395040:doRandom,[])
link(onEvent2,6809884:doEvent,[(243,251)(243,300)])
}
Add(Switch,15360138,350,231)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(State)
Point(doOn)
}
Add(Random,7395040,259,238)
{
link(onRandom,6557780:doEvent,[])
}
Add(IndexToChanel,6557780,301,238)
{
link(onEvent1,15360138:doReset,[])
link(onEvent2,15360138:doOn,[])
}
END_SDK


карма: 1

1
Голосовали:tig-rrr
Гость
Ответов: 17029
Рейтинг: 0
#34: 2012-10-28 13:12:44 правка | ЛС | профиль | цитата


Редактировалось 5 раз(а), последний 2021-06-21 07:02:49
карма: 0

0
Ответов: 490
Рейтинг: 162
#35: 2012-10-29 08:47:34 ЛС | профиль | цитата
37.45.217.218 писал(а):
Спасибо за пример для OpenGL (познавательно)
микро мод
code_29404.txt
------------ Дoбавленo в 08.47:
foksov писал(а):
эффект в обратную сторону запустить
Понравилось
карма: 4

0
файлы: 1code_29404.txt [11.4KB] [491]
35
Сообщение
...
Прикрепленные файлы
(файлы не залиты)