Вверх ↑
Этот топик читают: Гость
Ответов: 1536
Рейтинг: 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
Ответов: 500
Рейтинг: 163
#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] [574]
35
Сообщение
...
Прикрепленные файлы
(файлы не залиты)