HiAsm
HiAsm
Вверх ↑
ФорумыМежду деломВывод нескольких строк из списка по очереди ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 11
Рейтинг: 6
#1: 2009-04-09 01:30:57 ЛС | профиль | цитата
Здравствуйте. Помогите, пожалуйста, создать программу. Получил задание к дипломоному проекту "Создать электронный тест". Оценив различные варианты решил, что наиболее качественный тест можно будет создать с помощью Hiasm. Но опыта работы с подобного вида программами нет никакого. Почитав справки и форум, посмотрев видео уроки, начал пошагово двигаться к достижению поставленной цели...
Задача: Есть большой список строк. Он перемешивается и из него нужно извлечь первые несколько строк. И желательно сделать так, чтобы строки выводились в поле текста поочередно, по нажатию кнопки (Т.е. нажал на кнопку, появилась первая строка. Снова нажал на конпку, вместо первой строки появилась вторая строка)
Воспользовавшись некоторыми примерами, уже обсужденными на данном форуме и добавив свои наработки получил такой результат. Для примера вставил 30 строк. Требуется получить, например, 10 первых после перемешивания. Подскажите, что нужно добавить и изменить?
code_12657.txt
карма: 0

0
файлы: 1code_12657.txt [3.1KB] [165]
Ответов: 4641
Рейтинг: 334
#2: 2009-04-09 02:36:29 ЛС | профиль | цитата
так?
code_12659.txt
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_12659.txt [3.5KB] [180]
Ответов: 11
Рейтинг: 6
#3: 2009-04-09 02:42:42 ЛС | профиль | цитата
Почти то, что мне хотелось получить. Ну главное принцип я понял. Большое спасибо.
карма: 0

0
Ответов: 215
Рейтинг: 45
#4: 2009-04-09 02:52:03 ЛС | профиль | цитата
Имхо нет особого смысла в перемешивании, можно просто брать строку случайным образом, взятую строку удалять из списка строк, и переустанавливать генератор случайной выборки по количеству оставшихся строк. 

Add(MainForm,8821364,14,105)
{
 Left=20
 Top=105
 Width=333
 Height=323
}
Add(ListBox,408698,455,119)
{
 Left=160
 Top=10
 Width=145
 Height=265
}
Add(StrList,8574407,350,56)
{
 Strings=#10:Туз червей|13:Король червей|11:Дама червей|12:Валет червей|9:10 червей|8:9 червей|8:8 червей|8:7 червей|8:6 червей|9:Туз бубен|12:Король бубен|10:Дама бубен|11:Валет бубен|8:10 бубен|7:9 бубен|7:8 бубен|7:7 бубен|7:6 бубен|11:Туз крестей|14:Король крестей|12:Дама крестей|13:Валет крестей|10:10 крестей|9:9 крестей|9:8 крестей|9:7 крестей|9:6 крестей|7:Туз пик|10:Король пик|8:Дама пик|9:Валет пик|6:10 пик|5:9 пик|5:8 пик|5:7 пик|5:6 пик|
}
Add(Button,6876505,91,126)
{
 Left=10
 Top=10
 Width=130
 Caption="Получить новую строку"
 link(onClick,15143440:doEvent1,[])
}
Add(Random,33728,259,119)
{
 Point(doMax)
 Point(doMin)
 link(onRandom,12780119:doEvent1,[])
}
Add(ArrayRW,4607367,364,119)
{
 link(onRead,408698:doAdd,[])
 link(Array,8574407:Array,[])
}
Add(Hub,15143440,140,126)
{
 OutCount=4
 link(onEvent1,33728:doRandomize,[])
 link(onEvent2,1166922:doWork,[(178,139)(178,188)])
 link(onEvent3,4991060:doOperation,[(186,146)(186,139)])
 link(onEvent4,33728:doRandom,[(203,153)(203,125)])
}
Add(Hub,12780119,301,119)
{
 link(onEvent1,4607367:doRead,[])
 link(onEvent2,8574407:doDelete,[(333,132)(333,76)])
}
Add(Check,1166922,203,182)
{
 Check=1
 Caption="затирать предыдущую карту"
 link(onEvent,408698:doClear,[(415,188)(415,132)])
}
Add(Math,4991060,217,133)
{
 OpType=1
 Op2=1
 link(onResult,33728:doMax,[])
 link(Op1,8574407:Count,[(223,117)(363,117)])
}
-----
поправки - добавил Randomize, вычел единицу, список строк заменил на список карт
карма: 0

1
Голосовали:LorD
Ответов: 11
Рейтинг: 6
#5: 2009-04-09 03:02:57 ЛС | профиль | цитата
А в этом случае не надо из значения, передаваемого DoData вычитать еденицу?
карма: 0

0
Ответов: 1088
Рейтинг: 112
#6: 2009-04-09 06:44:58 ЛС | профиль | цитата
lev писал(а):
lev
Советник

Ответов: 29
Рейтинг: - 27 +


Что я пропустил?
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26305
Рейтинг: 2146
#7: 2009-04-09 08:54:46 ЛС | профиль | цитата
Sniper36 писал(а):
Что я пропустил?

Ничего не пропустил, так оно и есть. Это Dilma его назначил, тк чел сделал и поддерживает пакет vbs, хотя, и немногословен
карма: 22

0
Ответов: 8959
Рейтинг: 824
#8: 2009-04-09 09:53:09 ЛС | профиль | цитата
LorD, года два как я делал "Викторину" - много вопросов, на каждый по 4 ответа, выбрать правильный; если хотите снова выложу для примера.
nesco, не подскажите, как пользоваться "поиском": ввожу "викторина", зарегестрированный "Леонид" - найдено 0, а ведь выкладывал, и тема такая была!
карма: 19

0
Разработчик
Ответов: 26305
Рейтинг: 2146
#9: 2009-04-09 10:12:00 ЛС | профиль | цитата
Леонид писал(а):
не подскажите, как пользоваться "поиском": ввожу "викторина"

Вот и вводи просто "викторина", и ничего больше, у меня нашло несколько постов
карма: 22

0
Ответов: 1088
Рейтинг: 112
#10: 2009-04-09 10:12:54 ЛС | профиль | цитата
Леонид,
http://hiasm.1gb.ru/forum.html?q=3&p=73727
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 8959
Рейтинг: 824
#11: 2009-04-09 14:23:34 ЛС | профиль | цитата
LorD, по ссылке от Sniper36
Sniper36, спасибо
карма: 19

1
Голосовали:LorD
Ответов: 11
Рейтинг: 6
#12: 2009-04-10 01:04:19 ЛС | профиль | цитата
Благодарю
------------ Дoбавленo в 01.04:
Подскажите, как сравнить две текстовые строки? Приведу пример, как я пытался это сделать... Но у меня не получилось 

Add(Memory,11944153,280,254)
{
 Default=Integer(0)
 Point(Data)
 link(onData,6606677:doGetString,[(324,260)(324,351)(205,351)(205,442)])
 link(Data,4409563:Index,[(286,242)(221,242)(221,301)(190,301)])
}
Add(Memo,4992423,266,107)
{
 Left=210
 Top=10
 Width=85
 Height=320
 Name="Текущий вопрос"
 Strings=#9:Строка 10|
 ScrollBars=2
 ReadOnly=0
}
Add(StrList,5099084,175,191)
{
 FileName="Вопросы"
 Strings=#8:Строка 1|8:Строка 2|8:Строка 3|8:Строка 4|8:Строка 5|8:Строка 6|8:Строка 7|8:Строка 8|8:Строка 9|9:Строка 10|9:Строка 11|9:Строка 12|9:Строка 13|9:Строка 14|9:Строка 15|9:Строка 16|9:Строка 17|9:Строка 18|9:Строка 19|9:Строка 20|9:Строка 21|9:Строка 22|9:Строка 23|9:Строка 24|9:Строка 25|9:Строка 26|9:Строка 27|9:Строка 28|9:Строка 29|9:Строка 30|
}
Add(ArrayEnum,4409563,177,254)
{
 link(onItem,15426082:doCompare,[])
 link(Array,5099084:Array,[(183,245)(195,245)])
}
Add(If_else,15426082,233,254)
{
 link(onTrue,11944153:doValue,[])
 link(Op2,4992423:Text,[(246,227)(272,227)])
}
Add(Button,6966209,70,252)
{
 Left=80
 Top=65
 link(onClick,4409563:doEnum,[(164,258)(164,260)])
}
Add(StrList,6606677,217,394)
{
 Strings=#7:Ответ 1|7:Ответ 2|7:Ответ 3|7:Ответ 4|7:Ответ 5|7:Ответ 6|7:Ответ 7|7:Ответ 8|7:Ответ 9|8:Ответ 10|8:Ответ 11|8:Ответ 12|8:Ответ 13|8:Ответ 14|8:Ответ 15|8:Ответ 16|8:Ответ 17|8:Ответ 18|8:Ответ 19|8:Ответ 20|8:Ответ 21|8:Ответ 22|8:Ответ 23|8:Ответ 24|8:Ответ 25|8:Ответ 26|8:Ответ 27|8:Ответ 28|8:Ответ 29|8:Ответ 30|
 Point(doGetString)
 Point(onGetString)
 link(onGetString,2670567:doCompare,[(268,407)(268,447)])
}
Add(ComboBox,5226751,358,359)
{
 Left=5
 Top=95
 Width=195
 Height=21
 Name="имя"
 HintTitle="заголовок"
 Hint="всплывающая"
 HintManager="подсказка"
 Strings=#8:Строка 9|9:Строка 10|9:Строка 11|
 AddType=1
 Text=""
 DataType=1
 ReadOnly=0
}
Add(If_else,2670567,287,441)
{
 link(onTrue,2819679:doMessage,[])
 link(onFalse,1243803:doMessage,[(335,454)(335,489)])
 link(Op2,5226751:String,[(300,423)(371,423)])
}
Add(Message,2819679,350,441)
{
 Message="Верно"
}
Add(Message,1243803,350,483)
{
 Message="Не верно"
}
карма: 0

0
Разработчик
Ответов: 26305
Рейтинг: 2146
#13: 2009-04-10 01:35:17 ЛС | профиль | цитата
LorD, ты во втором StrListe имеешь Ответы, а в Combo -- Строки. Откуда и следует, что Ответ XX <> Строка XX
карма: 22

1
Голосовали:LorD
Ответов: 11
Рейтинг: 6
#14: 2009-04-10 03:10:55 ЛС | профиль | цитата
Точно... Уже таких глупостей не вижу...
------------ Дoбавленo в 03.10:
Вот вроде что-то получилось. Сам понимаю, что не рационально и не правильно. Но сильно не ругайтесь, ведь у меня совершенно нет никакого опыта создания приложений ... Подскажите, что мне нужно изменить, желательно не меняя принципа работы. (На большое количество лишних точек не обращайте внимания... Потом надо будет много вопросов забивать) 

