HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуПрограммка для развития зрительной памяти школьников ← Ctrl1Ctrl →
Этот топик читают: Гость
Этот топик был перемещен из раздела "Помощь по среде"
Ответов: 7
Рейтинг: 0
#1: 2017-09-09 12:53:34 ЛС | профиль | цитата
Подскажите как правильно реализовать следующую задумку .

Берем готовый текст и помещаем его в программу еще лучше если реализовать импорт.
Ученик запускает программу и выбирает задание.
Текст появляется на экране (но не весь, а только 1 слово ), на 5-6 секунд,

далее текст закрывается

после того как ученик записал слово он нажимает пробел либо далее и появляется следующее слово, 5-6 секунд, закрытие текста.

Я попробовал реализовать данные функции, но так как мои познания в hiasm очень малы то получилось только заливка текста по словам в тело программы.
Из за этого весь код очень громоздкий и не функциональный .
Add(ChildForm,14227638,238,147)
{
FirstUsage=0
}
BEGIN_SDK
Add(EditMulti,14714894,-28,7)
{
WorkCount=5
Width=1458
Height=931
link(doWork1,16514974:doEvent1,[(73,13)(73,167)])
link(doWork2,13035164:doEvent5,[(53,20)(53,321)])
}
Add(ButtonRush,315406,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Hub,16514974,77,161)
{
link(onEvent1,12166997:doVisible,[(137,167)(137,237)])
}
Add(Menu,10560340,203,455)
{
Menu=#17:Сборник диктантов|1|14:Верный товарищ|1:-|7:Закрыть|1|18:Проверочные работы|1|8:Работа 1|8:Работа 2|8:Работа 3|8:Работа 4|1:-|7:Закрыть|1|10:Достижения|8:Все темы|0
Point(onSelectNum)
link(onSelectNum,14316372:doEvent,[(317,468)(317,482)])
}
Add(IndexToChanel,14316372,364,476)
{
Count=15
Data=String()
link(onEvent2,14690962:doEvent2,[(554,489)(554,264)])
link(onEvent6,13035164:doEvent2,[(429,517)(429,412)(72,412)(72,300)])
link(onEvent13,13035164:doEvent4,[(436,566)(436,398)(72,398)(72,314)])
}
Add(Hub,13035164,84,287)
{
InCount=5
link(onEvent1,12174492:doEvent2,[(138,293)(138,278)])
}
Add(MainForm,12166997,203,203)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
}
Add(Button,15285400,74,228)
{
Left=650
Top=150
Width=240
Caption="Выход"
link(onClick,12174492:doEvent1,[(142,234)(142,271)])
}
Add(Button,4771608,243,103)
{
Left=895
Top=150
Width=240
Caption="Запуск"
link(onClick,14690962:doEvent1,[(493,109)(493,257)])
}
Add(Hub,12174492,179,265)
{
InCount=2
link(onEvent1,12166997:doClose,[(198,271)(198,230)])
}
Add(Timer,13901128,1008,259)
{
link(onTimer,6554921:doText,[(1052,265)(1052,260)])
}
Add(Time,3271172,1057,182)
{
Format="D/M/Y h:m:s"
}
Add(ChildForm,301666,777,273)
{
link(onEvent1,9102418:doEvent3,[(824,279)(824,415)])
}
BEGIN_SDK
Add(EditMulti,1104149,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,15400347:doVisible,[(77,13)(77,250)])
link(doWork2,15400347:doClose,[(77,20)(77,243)])
}
Add(ButtonRush,14124193,301,147)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,8566581,299,243)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,7000421:doWork1,[(523,249)(523,398)])
}
Add(MainForm,15400347,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,15289219:doEvent1,[(224,222)(224,187)])
}
Add(Button,13692572,408,147)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Button,16329028,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="Вася"
Point(doSendToBack)
}
Add(Hub,15289219,235,181)
{
InCount=2
OutCount=4
link(onEvent4,8899402:doTimer,[(268,208)(268,202)])
}
Add(Timer,8899402,287,196)
{
Interval=5000
Enable=1
link(onTimer,13692572:doVisible,[(363,202)(363,160)])
}
Add(Timer,12651062,784,203)
{
link(onTimer,3688171:doText,[(828,209)(828,204)])
}
Add(Time,14004574,833,126)
{
Format="D/M/Y h:m:s"
}
Add(Label,3688171,840,198)
{
Left=1065
Top=490
Width=158
Height=24
Color=15847343
Font=[MS Sans Serif,12,0,8388608,1]
WinStyle=4
ColorSp=16644846
Caption="Время в системе"
ColorHover=8421376
link(Text,14004574:FormatTime,[(846,170)(839,170)])
}
Add(ChildForm,7000421,714,392)
{
link(onEvent1,1104149nEvent1,[(1088,398)(1088,13)])
}
BEGIN_SDK
Add(EditMulti,1989782,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,16628576:doVisible,[(77,13)(77,250)])
}
Add(MainForm,16628576,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,15503314:doEvent1,[(246,222)(246,320)])
}
Add(ButtonRush,13208655,273,91)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,13926999,334,313)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,7183394:doWork1,[(564,319)(564,412)])
}
Add(ChildForm,7183394,763,406)
{
link(onEvent1,1989782nEvent1,[(1113,412)(1113,13)])
}
BEGIN_SDK
Add(EditMulti,10004344,-28,7)
{
EventCount=2
WorkCount=5
Width=1458
Height=931
link(doWork1,2110347:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,13266292,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,10908759,306,264)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,5902175:doWork1,[(452,270)(452,384)])
}
Add(MainForm,2110347,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,585426:doTimer,[(233,222)(233,216)])
}
Add(ChildForm,5902175,567,378)
{
link(onEvent1,10004344nEvent1,[(1015,384)(1015,13)])
}
BEGIN_SDK
Add(EditMulti,6258490,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,13397551:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,16032698,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,8220961,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="во дворе ."
Point(doSendToBack)
}
Add(Button,3307160,306,264)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,14000500:doWork1,[(470,270)(470,342)])
}
Add(MainForm,13397551,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,3015785:doTimer,[(226,222)(226,160)])
}
Add(ChildForm,14000500,602,336)
{
link(onEvent1,6258490nEvent1,[(1032,342)(1032,13)])
}
BEGIN_SDK
Add(EditMulti,1331110,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,15881500:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,1737914,427,63)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,16474239,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="Решили"
Point(doSendToBack)
}
Add(Button,12867406,299,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,13579511:doWork1,[(491,263)(491,321)])
}
Add(MainForm,15881500,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,4778660:doTimer,[(268,222)(268,216)])
}
Add(ChildForm,13579511,651,315)
{
link(onEvent1,1331110nEvent1,[(1057,321)(1057,13)])
}
BEGIN_SDK
Add(EditMulti,1773132,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,15082802:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,7827670,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,3111790,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="они"
Point(doSendToBack)
}
Add(Button,14931417,306,264)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,5208646:doWork1,[(536,270)(536,363)])
}
Add(MainForm,15082802,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,15149250:doTimer,[(230,222)(230,223)])
}
Add(ChildForm,5208646,735,357)
{
link(onEvent1,1773132nEvent1,[(1099,363)(1099,13)])
}
BEGIN_SDK
Add(EditMulti,7494155,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,4177746:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,15729264,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,2770382,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="пойти"
Point(doSendToBack)
}
Add(Button,14878105,306,264)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,4281794:doWork1,[(452,270)(452,384)])
}
Add(MainForm,4177746,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,16475251:doTimer,[(236,222)(236,209)])
}
Add(ChildForm,4281794,567,378)
{
link(onEvent1,7494155nEvent1,[(1015,384)(1015,13)])
}
BEGIN_SDK
Add(EditMulti,8140227,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,8267866:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,15321063,245,42)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,5310335,411,194)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="погулять ."
Point(doSendToBack)
}
Add(Button,13356526,306,264)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,10706891:doWork1,[(470,270)(470,342)])
}
Add(MainForm,8267866,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,14401788:doTimer,[(264,222)(264,216)])
}
Add(ChildForm,10706891,602,336)
{
link(onEvent1,8140227nEvent1,[(1032,342)(1032,13)])
}
BEGIN_SDK
Add(EditMulti,2721875,-27,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,3868971:doVisible,[(78,13)(78,250)])
}
Add(ButtonRush,2409370,302,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,10308705,370,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="Друзья"
Point(doSendToBack)
}
Add(Button,10316343,370,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,5311966:doWork1,[(482,263)(482,300)])
}
Add(MainForm,3868971,183,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,4309714:doTimer,[(233,222)(233,223)])
}
Add(Button,9004225,373,168)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Timer,4309714,252,217)
{
Interval=10000
Enable=1
link(onTimer,9004225:doVisible,[(328,223)(328,181)])
}
Add(ChildForm,5311966,561,294)
{
link(onEvent1,2721875nEvent1,[(1012,300)(1012,13)])
}
BEGIN_SDK
Add(EditMulti,15492180,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,3382402:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,14281174,301,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,15609509,369,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="взяли"
Point(doSendToBack)
}
Add(Button,15590660,369,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,15444792:doWork1,[(610,263)(610,377)])
}
Add(MainForm,3382402,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,15835520:doTimer,[(232,222)(232,223)])
}
Add(Button,8685612,372,168)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Timer,15835520,251,217)
{
Interval=10000
Enable=1
link(onTimer,8685612:doVisible,[(327,223)(327,181)])
}
Add(ChildForm,15444792,819,371)
{
link(onEvent1,15492180nEvent1,[(1141,377)(1141,13)])
}
BEGIN_SDK
Add(EditMulti,4262312,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,2107867:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,5477620,301,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,2660498,369,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="санки"
Point(doSendToBack)
}
Add(Button,9024094,369,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,11203731:doWork1,[(529,263)(529,314)])
}
Add(MainForm,2107867,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,13115629:doTimer,[(232,222)(232,223)])
}
Add(Button,12672995,372,168)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Timer,13115629,251,217)
{
Interval=10000
Enable=1
link(onTimer,12672995:doVisible,[(327,223)(327,181)])
}
Add(ChildForm,11203731,658,308)
{
link(onEvent1,4262312nEvent1,[(1060,314)(1060,13)])
}
BEGIN_SDK
Add(EditMulti,6308068,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,2996563:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,11910613,301,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,6335632,369,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="и зашагали"
Point(doSendToBack)
}
Add(Button,13556811,369,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,5200219:doWork1,[(467,263)(467,265)])
}
Add(MainForm,2996563,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,4773834:doTimer,[(232,222)(232,223)])
}
Add(Button,2835057,372,168)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Timer,4773834,251,217)
{
Interval=10000
Enable=1
link(onTimer,2835057:doVisible,[(327,223)(327,181)])
}
Add(ChildForm,5200219,532,259)
{
link(onEvent1,6308068nEvent1,[(997,265)(997,13)])
}
BEGIN_SDK
Add(EditMulti,11207806,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,1597608:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,13035215,301,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,5704778,369,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="по тропе ."
Point(doSendToBack)
}
Add(Button,3733796,369,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,1384979:doWork1,[(470,263)(470,307)])
}
Add(MainForm,1597608,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,12931530:doTimer,[(232,222)(232,223)])
}
Add(Button,10574482,372,168)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Visible=1
Caption="Пишите"
Point(doBringToFront)
Point(doVisible)
}
Add(Timer,12931530,251,217)
{
Interval=10000
Enable=1
link(onTimer,10574482:doVisible,[(327,223)(327,181)])
}
Add(ChildForm,1384979,539,301)
{
link(onEvent1,11207806nEvent1,[(1001,307)(1001,13)])
}
BEGIN_SDK
Add(EditMulti,7126450,-28,7)
{
EventCount=1
WorkCount=5
Width=1458
Height=931
link(doWork1,12050974:doVisible,[(77,13)(77,250)])
}
Add(ButtonRush,2018315,301,140)
{
Left=565
Top=120
Width=665
Height=445
Caption=""
Glyphs=[]
}
Add(Button,5491343,369,208)
{
Left=715
Top=190
Width=355
Height=95
Font=[MS Sans Serif,18,0,0,1]
Caption="Вот"
Point(doSendToBack)
}
Add(Button,6251766,369,257)
{
Left=790
Top=565
Width=240
Height=25
Caption="Далее"
link(onClick,6063023:doWork1,[(439,263)(439,335)])
}
Add(MainForm,12050974,182,216)
{
Width=1491
Height=919
Visible=1
Caption="Александров"
BorderStyle=8
WindowsState=2
Position=2
Point(doVisible)
link(onActivate,4952964:doTimer,[(232,222)(232,223)])

карма: 1

0
vip
#1.1контекстная реклама от партнеров
Ответов: 8888
Рейтинг: 823
#2: 2017-09-09 16:18:56 ЛС | профиль | цитата
Avto33mag, пример:
Пример


Add(MainForm,2953706,98,161)
{
 Height=185
 Caption="Слова"
 Point(onKeyDown)
 link(onCreate,5860435:doEvent1,[(424,181)(424,118)])
 link(onKeyDown,4919261:doCompare,[(137,188)(137,195)])
}
Add(Label,5709664,98,42)
{
 Left=10
 Top=5
 Width=95
 Caption="Количество слов"
}
Add(Edit,10801284,350,56)
{
 Left=110
 Top=5
 Text="25"
 DataType=2
 Point(doSetFocus)
}
Add(Hub,10792250,147,91)
{
 OutCount=5
 link(onEvent1,10801284:doSetFocus,[(242,97)(242,76)])
 link(onEvent2,4744727:doReset,[(250,104)(250,125)])
 link(onEvent3,6999578:doWork2,[])
 link(onEvent4,11742441:doTimer,[(243,118)(243,244)])
 link(onEvent5,15460914:doWork2,[])
}
Add(If_else,4919261,147,189)
{
 Op1=Integer(32)
 link(onTrue,2106500:doCompare,[])
}
Add(Label,10242726,532,35)
{
 Left=10
 Top=35
 Width=365
 Height=60
 Font=[MS Sans Serif,18,1,0,1]
 AutoSize=1
 Alignment=2
}
Add(Button,13906515,98,91)
{
 Left=240
 Top=5
 Caption=">>"
 Data=Integer(1)
 link(onClick,10792250:doEvent1,[])
}
Add(Counter,4744727,273,105)
{
 Max=99999
 link(onNext,6430149:doEvent1,[])
}
Add(If_else,5716478,343,105)
{
 Type=3
 link(onTrue,14963767:doEvent1,[])
 link(onFalse,9589167:doWork1,[(382,118)(382,230)(144,230)])
 link(Op2,10801284:Text,[])
}
Add(TimeCounter,6325282,350,238)
{
 link(onStop,1318497:doCompare,[(389,251)(389,244)])
}
Add(Random,9535915,532,105)
{
 Point(doMax)
 Point(Max)
 link(onRandom,14377754:doGetString,[(571,111)(571,90)(466,90)(466,76)])
 link(Max,7909327:Result,[(538,96)(524,96)(524,166)(489,166)])
}
Add(Math,7909327,483,126)
{
 OpType=1
 Op2=1
 ResultType=0
 link(onResult,9535915:doMax,[])
 link(Op1,14377754:Count,[])
}
Add(Timer,11742441,287,238)
{
 Interval=50
 Enable=1
 link(onTimer,6325282:doStop,[(333,244)(333,251)])
}
Add(If_else,1318497,399,238)
{
 Type=2
 Op2=Integer(5000)
 link(onTrue,12091316:doWork1,[(438,244)(438,195)])
}
Add(Hub,6430149,315,105)
{
 OutCount=3
 link(onEvent1,5716478:doCompare,[])
 link(onEvent2,6325282:doStart,[(340,118)(340,244)])
}
Add(HubEx,6999578,259,105)
{
 link(onEvent,4744727:doNext,[])
}
Add(StrList,14377754,476,28)
{
 FileName="Словарик86839.txt"
 Point(doGetString)
 Point(onGetString)
 link(onGetString,10242726:doText,[])
}
Add(Hub,5860435,434,112)
{
 OutCount=3
 link(onEvent1,14377754:doLoad,[(459,118)(459,62)])
 link(onEvent2,9535915:doRandomize,[(473,125)(473,118)])
 link(onEvent3,7909327:doOperation,[])
}
Add(Button,4831469,98,245)
{
 Left=315
 Top=5
 Caption="II"
 Data=Integer(0)
 link(onClick,9589167:doWork2,[])
}
Add(Hub,11595170,154,245)
{
 link(onEvent1,11742441:doStop,[])
 link(onEvent2,15460914:doWork3,[(186,258)])
}
Add(HubEx,9589167,140,245)
{
 link(onEvent,11595170:doEvent1,[])
}
Add(If_else,2106500,196,189)
{
 Op2=Integer(1)
 link(onTrue,12091316:doWork2,[])
 link(Op1,10333001:Value,[])
}
Add(Memory,10333001,196,119)
{
 Default=Integer(0)
}
Add(HubEx,12091316,259,189)
{
 Angle=3
 link(onEvent,6999578:doWork3,[])
}
Add(HubEx,15460914,182,119)
{
 link(onEvent,10333001:doValue,[])
}
Add(Hub,14963767,392,105)
{
 link(onEvent1,9535915:doRandom,[])
 link(onEvent2,10736555:doStrCat,[(417,118)(417,146)(452,146)(452,188)])
}
Add(Label,946191,532,182)
{
 Left=175
 Top=10
}
Add(StrCat,10736555,483,182)
{
 Str2="-е слово"
 link(onStrCat,946191:doText,[])
}

Словарик можно взять в http://forum.hiasm.com/getfile/38184 или сделать файл по потребности
карма: 19

0
Ответов: 7
Рейтинг: 0
#3: 2017-09-09 16:52:17 ЛС | профиль | цитата
Спасибо.
Буду пробовать .
карма: 1

0
Ответов: 7
Рейтинг: 0
#4: 2017-09-11 16:26:59 ЛС | профиль | цитата
Леонид подскажите с примером .
Текст как я понял перед выводом проходит через генератор числовых последовательностей.
А если надо просто текст выводить (но по словам) т.е., порядок слов важен, то генератор необходимо убирать ? Или его возможно настроить на строгую последовательность ?
карма: 1

0
Ответов: 497
Рейтинг: 16
#5: 2017-09-14 00:50:09 ЛС | профиль | цитата
Avto33mag писал(а):
Текст как я понял перед выводом проходит через генератор числовых последовательностей.

info писал(а):
Генератор псевдослучайной числовой последовательности

а что по вашему делает "Генератор псевдослучайной числовой последовательности" с текстом?????
так??


Add(MainForm,1279788,280,217)
{
 Height=185
 Caption="Слова"
 Point(onKeyDown)
 link(onCreate,5860435:doEvent1,[(606,237)(606,174)])
 link(onKeyDown,4919261:doCompare,[(319,244)(319,251)])
}
Add(Label,5709664,280,98)
{
 Left=10
 Top=5
 Width=95
 Caption="Количество слов"
}
Add(Edit,10801284,532,112)
{
 Left=110
 Top=5
 Text="25"
 DataType=2
 Point(doSetFocus)
}
Add(Hub,10792250,329,147)
{
 OutCount=5
 link(onEvent1,10801284:doSetFocus,[(424,153)(424,132)])
 link(onEvent2,4744727:doReset,[(432,160)(432,181)])
 link(onEvent3,6999578:doWork2,[])
 link(onEvent4,11742441:doTimer,[(425,174)(425,300)])
 link(onEvent5,15460914:doWork2,[])
}
Add(If_else,4919261,329,245)
{
 Op1=Integer(32)
 link(onTrue,2106500:doCompare,[])
}
Add(Label,10242726,714,91)
{
 Left=10
 Top=35
 Width=365
 Height=60
 Font=[MS Sans Serif,18,1,0,1]
 AutoSize=1
 Alignment=2
}
Add(Button,13906515,280,147)
{
 Left=240
 Top=5
 Caption=">>"
 Data=Integer(1)
 link(onClick,10792250:doEvent1,[])
}
Add(Counter,4744727,455,161)
{
 Max=99999
 link(onNext,6430149:doEvent1,[])
}
Add(If_else,5716478,525,161)
{
 Type=3
 link(onTrue,14963767:doEvent1,[])
 link(onFalse,9589167:doWork1,[(564,174)(564,286)(326,286)])
 link(Op2,10801284:Text,[])
}
Add(TimeCounter,6325282,532,294)
{
 link(onStop,1318497:doCompare,[(571,307)(571,300)])
}
Add(Math,7909327,665,182)
{
 OpType=1
 Op2=1
 ResultType=0
 link(onResult,16481972:doMax,[(716,188)(716,174)])
 link(Op1,14377754:Count,[])
}
Add(Timer,11742441,469,294)
{
 Interval=50
 Enable=1
 link(onTimer,6325282:doStop,[(515,300)(515,307)])
}
Add(If_else,1318497,581,294)
{
 Type=2
 Op2=Integer(5000)
 link(onTrue,12091316:doWork1,[(620,300)(620,251)])
}
Add(Hub,6430149,497,161)
{
 OutCount=3
 link(onEvent1,5716478:doCompare,[])
 link(onEvent2,6325282:doStart,[(522,174)(522,300)])
}
Add(HubEx,6999578,441,161)
{
 link(onEvent,4744727:doNext,[])
}
Add(StrList,14377754,658,84)
{
 FileName="Словарик86839.txt"
 Point(doGetString)
 Point(onGetString)
 link(onGetString,10242726:doText,[])
}
Add(Hub,5860435,616,168)
{
 OutCount=3
 link(onEvent1,14377754:doLoad,[(641,174)(641,118)])
 link(onEvent3,7909327:doOperation,[])
}
Add(Button,4831469,280,301)
{
 Left=315
 Top=5
 Caption="II"
 Data=Integer(0)
 link(onClick,9589167:doWork2,[])
}
Add(Hub,11595170,336,301)
{
 link(onEvent1,11742441:doStop,[])
 link(onEvent2,15460914:doWork3,[(368,314)])
}
Add(HubEx,9589167,322,301)
{
 link(onEvent,11595170:doEvent1,[])
}
Add(If_else,2106500,378,245)
{
 Op2=Integer(1)
 link(onTrue,12091316:doWork2,[])
 link(Op1,10333001:Value,[])
}
Add(Memory,10333001,378,175)
{
 Default=Integer(0)
}
Add(HubEx,12091316,441,245)
{
 Angle=3
 link(onEvent,6999578:doWork3,[])
}
Add(HubEx,15460914,364,175)
{
 link(onEvent,10333001:doValue,[])
}
Add(Hub,14963767,574,161)
{
 link(onEvent1,16481972:doNext,[])
 link(onEvent2,10736555:doStrCat,[(599,174)(599,202)(634,202)(634,244)])
}
Add(Label,946191,714,238)
{
 Left=175
 Top=10
}
Add(StrCat,10736555,665,238)
{
 Str2="-е слово"
 link(onStrCat,946191:doText,[])
}
Add(CounterEx,16481972,735,161)
{
 Default=-1
 Point(doMax)
 link(onNext,14377754:doGetString,[(779,167)(779,149)(646,149)(646,132)])
}
карма: 1
        ]  
0
Ответов: 8888
Рейтинг: 823
#6: 2017-09-14 08:48:18 ЛС | профиль | цитата
Avto33mag, заменить "случайный" выбор на счётчик, как показал коллегаRAWY_EX и он будет перебирать слова по порядку сверху вниз
карма: 19

0
Ответов: 75
Рейтинг: 2
#7: 2017-09-19 11:13:34 ЛС | профиль | цитата
Идея мне понравилась. Смастерил маленькую программку для электронных диктантов.
Протестирована моей второклассницей с положительной оценкой). Выкладываю, может, кому пригодится.
карма: 2

0
Ответов: 16884
Рейтинг: 1239
#8: 2017-09-19 14:47:13 ЛС | профиль | цитата
Tri-j писал(а):
За ночь мороз сковал на речке лед.

Когда-то так не говорили.
Говорили: За ночь мороз сковал речку льдом.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 75
Рейтинг: 2
#9: 2017-09-19 16:10:08 ЛС | профиль | цитата
Tad, ага, пропустил) Там ещё похлеще было. В 978 диктанте Наде нравилось сЕдеть на берегу))) Ну интернет ведь, что с него возьмёшь

--- Добавлено в 2017-09-19 16:14:03

http://dicktanty.ru/category/2-klass/

Редактировалось 1 раз(а), последний 2017-09-19 16:14:03
карма: 2

0
Ответов: 16884
Рейтинг: 1239
#10: 2017-09-19 17:09:17 ЛС | профиль | цитата
Tri-j, я знаю, что тексты взяты из интернета. Какие идиоты их сочиняют - загадка.
А вот обновлять интервал в Timer за каждым предложением - это твоё родное.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 75
Рейтинг: 2
#11: 2017-09-19 19:40:47 ЛС | профиль | цитата
Tad, причём, вручную выставить интервал можно только при перезапуске программы
Это моё, родное
карма: 2

0
Ответов: 16884
Рейтинг: 1239
#12: 2017-09-19 21:32:44 ЛС | профиль | цитата
Tri-j, алгоритм твой. Просто удалил лишнее.
Tri_j_1.png

Редактировалось 1 раз(а), последний 2017-09-19 21:35:04
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 75
Рейтинг: 2
#13: 2017-09-20 11:50:47 ЛС | профиль | цитата
Tad, нет предела совершенству
Спасибо!
А с учётом того, что Nesco модифицировал Button - ещё пару элементов долой)

Редактировалось 1 раз(а), последний 2017-09-20 12:13:52
карма: 2

0
13
ФорумыПомощь по пакетуПрограммка для развития зрительной памяти школьников ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2020
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика