------------ Дoбавленo:
Вот попробуйте добавить это в схему игры(всю не охото выкладывать) и нажмите о программе. Все что на форме у вас видимо? Причина Label - Transperend=True
Add(BitBtn,15982904,35,441)
{
Left=195
Top=185
Width=110
Height=35
Font=[MS Sans Serif,13,0,0,1]
Caption="О программе"
link(onClick,13532932:doShow,[])
}
Add(ChildFormEx,13532932,84,441)
{
}
BEGIN_SDK
Add(EditMultiEx,9237198,21,21)
{
WorkCount=#23:doShow=Показывает форму|
Height=158
link(doShow,804879:doEvent1,[(25,27)(25,62)])
}
Add(MainForm,16082449,98,56)
{
Left=35
Top=105
Width=288
Height=210
Caption="Казино"
TaskBar=1
Point(doShowModal)
Point(doVisible)
}
Add(Label,15386360,189,119)
{
Left=5
Width=270
Height=37
Caption="Мини-казино! Играй!!! Если выиграешь больше 1000
ты разбогатеешь!!!"
AutoSize=1
}
Add(Label,3733184,259,119)
{
Left=5
Top=50
Width=79
Height=17
Caption="Удачи в игре!!!"
}
Add(Label,12967353,119,119)
{
Top=130
Width=79
Height=17
Caption="Автор : Assasin"
}
Add(Label,3049722,49,119)
{
Top=75
Width=278
Height=27
Caption="Сайт программы, на которой была зделана игра:
www.hiasm.com"
AutoSize=1
}
Add(Button,7748402,28,77)
{
Left=100
Top=150
Width=70
Height=25
Caption="OK"
link(onClick,16082449:doClose,[])
}
Add(Hub,804879,28,56)
{
link(onEvent1,16082449:doVisible,[(70,62)(70,97)])
}
END_SDK
------------ Дoбавленo:
------------ Дoбавленo:
Очередная версия, добавлен выбор уровня сложности
Add(MainForm,2953706,336,245)
{
Width=399
Height=256
Color=-16777192
Caption="Казино!!!"
Position=1
link(onCreate,178980:doWork2,[])
}
Add(Label,9111528,630,203)
{
Left=95
Top=90
Width=25
Height=52
Color=-16777192
Font=[MS Sans Serif,30,0,0,1]
Caption="0"
}
Add(Label,21444,630,245)
{
Left=170
Top=90
Width=25
Height=52
Color=-16777192
Font=[MS Sans Serif,30,0,0,1]
Caption="0"
}
Add(Label,3573896,630,287)
{
Left=250
Top=90
Width=25
Height=52
Color=-16777192
Font=[MS Sans Serif,30,0,0,1]
Caption="0"
}
Add(Label,7507811,112,147)
{
Left=125
Top=150
Width=122
Height=36
Color=-16777192
Font=[MS Sans Serif,20,0,0,1]
Caption="Деньги: 0"
}
Add(Label,10148828,763,336)
{
Left=120
Width=146
Height=36
Color=-16777192
Font=[MS Sans Serif,20,0,0,1]
Caption="Выигрыш: 0"
}
Add(BitBtn,417391,14,203)
{
Top=185
Width=70
Height=35
Font=[MS Sans Serif,20,0,0,1]
Caption="Крутить!!!"
link(onClick,285916:doCompare,[])
}
Add(BitBtn,1364051,14,252)
{
Left=320
Top=185
Width=70
Height=35
Font=[MS Sans Serif,20,0,0,1]
Caption="НОВАЯ"
link(onClick,9935462:doShow,[])
}
Add(If_else,285916,112,203)
{
Type=5
Op2=String(Деньги: 0)
link(onTrue,14911073:doEvent1,[])
link(onFalse,14247797:doMessage,[(191,216)(191,265)])
link(Op1,7507811:Caption,[])
}
Add(Timer,12941750,392,203)
{
Interval=200
Enable=1
AutoStop=10
Point(onStop)
link(onTimer,5109891:doEvent1,[])
link(onStop,7321256:doCompare,[(432,216)(432,342)])
}
Add(Hub,5109891,434,203)
{
InCount=2
OutCount=3
link(onEvent1,14624846:doCompare,[])
link(onEvent2,13892456:doCompare,[(458,216)(458,251)])
link(onEvent3,5012205:doCompare,[(455,223)(455,293)])
}
Add(If_else,7321256,567,336)
{
link(onTrue,1332805:doCompare,[])
link(Op1,7840198:Count,[(573,286)(580,286)])
link(Op2,7114957:Var2,[])
}
Add(If_else,1332805,630,336)
{
link(onTrue,12249244:doEvent1,[])
link(Op1,7114957:Var3,[(636,324)])
link(Op2,1031336:Count,[(643,328)(580,328)])
}
Add(GetDataEx,7114957,567,315)
{
link(Data,3230528:Count,[])
}
Add(Timer,1512374,714,392)
{
Interval=200
link(onTimer,14518680:doCompare,[])
}
Add(If_else,14518680,763,392)
{
Type=5
Op2=String(Выигрыш: 0)
link(onTrue,8978251:doData,[])
link(Op1,5049633:Var1,[(769,380)])
}
Add(GetDataEx,5049633,791,371)
{
link(Data,4214520:Value,[])
}
Add(FastMathParse,6870451,973,392)
{
DataCount=1
MathStr="%1 - 1"
link(onResult,12391656:doEvent1,[])
}
Add(StrCat,2198922,1043,392)
{
Str1="Выигрыш: "
link(onStrCat,14004453:doWork1,[(1081,398)(1081,324)(746,324)])
}
Add(HubEx,14004453,742,329)
{
link(onEvent,10148828:doText,[])
}
Add(StrCat,10680193,693,336)
{
Str1="Выигрыш: "
link(onStrCat,14004453:doWork2,[])
link(Str2,14243689:Var2,[])
}
Add(Hub,54018,945,392)
{
link(onEvent1,6870451:doCalc,[])
link(onEvent2,9858854:doCalc,[(966,405)(966,447)])
}
Add(FastMathParse,9858854,973,441)
{
DataCount=1
MathStr="%1 + 1"
link(onResult,911988:doEvent1,[])
link(X1,11831332:Var3,[(979,156)])
}
Add(StrCat,1197265,1050,441)
{
Str1="Деньги: "
link(onStrCat,5749105:doWork2,[(1091,447)(1091,139)])
}
Add(Counter,7840198,574,203)
{
Point(doValue)
link(onNext,9111528:doText,[])
}
Add(Counter,3230528,574,245)
{
Step=2
Point(doValue)
link(onNext,21444:doText,[])
}
Add(Counter,1031336,574,287)
{
Step=3
Point(doValue)
link(onNext,3573896:doText,[])
}
Add(FastMathParse,4763076,231,203)
{
DataCount=1
MathStr="%1 - 1"
link(onResult,13461452:doEvent1,[])
link(X1,11831332:Var2,[])
}
Add(StrCat,5985713,336,203)
{
Str1="Деньги: "
link(onStrCat,5749105:doWork3,[(375,209)])
}
Add(Hub,14911073,154,203)
{
OutCount=3
link(onEvent1,4763076:doCalc,[])
link(onEvent2,12941750:doTimer,[(280,216)(280,209)])
link(onEvent3,3804853:doWork1,[(198,223)(198,334)(165,334)])
}
Add(HubEx,5749105,371,126)
{
Angle=2
link(onEvent,7507811:doText,[(98,139)(98,153)])
}
Add(Message,14247797,203,259)
{
Message="ЧЕМ ПЛАТИТЬ БУДЕШЬ??? В ДОЛГ НЕ ДАЕМ!!!"
Caption="Казино"
}
Add(Case,4589326,238,371)
{
Value=Integer(20)
link(onNextCase,10638496:doCase,[])
link(onTrue,2935034:doWork3,[(396,384)(396,419)])
}
Add(Case,10638496,287,371)
{
Value=Integer(40)
link(onNextCase,13244000:doCase,[])
link(onTrue,2935034:doWork2,[(327,384)(327,419)])
}
Add(Case,13244000,336,371)
{
Value=Integer(80)
link(onTrue,2935034:doWork1,[(375,384)])
}
Add(Random,11474644,182,371)
{
Max=150
link(onRandom,4589326:doCase,[])
}
Add(StrCat,6899228,532,434)
{
Str1="Выигрыш: "
link(onStrCat,609920:doInfo,[])
}
Add(HubEx,2935034,371,406)
{
Angle=1
link(onEvent,4367510:doData,[(375,440)])
}
Add(Informer,609920,574,434)
{
link(onContinue,14004453:doWork3,[(746,440)])
link(onInfo,4847891:doMessage,[(618,447)(618,461)])
}
Add(Message,4847891,630,455)
{
Message="Получка"
Caption="Ура"
}
Add(DoData,15416745,147,252)
{
Data=String(Деньги: 50)
link(onEventData,5749105:doWork1,[(257,258)(257,134)])
}
Add(Hub,2577485,98,252)
{
OutCount=5
link(onEvent1,15416745:doData,[])
link(onEvent2,7844645:doData,[(130,265)(130,300)])
link(onEvent3,3804853:doWork2,[(121,272)(121,377)])
link(onEvent4,203680:doCalc,[(127,279)(127,328)])
link(onEvent5,7765227:doTimer,[(196,286)(196,314)])
}
Add(Memory,11951134,231,84)
{
Default=Integer(0)
}
Add(Memory,4214520,798,287)
{
}
Add(DoData,4367510,399,434)
{
link(onEventData,13379570:doEvent1,[])
link(Data,11474644:Random,[(405,423)(188,423)])
}
Add(Hub,12391656,1015,392)
{
link(onEvent1,2198922:doStrCat,[])
link(onEvent2,14551384:doWork2,[(1041,405)(1041,279)])
}
Add(Hub,911988,1022,441)
{
link(onEvent1,1197265:doStrCat,[])
link(onEvent2,9037414:doWork2,[(1041,454)(1041,76)])
}
Add(HubEx,9037414,378,63)
{
Angle=2
link(onEvent,11951134:doValue,[(223,76)(223,90)])
}
Add(DoData,7844645,147,294)
{
Data=Integer(50)
link(onEventData,9037414:doWork3,[(382,300)])
}
Add(Hub,13379570,469,434)
{
link(onEvent1,6899228:doStrCat,[])
link(onEvent2,14551384:doWork3,[(935,447)])
}
Add(HubEx,14551384,931,266)
{
Angle=2
link(onEvent,4214520:doValue,[(787,279)(787,293)])
}
Add(DoData,8978251,826,392)
{
link(onEventData,54018:doEvent1,[])
link(Data,5049633:Var3,[(832,380)])
}
Add(Hub,13461452,287,203)
{
link(onEvent1,5985713:doStrCat,[])
link(onEvent2,9037414:doWork1,[(327,216)(327,72)(382,72)])
}
Add(GetDataEx,11831332,224,147)
{
link(Data,11951134:Value,[])
}
Add(BitBtn,15656705,35,476)
{
Left=85
Top=185
Width=110
Height=35
Font=[MS Sans Serif,15,0,0,1]
Caption="Наша песня"
link(onClick,4915973:doMessage,[])
}
Add(Message,4915973,84,476)
{
Message="Кааааазино казино!
оу райд, оу ноу!
Казинооооо!"
}
Add(CheckBox,5584329,469,77)
{
Left=100
Top=70
Width=15
Height=15
Caption=""
}
Add(CheckBox,974176,469,119)
{
Left=175
Top=70
Width=15
Height=15
Caption=""
}
Add(CheckBox,5520788,469,161)
{
Left=255
Top=70
Width=15
Height=15
Caption=""
}
Add(Label,9679341,112,98)
{
Left=130
Top=35
Width=118
Height=36
Color=-16777192
Font=[MS Sans Serif,20,0,0,1]
Caption="СТОПОР"
}
Add(If_else,14624846,469,203)
{
Type=5
Op2=Integer(1)
link(onTrue,7840198:doNext,[])
link(Op1,5584329:Checked,[])
}
Add(If_else,13892456,469,245)
{
Type=5
Op2=Integer(1)
link(onTrue,3230528:doNext,[])
link(Op1,974176:Checked,[])
}
Add(If_else,5012205,469,287)
{
Type=5
Op2=Integer(1)
link(onTrue,1031336:doNext,[])
link(Op1,5520788:Checked,[])
}
Add(Hub,12249244,672,336)
{
link(onEvent1,10680193:doStrCat,[])
link(onEvent2,11603307:doData,[])
}
Add(DoData,11603307,826,343)
{
link(onEventData,14551384:doWork1,[(896,349)(896,274)])
link(Data,14243689:Var3,[(832,303)])
}
Add(GetDataEx,14243689,693,294)
{
link(Data,7114957:Var1,[(706,284)(575,284)])
}
Add(HubEx,3804853,161,364)
{
link(onEvent,11474644:doRandom,[])
}
Add(BitBtn,15982904,35,441)
{
Left=195
Top=185
Width=110
Height=35
Font=[MS Sans Serif,13,0,0,1]
Caption="О программе"
link(onClick,13532932:doShow,[])
}
Add(ChildFormEx,13532932,84,441)
{
}
BEGIN_SDK
Add(EditMultiEx,9237198,21,21)
{
WorkCount=#23:doShow=Показывает форму|
Height=158
link(doShow,16082449:doShowModal,[(59,27)(59,90)])
}
Add(MainForm,16082449,98,56)
{
Left=35
Top=105
Width=288
Height=210
Visible=1
Caption="Казино"
BorderStyle=1
TaskBar=1
Position=1
Point(doShowModal)
}
Add(Label,15386360,189,119)
{
Left=5
Width=270
Height=37
Caption="Мини-казино! Играй!!! Если выиграешь больше 1000
ты разбогатеешь!!!"
AutoSize=1
}
Add(Label,3733184,259,119)
{
Left=5
Top=50
Width=79
Height=17
Caption="Удачи в игре!!!"
}
Add(Label,12967353,119,119)
{
Top=130
Width=79
Height=17
Caption="Автор : Assasin"
}
Add(Label,3049722,49,119)
{
Top=75
Width=278
Height=27
Caption="Сайт программы, на которой была зделана игра:
www.hiasm.com"
AutoSize=1
}
Add(Button,7748402,28,77)
{
Left=100
Top=150
Width=70
Height=25
Caption="OK"
link(onClick,16082449:doClose,[])
}
END_SDK
Add(MultiElementEx,8073668,392,259)
{
link(1,7840198:doValue,[(499,265)(499,230)])
link(2,3230528:doValue,[])
link(3,1031336:doValue,[(499,279)(499,314)])
link(onOff,5109891:doEvent2,[(429,286)(429,216)])
}
BEGIN_SDK
Add(EditMultiEx,14028794,21,21)
{
WorkCount=#6:Данные|
EventCount=#1:1|1:2|1:3|5:onOff|
Width=209
Height=67
link(Данные,1541699:doEvent1,[])
}
Add(Hub,1541699,42,21)
{
OutCount=4
link(onEvent1,16258089:doRandom,[])
link(onEvent2,8136074:doRandom,[])
link(onEvent3,16287716:doRandom,[])
link(onEvent4,14028794:onOff,[])
}
Add(Random,16258089,84,21)
{
link(onRandom,14028794:1,[])
}
Add(Random,8136074,133,28)
{
link(onRandom,14028794:2,[])
}
Add(Random,16287716,182,35)
{
link(onRandom,14028794:3,[])
}
END_SDK
Add(Timer,7765227,280,308)
{
Point(doInterval)
link(onTimer,178980:doWork3,[(382,314)])
}
Add(ChildFormEx,9935462,56,252)
{
link(onClick,2577485:doEvent1,[])
}
BEGIN_SDK
Add(EditMultiEx,6041944,21,21)
{
WorkCount=#27:doShow=Показывает настройку|
EventCount=#39:onClick=Происходит при выборе сложности|
VarCount=#52:Difficulty=Содержит выбранную сложность(1-легкий...)|
Width=265
Height=130
link(doShow,15716992:doEvent1,[(25,27)(25,62)])
link(Difficulty,4710604:Value,[(27,141)(167,141)])
}
Add(MainForm,12437594,56,28)
{
Left=35
Top=105
Width=163
Height=97
Visible=1
BorderStyle=3
TaskBar=1
Point(doShowModal)
Point(Handle)
link(onCreate,4860910:doWork3,[(100,48)(100,76)])
}
Add(ComboBox,11542454,98,28)
{
Top=5
Width=155
Height=21
Strings=#5:Легко|6:Средне|6:Тяжело|
Text="Выберите сложность"
ReadOnly=0
Point(Index)
}
Add(Button,3547566,154,35)
{
Left=30
Top=35
Width=90
Height=25
Caption="ОК"
link(onClick,1617970:doEvent1,[])
}
Add(Informer,1596562,224,35)
{
link(onContinue,6041944:onClick,[(271,41)(271,27)])
link(onInfo,14546600:doCalc,[(268,48)(268,79)(100,79)(100,104)])
}
Add(FastMathParse,14546600,112,98)
{
DataCount=1
MathStr="%1 + 1"
link(onResult,4710604:doValue,[])
link(X1,11542454:Index,[])
}
Add(Memory,4710604,161,98)
{
}
Add(SysMenu,14356493,56,77)
{
link(Handle,12437594:Handle,[])
}
Add(Hub,15716992,28,56)
{
link(onEvent1,12437594:doShowModal,[])
link(onEvent2,4860910:doWork1,[(46,69)])
}
Add(Hub,1617970,196,35)
{
link(onEvent1,1596562:doInfo,[])
link(onEvent2,12437594:doClose,[(222,48)(222,52)(44,52)(44,55)])
}
Add(HubEx,4860910,42,63)
{
Angle=1
link(onEvent,14356493:doHideCloseButton,[(46,83)])
}
END_SDK
Add(HubEx,178980,378,252)
{
link(onEvent,8073668:Данные,[])
}
Add(FastMathParse,203680,217,322)
{
DataCount=1
MathStr="%1 * 15000"
link(onResult,7765227:doInterval,[])
link(X1,9935462:Difficulty,[(223,307)(62,307)])
}