Add(MainForm,2953706,58,105)
{
 Width=711
 Height=369
 Caption="Тест"
 BorderStyle=3
 Position=1
 link(onCreate,3464032:doWork1,[(92,125)(92,314)])
}
Add(StrList,8574407,716,245)
{
 FileName="Вопросы"
 Strings=#8:Строка 1|8:Строка 2|8:Строка 3|8:Строка 4|8:Строка 5|8:Строка 6|8:Строка 7|8:Строка 8|8:Строка 9|9:Строка 10|9:Строка 11|9:Строка 12|9:Строка 13|9:Строка 14|9:Строка 15|9:Строка 16|9:Строка 17|9:Строка 18|9:Строка 19|9:Строка 20|9:Строка 21|9:Строка 22|9:Строка 23|9:Строка 24|9:Строка 25|9:Строка 26|9:Строка 27|9:Строка 28|9:Строка 29|9:Строка 30|
}
Add(Button,6876505,51,315)
{
 Left=10
 Top=55
 Width=190
 Height=30
 Font=[MS Sans Serif,12,0,0,1]
 Caption="Ответить"
 link(onClick,1133124:doEvent1,[])
}
Add(Random,33728,548,322)
{
 Point(doMax)
 Point(doMin)
 link(onRandom,12780119:doEvent1,[])
}
Add(ArrayRW,4607367,730,322)
{
 link(onRead,4992423:doAdd,[])
 link(Array,8574407:Array,[])
}
Add(Hub,15143440,352,308)
{
 OutCount=7
 link(onEvent1,3472557:doEvent2,[(404,314)(404,244)])
 link(onEvent2,1166922:doWork,[(401,321)(401,391)])
 link(onEvent3,11521647:doData,[(408,328)(408,356)])
 link(onEvent4,33728:doRandomize,[])
 link(onEvent5,33728:doRandom,[(459,342)(459,328)])
 link(onEvent6,5226751:doClear,[(419,544)])
 link(onEvent7,4409563:doEnum,[(383,475)])
}
Add(Hub,12780119,688,322)
{
 link(onEvent1,4607367:doRead,[])
 link(onEvent2,8574407:doDelete,[(706,335)(706,265)])
}
Add(DoData,11521647,422,350)
{
 link(onEventData,784763:doOperation,[])
 link(Data,8574407:Count,[(428,302)(729,302)])
}
Add(Check,1166922,506,385)
{
 Caption="затирать предыдущую строку"
 link(onEvent,4992423:doClear,[(775,391)(775,335)])
}
Add(Memo,4992423,814,322)
{
 Left=210
 Top=10
 Width=490
 Height=320
 Name="Текущий вопрос"
 ScrollBars=2
 ReadOnly=0
}
Add(Label,14360644,233,252)
{
 Left=10
 Top=15
 Width=86
 Height=17
 Font=[MS Sans Serif,9,0,0,1]
 Caption="Номер вопроса:"
}
Add(Label,11985004,450,231)
{
 Left=105
 Top=15
 Width=94
 Height=19
 Font=[MS Sans Serif,9,0,0,1]
 Caption=""
 AutoSize=1
}
Add(Counter,2037272,177,308)
{
 link(onNext,2161387:doCompare,[])
}
Add(If_else,2161387,226,308)
{
 Type=3
 Op2=Integer(10)
 link(onTrue,15143440:doEvent1,[])
 link(onFalse,13604574:doEvent1,[])
}
Add(Message,13454464,303,322)
{
 Caption="Тест окончен"
 link(Message,4555804:FString,[(309,310)(518,310)(518,667)(720,667)])
}
Add(Hub,13604574,268,315)
{
 link(onEvent1,16274224:doClear,[(292,321)(292,244)])
 link(onEvent2,13454464:doMessage,[])
}
Add(Memory,16274224,303,231)
{
 Default=String(Тест окончен)
 link(onData,3472557:doEvent1,[])
}
Add(Hub,3472557,415,231)
{
 InCount=2
 OutCount=1
 link(onEvent1,11985004:doText,[])
}
Add(StrList,5099084,723,406)
{
 FileName="Вопросы"
 Strings=#8:Строка 1|8:Строка 2|8:Строка 3|8:Строка 4|8:Строка 5|8:Строка 6|8:Строка 7|8:Строка 8|8:Строка 9|9:Строка 10|9:Строка 11|9:Строка 12|9:Строка 13|9:Строка 14|9:Строка 15|9:Строка 16|9:Строка 17|9:Строка 18|9:Строка 19|9:Строка 20|9:Строка 21|9:Строка 22|9:Строка 23|9:Строка 24|9:Строка 25|9:Строка 26|9:Строка 27|9:Строка 28|9:Строка 29|9:Строка 30|
}
Add(ArrayEnum,4409563,725,469)
{
 link(onItem,15426082:doCompare,[])
 link(Array,5099084:Array,[(731,460)(743,460)])
}
Add(If_else,15426082,781,469)
{
 link(onTrue,11944153:doValue,[])
 link(Op2,4992423:Text,[(794,442)(820,442)])
}
Add(Memory,11944153,828,469)
{
 Default=Integer(0)
 Point(Data)
 link(onData,14321152:doWork1,[])
 link(Data,4409563:Index,[(834,457)(769,457)(769,516)(738,516)])
}
Add(MultiElement,14321152,905,469)
{
 link(onEvent1,4855021:doEnum,[])
 link(onEvent2,6173167:doEnum,[])
 link(onEvent3,3841637:doEnum,[])
 link(onEvent4,14989742:doEnum,[])
 link(onEvent5,16564212:doEnum,[])
 link(onEvent6,12115318:doEnum,[])
 link(onEvent7,5951593:doEnum,[])
 link(onEvent8,5748692:doEnum,[])
 link(onEvent9,15615858:doEnum,[])
 link(onEvent10,5036179:doEnum,[])
 link(onEvent11,4984827:doEnum,[])
 link(onEvent12,15995072:doEnum,[])
 link(onEvent13,13726766:doEnum,[])
 link(onEvent14,6061733:doEnum,[])
 link(onEvent15,11553145:doEnum,[])
 link(onEvent16,5822928:doEnum,[])
 link(onEvent17,6708359:doEnum,[])
 link(onEvent18,589580:doEnum,[])
 link(onEvent19,793924:doEnum,[])
 link(onEvent20,6863973:doEnum,[])
 link(onEvent21,2525916:doEnum,[])
 link(onEvent22,11525416:doEnum,[])
 link(onEvent23,15228860:doEnum,[])
 link(onEvent24,9401824:doEnum,[])
 link(onEvent25,949647:doEnum,[])
 link(onEvent26,9990233:doEnum,[])
 link(onEvent27,12818753:doEnum,[])
 link(onEvent28,5724063:doEnum,[])
 link(onEvent29,3614462:doEnum,[])
 link(onEvent30,15819775:doEnum,[])
}
BEGIN_SDK
  Add(EditMulti,9232019,7,0)
  {
   EventCount=100
   WorkCount=1
   Width=1084
   Height=1215
   link(doWork1,2365478:doCompare,[(28,6)(28,62)])
  }
  Add(If_else,2365478,42,56)
  {
   Op2=Integer(0)
   link(onTrue,9232019:onEvent1,[(84,62)(84,6)])
   link(onFalse,13091947:doCompare,[(86,69)(86,83)(37,83)(37,97)])
  }
  Add(If_else,13091947,49,91)
  {
   Op2=Integer(1)
   link(onTrue,9232019:onEvent2,[(93,97)(93,13)])
   link(onFalse,2445736:doCompare,[(93,104)(93,118)(44,118)(44,132)])
  }
  Add(If_else,2445736,56,126)
  {
   Op2=Integer(2)
   link(onTrue,9232019:onEvent3,[(101,132)(101,20)])
   link(onFalse,4283040:doCompare,[(100,139)(100,153)(51,153)(51,167)])
  }
  Add(If_else,4283040,63,161)
  {
   Op2=Integer(3)
   link(onTrue,9232019:onEvent4,[(108,167)(108,27)])
   link(onFalse,13891915:doCompare,[(107,174)(107,188)(58,188)(58,202)])
  }
  Add(If_else,13891915,70,196)
  {
   Op2=Integer(4)
   link(onTrue,9232019:onEvent5,[(117,202)(117,34)])
   link(onFalse,2268103:doCompare,[(114,209)(114,223)(65,223)(65,237)])
  }
  Add(If_else,2268103,77,231)
  {
   Op2=Integer(5)
   link(onTrue,9232019:onEvent6,[(125,237)(125,41)])
   link(onFalse,12191206:doCompare,[(121,244)(121,258)(72,258)(72,272)])
  }
  Add(If_else,12191206,84,266)
  {
   Op2=Integer(6)
   link(onTrue,9232019:onEvent7,[(134,272)(134,48)])
   link(onFalse,6757637:doCompare,[(128,279)(128,293)(79,293)(79,307)])
  }
  Add(If_else,6757637,91,301)
  {
   Op2=Integer(7)
   link(onTrue,9232019:onEvent8,[(143,307)(143,55)])
   link(onFalse,13940532:doCompare,[(135,314)(135,328)(86,328)(86,342)])
  }
  Add(If_else,13940532,98,336)
  {
   Op2=Integer(8)
   link(onTrue,9232019:onEvent9,[(153,342)(153,62)])
   link(onFalse,12176132:doCompare,[(142,349)(142,363)(93,363)(93,377)])
  }
  Add(If_else,12176132,105,371)
  {
   Op2=Integer(9)
   link(onTrue,9232019:onEvent10,[(162,377)(162,69)])
   link(onFalse,13505157:doCompare,[(149,384)(149,398)(100,398)(100,412)])
  }
  Add(If_else,13505157,112,406)
  {
   Op2=Integer(10)
   link(onTrue,9232019:onEvent11,[(171,412)(171,76)])
   link(onFalse,10862161:doCompare,[(156,419)(156,433)(107,433)(107,447)])
  }
  Add(If_else,10862161,119,441)
  {
   Op2=Integer(11)
   link(onTrue,9232019:onEvent12,[(180,447)(180,83)])
   link(onFalse,7506077:doCompare,[(163,454)(163,468)(114,468)(114,482)])
  }
  Add(If_else,7506077,126,476)
  {
   Op2=Integer(12)
   link(onTrue,9232019:onEvent13,[(188,482)(188,90)])
   link(onFalse,6944957:doCompare,[(170,489)(170,503)(121,503)(121,517)])
  }
  Add(If_else,6944957,133,511)
  {
   Op2=Integer(13)
   link(onTrue,9232019:onEvent14,[(197,517)(197,97)])
   link(onFalse,7940242:doCompare,[(177,524)(177,538)(128,538)(128,552)])
  }
  Add(If_else,7940242,140,546)
  {
   Op2=Integer(14)
   link(onTrue,9232019:onEvent15,[(206,552)(206,104)])
   link(onFalse,1958846:doCompare,[(184,559)(184,573)(135,573)(135,587)])
  }
  Add(If_else,1958846,147,581)
  {
   Op2=Integer(15)
   link(onTrue,9232019:onEvent16,[(214,587)(214,111)])
   link(onFalse,6526896:doCompare,[(191,594)(191,608)(142,608)(142,622)])
  }
  Add(If_else,6526896,154,616)
  {
   Op2=Integer(16)
   link(onTrue,9232019:onEvent17,[(222,622)(222,118)])
   link(onFalse,14723022:doCompare,[(198,629)(198,643)(149,643)(149,657)])
  }
  Add(If_else,14723022,161,651)
  {
   Op2=Integer(17)
   link(onTrue,9232019:onEvent18,[(229,657)(229,125)])
   link(onFalse,7882327:doCompare,[(205,664)(205,678)(156,678)(156,692)])
  }
  Add(If_else,7882327,168,686)
  {
   Op2=Integer(18)
   link(onTrue,9232019:onEvent19,[(236,692)(236,132)])
   link(onFalse,16757962:doCompare,[(212,699)(212,713)(163,713)(163,727)])
  }
  Add(If_else,16757962,175,721)
  {
   Op2=Integer(19)
   link(onTrue,9232019:onEvent20,[(244,727)(244,139)])
   link(onFalse,13933019:doCompare,[(252,734)(252,150)])
  }
  Add(If_else,13933019,270,144)
  {
   Op2=Integer(20)
   link(onTrue,9232019:onEvent21,[(694,146)(694,146)])
   link(onFalse,15274835:doCompare,[(314,157)(314,171)(265,171)(265,185)])
  }
  Add(If_else,15274835,277,179)
  {
   Op2=Integer(21)
   link(onTrue,9232019:onEvent22,[(319,185)(319,153)])
   link(onFalse,1966946:doCompare,[(321,192)(321,206)(272,206)(272,220)])
  }
  Add(If_else,1966946,284,214)
  {
   Op2=Integer(22)
   link(onTrue,9232019:onEvent23,[(326,220)(326,160)])
   link(onFalse,7100208:doCompare,[(328,227)(328,241)(279,241)(279,255)])
  }
  Add(If_else,7100208,291,249)
  {
   Op2=Integer(23)
   link(onTrue,9232019:onEvent24,[(333,255)(333,167)])
   link(onFalse,12598217:doCompare,[(335,262)(335,276)(286,276)(286,290)])
  }
  Add(If_else,12598217,298,284)
  {
   Op2=Integer(24)
   link(onTrue,9232019:onEvent25,[(340,290)(340,174)])
   link(onFalse,13716137:doCompare,[(342,297)(342,311)(293,311)(293,325)])
  }
  Add(If_else,13716137,305,319)
  {
   Op2=Integer(25)
   link(onTrue,9232019:onEvent26,[(349,325)(349,181)])
   link(onFalse,12328062:doCompare,[(349,332)(349,346)(300,346)(300,360)])
  }
  Add(If_else,12328062,312,354)
  {
   Op2=Integer(26)
   link(onTrue,9232019:onEvent27,[(357,360)(357,188)])
   link(onFalse,11905772:doCompare,[(356,367)(356,381)(307,381)(307,395)])
  }
  Add(If_else,11905772,319,389)
  {
   Op2=Integer(27)
   link(onTrue,9232019:onEvent28,[(365,395)(365,195)])
   link(onFalse,1953126:doCompare,[(363,402)(363,416)(314,416)(314,430)])
  }
  Add(If_else,1953126,326,424)
  {
   Op2=Integer(28)
   link(onTrue,9232019:onEvent29,[(373,430)(373,202)])
   link(onFalse,232811:doCompare,[(370,437)(370,451)(321,451)(321,465)])
  }
  Add(If_else,232811,333,459)
  {
   Op2=Integer(29)
   link(onTrue,9232019:onEvent30,[(380,460)(380,209)])
  }
  Add(If_else,1195959,340,494)
  {
   Op2=Integer(0)
  }
  Add(If_else,12076602,347,529)
  {
   Op2=Integer(0)
  }
  Add(If_else,9645534,354,564)
  {
   Op2=Integer(0)
  }
  Add(If_else,3139445,361,599)
  {
   Op2=Integer(0)
  }
  Add(If_else,9312346,368,634)
  {
   Op2=Integer(0)
  }
  Add(If_else,4960663,375,669)
  {
   Op2=Integer(0)
  }
  Add(If_else,9828254,382,704)
  {
   Op2=Integer(0)
  }
  Add(If_else,10620131,389,739)
  {
   Op2=Integer(0)
  }
  Add(If_else,6855410,396,774)
  {
   Op2=Integer(0)
  }
  Add(If_else,320446,403,809)
  {
   Op2=Integer(0)
  }
  Add(If_else,2616401,476,273)
  {
   Op2=Integer(0)
  }
  Add(If_else,10450450,483,308)
  {
   Op2=Integer(0)
  }
  Add(If_else,15503691,490,343)
  {
   Op2=Integer(0)
  }
  Add(If_else,13041067,497,378)
  {
   Op2=Integer(0)
  }
  Add(If_else,10133731,504,413)
  {
   Op2=Integer(0)
  }
  Add(If_else,15317917,511,448)
  {
   Op2=Integer(0)
  }
  Add(If_else,7497329,518,483)
  {
   Op2=Integer(0)
  }
  Add(If_else,14567067,525,518)
  {
   Op2=Integer(0)
  }
  Add(If_else,420224,532,553)
  {
   Op2=Integer(0)
  }
  Add(If_else,12661344,539,588)
  {
   Op2=Integer(0)
  }
  Add(If_else,14496433,546,623)
  {
   Op2=Integer(0)
  }
  Add(If_else,10577929,553,658)
  {
   Op2=Integer(0)
  }
  Add(If_else,6325653,560,693)
  {
   Op2=Integer(0)
  }
  Add(If_else,247671,567,728)
  {
   Op2=Integer(0)
  }
  Add(If_else,10815381,574,763)
  {
   Op2=Integer(0)
  }
  Add(If_else,13953457,581,798)
  {
   Op2=Integer(0)
  }
  Add(If_else,6065101,588,833)
  {
   Op2=Integer(0)
  }
  Add(If_else,4463679,595,868)
  {
   Op2=Integer(0)
  }
  Add(If_else,12221419,602,903)
  {
   Op2=Integer(0)
  }
  Add(If_else,5041551,609,938)
  {
   Op2=Integer(0)
  }
  Add(If_else,8721940,665,406)
  {
   Op2=Integer(0)
  }
  Add(If_else,16048723,672,441)
  {
   Op2=Integer(0)
  }
  Add(If_else,13596607,679,476)
  {
   Op2=Integer(0)
  }
  Add(If_else,8989663,686,511)
  {
   Op2=Integer(0)
  }
  Add(If_else,3648919,693,546)
  {
   Op2=Integer(0)
  }
  Add(If_else,292751,700,581)
  {
   Op2=Integer(0)
  }
  Add(If_else,13713499,707,616)
  {
   Op2=Integer(0)
  }
  Add(If_else,4665118,714,651)
  {
   Op2=Integer(0)
  }
  Add(If_else,7337664,721,686)
  {
   Op2=Integer(0)
  }
  Add(If_else,8700431,728,721)
  {
   Op2=Integer(0)
  }
  Add(If_else,10470477,735,756)
  {
   Op2=Integer(0)
  }
  Add(If_else,4640775,742,791)
  {
   Op2=Integer(0)
  }
  Add(If_else,9313597,749,826)
  {
   Op2=Integer(0)
  }
  Add(If_else,3886128,756,861)
  {
   Op2=Integer(0)
  }
  Add(If_else,5121888,763,896)
  {
   Op2=Integer(0)
  }
  Add(If_else,12382614,770,931)
  {
   Op2=Integer(0)
  }
  Add(If_else,8683513,777,966)
  {
   Op2=Integer(0)
  }
  Add(If_else,3514508,784,1001)
  {
   Op2=Integer(0)
  }
  Add(If_else,7900832,791,1036)
  {
   Op2=Integer(0)
  }
  Add(If_else,3177736,798,1071)
  {
   Op2=Integer(0)
  }
  Add(If_else,1613089,868,504)
  {
   Op2=Integer(0)
  }
  Add(If_else,12445186,875,539)
  {
   Op2=Integer(0)
  }
  Add(If_else,8072282,882,574)
  {
   Op2=Integer(0)
  }
  Add(If_else,12426711,889,609)
  {
   Op2=Integer(0)
  }
  Add(If_else,2309663,896,644)
  {
   Op2=Integer(0)
  }
  Add(If_else,4963243,903,679)
  {
   Op2=Integer(0)
  }
  Add(If_else,9866265,910,714)
  {
   Op2=Integer(0)
  }
  Add(If_else,16465345,917,749)
  {
   Op2=Integer(0)
  }
  Add(If_else,16507809,924,784)
  {
   Op2=Integer(0)
  }
  Add(If_else,5068005,931,819)
  {
   Op2=Integer(0)
  }
  Add(If_else,5054121,938,854)
  {
   Op2=Integer(0)
  }
  Add(If_else,16695490,945,889)
  {
   Op2=Integer(0)
  }
  Add(If_else,8090002,952,924)
  {
   Op2=Integer(0)
  }
  Add(If_else,14996810,959,959)
  {
   Op2=Integer(0)
  }
  Add(If_else,8783382,966,994)
  {
   Op2=Integer(0)
  }
  Add(If_else,3801364,973,1029)
  {
   Op2=Integer(0)
  }
  Add(If_else,4332319,980,1064)
  {
   Op2=Integer(0)
  }
  Add(If_else,16116921,987,1099)
  {
   Op2=Integer(0)
  }
  Add(If_else,4268461,994,1134)
  {
   Op2=Integer(0)
  }
  Add(If_else,3115829,1001,1169)
  {
   Op2=Integer(0)
  }
END_SDK
Add(Math,784763,471,350)
{
 OpType=1
 Op2=1
 ResultType=0
 link(onResult,33728:doMax,[(525,356)(525,342)])
}
Add(ChanelToIndex,3464032,135,308)
{
 link(onIndex,2037272:doNext,[])
}
Add(ComboBox,5226751,1731,469)
{
 Left=5
 Top=135
 Width=195
 Height=21
 Name="имя"
 HintTitle="заголовок"
 Hint="всплывающая"
 HintManager="подсказка"
 AddType=1
 Text=""
 DataType=1
 ReadOnly=0
}
Add(StrList,1931349,947,406)
{
 Strings=#7:Ответ 1|7:Ответ 2|7:Ответ 3|
}
Add(ArrayEnum,4855021,961,469)
{
 Type=1
 link(onItem,11086181:doEvent1,[])
 link(Array,1931349:Array,[])
}
Add(Hub,11086181,1598,469)
{
 InCount=100
 OutCount=1
 link(onEvent1,5226751:doAdd,[])
}
Add(StrList,1031897,989,413)
{
 Strings=#7:Ответ 3|7:Ответ 2|7:Ответ 4|
}
Add(ArrayEnum,6173167,1003,476)
{
 Type=1
 link(onItem,11086181:doEvent2,[])
 link(Array,1031897:Array,[])
}
Add(StrList,7547039,1031,420)
{
 Strings=#7:Ответ 4|7:Ответ 5|7:Ответ 3|
}
Add(ArrayEnum,3841637,1045,483)
{
 Type=1
 link(onItem,11086181:doEvent3,[])
 link(Array,7547039:Array,[])
}
Add(StrList,5533929,1073,427)
{
 Strings=#7:Ответ 4|7:Ответ 5|7:Ответ 6|
}
Add(ArrayEnum,14989742,1087,490)
{
 Type=1
 link(onItem,11086181:doEvent4,[])
 link(Array,5533929:Array,[])
}
Add(StrList,7131788,1113,434)
{
 Strings=#7:Ответ 6|7:Ответ 5|7:Ответ 7|
}
Add(ArrayEnum,16564212,1127,497)
{
 Type=1
 link(onItem,11086181:doEvent5,[])
 link(Array,7131788:Array,[])
}
Add(StrList,4188257,1157,441)
{
 Strings=#7:Ответ 7|7:Ответ 8|7:Ответ 6|
}
Add(ArrayEnum,12115318,1171,504)
{
 Type=1
 link(onItem,11086181:doEvent6,[])
 link(Array,4188257:Array,[])
}
Add(StrList,11095462,1199,448)
{
 Strings=#7:Ответ 7|7:Ответ 8|7:Ответ 9|
}
Add(ArrayEnum,5951593,1213,511)
{
 Type=1
 link(onItem,11086181:doEvent7,[])
 link(Array,11095462:Array,[])
}
Add(StrList,10504029,1241,455)
{
 Strings=#7:Ответ 9|7:Ответ 8|8:Ответ 10|
}
Add(ArrayEnum,5748692,1255,518)
{
 Type=1
 link(onItem,11086181:doEvent8,[])
 link(Array,10504029:Array,[])
}
Add(StrList,11161259,1283,462)
{
 Strings=#8:Ответ 10|8:Ответ 11|7:Ответ 9|
}
Add(ArrayEnum,15615858,1297,525)
{
 Type=1
 link(onItem,11086181:doEvent9,[])
 link(Array,11161259:Array,[])
}
Add(StrList,9016378,1323,469)
{
 Strings=#8:Ответ 10|8:Ответ 11|8:Ответ 12|
}
Add(ArrayEnum,5036179,1337,532)
{
 Type=1
 link(onItem,11086181:doEvent10,[])
 link(Array,9016378:Array,[])
}
Add(StrList,11457687,1367,476)
{
 Strings=#8:Ответ 12|8:Ответ 11|8:Ответ 13|
}
Add(ArrayEnum,4984827,1381,539)
{
 Type=1
 link(onItem,11086181:doEvent11,[])
 link(Array,11457687:Array,[])
}
Add(StrList,6690195,1409,483)
{
 Strings=#8:Ответ 13|8:Овтет 14|8:Ответ 12|
}
Add(ArrayEnum,15995072,1423,546)
{
 Type=1
 link(onItem,11086181:doEvent12,[])
 link(Array,6690195:Array,[])
}
Add(StrList,11281572,1451,490)
{
 Strings=#8:Ответ 13|8:Ответ 14|8:Ответ 15|
}
Add(ArrayEnum,13726766,1465,553)
{
 Type=1
 link(onItem,11086181:doEvent13,[])
 link(Array,11281572:Array,[])
}
Add(StrList,10939972,1493,497)
{
 Strings=#8:Ответ 15|8:Ответ 14|8:Ответ 16|
}
Add(ArrayEnum,6061733,1507,560)
{
 Type=1
 link(onItem,11086181:doEvent14,[])
 link(Array,10939972:Array,[])
}
Add(StrList,15533648,1533,504)
{
 Strings=#8:Ответ 16|8:Ответ 17|8:Ответ 15|
}
Add(ArrayEnum,11553145,1547,567)
{
 Type=1
 link(onItem,11086181:doEvent15,[])
 link(Array,15533648:Array,[])
}
Add(StrList,11598185,947,511)
{
 Strings=#8:Ответ 16|8:Ответ 17|8:Ответ 18|
}
Add(ArrayEnum,5822928,961,574)
{
 Type=1
 link(onItem,11086181:doEvent16,[])
 link(Array,11598185:Array,[])
}
Add(StrList,9650006,989,518)
{
 Strings=#8:Ответ 18|8:Ответ 17|8:Ответ 19|
}
Add(ArrayEnum,6708359,1003,581)
{
 Type=1
 link(onItem,11086181:doEvent17,[])
 link(Array,9650006:Array,[])
}
Add(StrList,14804575,1031,525)
{
 Strings=#8:Ответ 19|8:Ответ 20|8:Ответ 18|
}
Add(ArrayEnum,589580,1045,588)
{
 Type=1
 link(onItem,11086181:doEvent18,[])
 link(Array,14804575:Array,[])
}
Add(StrList,7819186,1073,532)
{
 Strings=#8:Ответ 19|8:Ответ 20|8:Ответ 21|
}
Add(ArrayEnum,793924,1087,595)
{
 Type=1
 link(onItem,11086181:doEvent19,[])
 link(Array,7819186:Array,[])
}
Add(StrList,13210817,1113,539)
{
 Strings=#8:Ответ 21|8:Ответ 20|8:Ответ 22|
}
Add(ArrayEnum,6863973,1127,602)
{
 Type=1
 link(onItem,11086181:doEvent20,[])
 link(Array,13210817:Array,[])
}
Add(StrList,2256288,1157,546)
{
 Strings=#8:Ответ 22|8:Ответ 23|8:Ответ 21|
}
Add(ArrayEnum,2525916,1171,609)
{
 Type=1
 link(onItem,11086181:doEvent21,[])
 link(Array,2256288:Array,[])
}
Add(StrList,15970411,1199,553)
{
 Strings=#8:Ответ 22|8:Ответ 23|8:Ответ 24|
}
Add(ArrayEnum,11525416,1213,616)
{
 Type=1
 link(onItem,11086181:doEvent22,[])
 link(Array,15970411:Array,[])
}
Add(StrList,14598557,1241,560)
{
 Strings=#8:Ответ 24|8:Ответ 23|8:Ответ 25|
}
Add(ArrayEnum,15228860,1255,623)
{
 Type=1
 link(onItem,11086181:doEvent23,[])
 link(Array,14598557:Array,[])
}
Add(StrList,14519673,1283,567)
{
 Strings=#8:Ответ 25|8:Ответ 26|8:Ответ 24|
}
Add(ArrayEnum,9401824,1297,630)
{
 Type=1
 link(onItem,11086181:doEvent24,[])
 link(Array,14519673:Array,[])
}
Add(StrList,1696356,1323,574)
{
 Strings=#8:Ответ 25|8:Ответ 26|8:Ответ 27|
}
Add(ArrayEnum,949647,1337,637)
{
 Type=1
 link(onItem,11086181:doEvent25,[])
 link(Array,1696356:Array,[])
}
Add(StrList,16008264,1367,581)
{
 Strings=#8:Ответ 27|8:Ответ 26|8:Ответ 28|
}
Add(ArrayEnum,9990233,1381,644)
{
 Type=1
 link(onItem,11086181:doEvent26,[])
 link(Array,16008264:Array,[])
}
Add(StrList,9801969,1409,588)
{
 Strings=#8:Ответ 28|8:Ответ 29|8:Ответ 27|
}
Add(ArrayEnum,12818753,1423,651)
{
 Type=1
 link(onItem,11086181:doEvent27,[])
 link(Array,9801969:Array,[])
}
Add(StrList,11996531,1451,595)
{
 Strings=#8:Ответ 28|8:Ответ 29|8:Ответ 30|
}
Add(ArrayEnum,5724063,1465,658)
{
 Type=1
 link(onItem,11086181:doEvent28,[])
 link(Array,11996531:Array,[])
}
Add(StrList,2274433,1493,602)
{
 Strings=#8:Ответ 30|8:Ответ 29|8:Ответ 31|
}
Add(ArrayEnum,3614462,1507,665)
{
 Type=1
 link(onItem,11086181:doEvent29,[])
 link(Array,2274433:Array,[])
}
Add(StrList,5889494,1533,609)
{
 Strings=#8:Ответ 31|8:Ответ 32|8:Ответ 30|
}
Add(ArrayEnum,15819775,1547,672)
{
 Type=1
 link(onItem,11086181:doEvent30,[])
 link(Array,5889494:Array,[])
}
Add(StrList,6606677,310,616)
{
 Strings=#7:Ответ 1|7:Ответ 2|7:Ответ 3|7:Ответ 4|7:Ответ 5|7:Ответ 6|7:Ответ 7|7:Ответ 8|7:Ответ 9|8:Ответ 10|8:Ответ 11|8:Ответ 12|8:Ответ 13|8:Ответ 14|8:Ответ 15|8:Ответ 16|8:Ответ 17|8:Ответ 18|8:Ответ 19|8:Ответ 20|8:Ответ 21|8:Ответ 22|8:Ответ 23|8:Ответ 24|8:Ответ 25|8:Ответ 26|8:Ответ 27|8:Ответ 28|8:Ответ 29|8:Ответ 30|
 Point(onGetString)
 Point(doGetString)
 link(onGetString,11460265:doCompare,[])
}
Add(If_else,11460265,450,623)
{
 link(onTrue,4069995:doClear,[(500,629)(500,636)])
 link(Op2,5226751:String,[(463,584)(1744,584)])
}
Add(Memory,3790971,261,658)
{
 Point(Data)
 link(onData,6606677:doGetString,[])
 link(Data,11944153:Value,[(267,566)(834,566)])
}
Add(Hub,1133124,91,315)
{
 link(onEvent1,3790971:doValue,[(112,321)(112,664)])
 link(onEvent2,3464032:doWork2,[(120,328)(120,321)])
}
Add(Memory,4069995,518,623)
{
 Default=Integer(1)
 link(onData,9981557:doOperation,[])
}
Add(Memory,16346175,630,623)
{
 Default=Integer(0)
 Point(Data)
 link(onData,4555804:doString,[])
 link(Data,9981557:Result,[(636,611)(604,611)(604,667)(573,667)])
}
Add(Math,9981557,567,623)
{
 link(onResult,16346175:doValue,[])
 link(Op2,13661928:Var1,[(580,611)(605,611)(605,667)])
}
Add(GetDataEx,13661928,609,658)
{
 Angle=1
 link(Data,16346175:Value,[(636,667)])
}
Add(FormatStr,4555804,714,623)
{
 Mask="Набранные баллы: %1"
 Point(FString)
 link(Str1,13661928:Var2,[(720,611)(671,611)(671,683)(622,683)])
}
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#15: 2009-04-10 10:21:14 ЛС | профиль | цитата
LorD, Мультик со 100 If_Else запросто меняется на один компонент IndexToChanel
Это то, что первым бросилось в глаза.
Блок 1 можно безболезненно заменить на Блок 2 и у компонента Math есть точка очистки (см. Блок 2)

Извини. Дальше разбираться расхотелось.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
файлы: 1lord.png [5.8KB] [356]
Голосовали:LorD
ФорумыМежду деломВывод нескольких строк из списка по очереди ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика