Некоректная работа условного блока (If else)

Вверх ↑

Форумы ПрочееНекоректная работа условного блока (If else) ← Ctrl1 2 345Ctrl →

Этот топик читают: Гость

Ответов: 16884

Рейтинг: 1239

#46: 2011-05-12 23:33:56 ЛС | профиль | цитата

nesco, чёт я не врублюсь - что делают два mod (которые подряд внизу) ?

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26170

Рейтинг: 2127

#47: 2011-05-12 23:39:33 ЛС | профиль | цитата

Tad, в натуре, я че-то оставил лишний mod от ста, он там нафиг не нужен
------------ Дoбавленo в 23.39:
Убрал нафиг

карма: 22

Ответов: 16884

Рейтинг: 1239

#48: 2011-05-12 23:46:00 ЛС | профиль | цитата

nesco, чуть голову не сломал

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26170

Рейтинг: 2127

#49: 2011-05-12 23:48:49 ЛС | профиль | цитата

Tad писал(а):

чуть голову не сломал

Если еще подумать, то можно и упростить

карма: 22

Ответов: 16884

Рейтинг: 1239

#50: 2011-05-12 23:53:05 ЛС | профиль | цитата

nesco писал(а):

Если еще подумать, то можно и упростить

одна IC и никаких проблем

(что я и начал делать, но,слава богу, вовремя заглянул в тему

)

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26170

Рейтинг: 2127

#51: 2011-05-12 23:54:24 ЛС | профиль | цитата

Tad писал(а):

одна IC и никаких проблем

Это понятно, но не все владеют языком. Мне интересно на "кошках" тренироваться. Сейчас подумаю, может и упрощу

карма: 22

Ответов: 16884

Рейтинг: 1239

#52: 2011-05-13 00:14:05 ЛС | профиль | цитата

Давай, тренируйся, а я пошел спать.

Бай.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26170

Рейтинг: 2127

#53: 2011-05-13 01:40:15 ЛС | профиль | цитата

Другой вариант

code_23907.txt
------------ Дoбавленo в 01.40:
Еще один альтернативный вариант



Add(Message,10922009,735,462)
{
 @Hint=#7:Условие|16:"резервирования"|9:Выполнено|
 Message="Зарезервирован НПР"
 Caption="Готовность АВР НПР"
 Icon=4
 Point(onOK)
}
Add(Message,2056564,735,406)
{
 @Hint=#13:Невозможность|14:резервирования|15:более 1-го НПРа|
 Message="Более одного
"зарезервированного"
НПРа"
 Caption="Готовность АВР НПР"
 Icon=1
 Point(onOK)
 link(onOK,13542793:doWork2,[])
}
Add(Message,14085232,560,462)
{
 @Hint=#12:Сигнализация|13:об отсутствии|13:Рабочего НПРа|
 Message="Отсутствует
Рабочий
НПР в АВР"
 Caption="Готовность АВР НПР"
 Icon=4
}
Add(Message,5243084,560,532)
{
 @Hint=#9:Объявляет|15:о черезмерности|15:"рабочих" НПРов|
 Message="Выбрано более
двух "рабочих"
НПРов"
 Caption="Готовность АВР НПР"
 Icon=1
 Point(onOK)
 link(onOK,1951950:doWork3,[(786,545)])
}
Add(MainForm,91728,91,147)
{
 @Hint=#5:НПР-1|
 Left=278
 Top=283
 Width=740
 Height=147
 ParentFont=0
 Ctl3D=0
 Caption="АВР НПР"
 BorderStyle=6
 DragForm=0
 TransparentColor=12632256
 MouseCapture=0
 ClientSize=0
 Position=1
 Point(doPicture)
 link(onCreate,925854:doEvent2,[])
}
Add(ChildGroupBox,10959149,203,210)
{
 link(onEvent1,4325772:doEvent,[])
}
BEGIN_SDK
  Add(EditMulti,10287398,21,21)
  {
   EventCount=1
   WorkCount=1
   link(doWork1,9014996:doSelect,[(67,27)(67,62)])
  }
  Add(GroupBox,6665558,112,161)
  {
   Left=105
   Top=10
   Width=171
   Height=102
   Font=[MS Sans Serif,10,0,0,1]
   Caption="Режим работы НПР-1"
  }
  Add(RadioButton,9014996,112,56)
  {
   Left=35
   Top=20
   Width=90
   TabOrder=-1
   Selected=0
   Caption="Отключен"
   link(onSelect,8317376:doWork1,[])
  }
  Add(RadioButton,14604123,112,91)
  {
   Left=35
   Top=45
   Width=90
   TabOrder=-1
   Caption="Рабочий"
   link(onSelect,8317376:doWork2,[(160,97)(160,69)])
  }
  Add(RadioButton,13393744,112,126)
  {
   Left=35
   Top=70
   Width=90
   TabOrder=-1
   Caption="Резервный"
   link(onSelect,8317376:doWork3,[(169,132)(169,76)])
  }
  Add(ChanelToIndex,8317376,189,56)
  {
   Count=3
   link(onIndex,10287398:onEvent1,[(271,62)(271,27)])
  }
END_SDK
Add(ChildGroupBox,4365090,203,266)
{
 link(onEvent1,3060058:doEvent,[])
}
BEGIN_SDK
  Add(EditMulti,9907979,21,21)
  {
   EventCount=1
   WorkCount=1
   link(doWork1,11231432:doSelect,[(67,27)(67,62)])
  }
  Add(GroupBox,11505674,112,161)
  {
   Left=285
   Top=10
   Width=171
   Height=102
   Font=[MS Sans Serif,10,0,0,1]
   Caption="Режим работы НПР-2"
  }
  Add(RadioButton,11231432,112,56)
  {
   Left=35
   Top=20
   Width=90
   TabOrder=-1
   Selected=0
   Caption="Отключен"
   link(onSelect,7153431:doWork1,[])
  }
  Add(RadioButton,13705043,112,91)
  {
   Left=35
   Top=45
   Width=90
   TabOrder=-1
   Caption="Рабочий"
   link(onSelect,7153431:doWork2,[(160,97)(160,69)])
  }
  Add(RadioButton,6848043,112,126)
  {
   Left=35
   Top=70
   Width=90
   TabOrder=-1
   Caption="Резервный"
   link(onSelect,7153431:doWork3,[(169,132)(169,76)])
  }
  Add(ChanelToIndex,7153431,189,56)
  {
   Count=3
   link(onIndex,9907979:onEvent1,[(271,62)(271,27)])
  }
END_SDK
Add(ChildGroupBox,544056,203,322)
{
 link(onEvent1,13455189:doEvent,[])
}
BEGIN_SDK
  Add(EditMulti,6954773,21,21)
  {
   EventCount=1
   WorkCount=1
   link(doWork1,9044258:doSelect,[(67,27)(67,62)])
  }
  Add(GroupBox,2655070,112,161)
  {
   Left=465
   Top=10
   Width=171
   Height=102
   Font=[MS Sans Serif,10,0,0,1]
   Caption="Режим работы НПР-3"
  }
  Add(RadioButton,9044258,112,56)
  {
   Left=35
   Top=20
   Width=90
   TabOrder=-1
   Selected=0
   Caption="Отключен"
   link(onSelect,2753399:doWork1,[])
  }
  Add(RadioButton,11300758,112,91)
  {
   Left=35
   Top=45
   Width=90
   TabOrder=-1
   Caption="Рабочий"
   link(onSelect,2753399:doWork2,[(160,97)(160,69)])
  }
  Add(RadioButton,5769232,112,126)
  {
   Left=35
   Top=70
   Width=90
   TabOrder=-1
   Caption="Резервный"
   link(onSelect,2753399:doWork3,[(169,132)(169,76)])
  }
  Add(ChanelToIndex,2753399,189,56)
  {
   Count=3
   link(onIndex,6954773:onEvent1,[(271,62)(271,27)])
  }
END_SDK
Add(IndexToChanel,4325772,259,210)
{
 Count=3
 Data=Integer(1)
 link(onEvent2,13887774:doValue,[])
 link(onEvent3,6621226:doValue,[(310,230)(310,258)])
}
Add(IndexToChanel,3060058,259,266)
{
 Count=3
 Data=Integer(1)
 link(onEvent2,6075363:doValue,[])
 link(onEvent3,6503302:doValue,[(310,286)(310,314)])
}
Add(IndexToChanel,13455189,259,322)
{
 Count=3
 Data=Integer(1)
 link(onEvent2,9959855:doValue,[])
 link(onEvent3,6254503:doValue,[(310,342)(310,370)])
}
Add(Hub,12066814,259,154)
{
 OutCount=6
 link(onEvent1,6621226:doClear,[(525,160)(525,265)])
 link(onEvent2,6503302:doClear,[(516,167)(516,321)])
 link(onEvent3,6254503:doClear,[(507,174)(507,377)])
 link(onEvent4,13887774:doClear,[(352,181)(352,230)])
 link(onEvent5,6075363:doClear,[(343,188)(343,286)])
 link(onEvent6,9959855:doClear,[(334,195)(334,342)])
}
Add(Memory,13887774,378,217)
{
 Default=Integer(0)
}
Add(Memory,6075363,385,273)
{
 Default=Integer(0)
}
Add(MathParse,2394991,378,406)
{
 DataCount=3
 MathStr="%1 + %2 + %3"
 link(onResult,14306179:doCompare,[])
 link(X1,13887774:Value,[])
 link(X2,6075363:Value,[])
 link(X3,9959855:Value,[])
}
Add(Memory,9959855,392,329)
{
 Default=Integer(0)
}
Add(If_else,14306179,434,406)
{
 Type=1
 Op2=Integer(3)
 link(onTrue,8242416:doCompare,[])
 link(onFalse,5243084:doMessage,[(482,419)(482,538)])
}
Add(MathParse,12585355,560,406)
{
 DataCount=3
 MathStr="%1 + %2 + %3"
 ResultType=0
 link(onResult,791258:doCompare,[])
 link(X1,6621226:Value,[])
 link(X2,6503302:Value,[])
 link(X3,6254503:Value,[])
}
Add(Memory,6621226,560,252)
{
 Default=Integer(0)
}
Add(Memory,6503302,567,308)
{
 Default=Integer(0)
}
Add(Memory,6254503,574,364)
{
 Default=Integer(0)
}
Add(If_else,8242416,497,406)
{
 Type=4
 Op2=Integer(1)
 link(onTrue,12585355:doCalc,[])
 link(onFalse,14085232:doMessage,[(545,419)(545,468)])
}
Add(Hub,925854,147,154)
{
 InCount=2
 OutCount=4
 link(onEvent1,12066814:doEvent1,[])
 link(onEvent2,10959149:doWork1,[(189,167)(189,216)])
 link(onEvent3,4365090:doWork1,[(182,174)(182,272)])
 link(onEvent4,544056:doWork1,[(174,181)(174,328)])
}
Add(If_else,791258,616,406)
{
 Type=2
 Op2=Integer(1)
 link(onTrue,2056564:doMessage,[])
 link(onFalse,14623584:doCompare,[(664,419)(664,468)])
}
Add(HubEx,13542793,782,413)
{
 Angle=3
 link(onEvent,925854:doEvent1,[(786,127)(133,127)(133,160)])
}
Add(Button,14403719,315,406)
{
 Left=335
 Top=120
 Width=80
 TabOrder=-1
 Caption="Применить"
 link(onClick,2394991:doCalc,[])
}
Add(If_else,14623584,679,462)
{
 Type=2
 Op2=Integer(0)
 link(onTrue,10922009:doMessage,[])
 link(onFalse,3716817:doMessage,[(723,475)(723,510)])
 link(Op1,12585355:Result,[(685,450)(566,450)])
}
Add(Message,3716817,735,504)
{
 @Hint=#23:Нет резервирования НПРа|
 Message="Нет ни одного
"зарезервированного"
НПРа"
 Caption="Готовность АВР НПР"
 Icon=1
 Point(onOK)
 link(onOK,1951950:doWork2,[])
}
Add(HubEx,1951950,782,511)
{
 Angle=3
 link(onEvent,13542793:doWork3,[])
}

карма: 22

файлы: 1 code_23907.txt [5.2KB] [161]

Ответов: 16

Рейтинг: 1

#54: 2011-05-13 05:24:25 ЛС | профиль | цитата

Спасибо братцы, вы меня вчера утомили, поэтому переваривать буду сегодня. Как усвою ваши уроки вернусь к беседе!
------------ Дoбавленo в 05.24:

1nd1g0 писал(а):

nesco, выбираешь более двух насосов и все отключаются. На объекте аврал ( ), скидываются на киллера () программисту ( )

Эта ситуация была предложена как одно из условий для резервирования

карма: 0

Ответов: 16884

Рейтинг: 1239

#55: 2011-05-13 09:18:04 ЛС | профиль | цитата

nesco, нифига ты не понял.

А где решение

Ingvar писал(а):

Каждый раз программа забывает о заложенных значениях переменной.

Описание задачи:
1. Есть подвал с тремя насосами и дежурный при них с букой.
2. На первом этаже сидит руководитель, который назначает насосам функцию. тОже с букой. А так как он блудит в "трех соснах", то бишь насосах, то написанные тобой программы с сообщениями - это для него.
3. Есть посыльный с флешкой.
4. Когда посыльный несет флешку в подвал - всё, что назначил руководитель пропадает, т.к. сволочная программа

Ingvar писал(а):

забывает о заложенных значениях переменной.

т.е. руководящие указания йок.

Ну не знает руководитель, а посыльный тем более, что нужно носить не программу, а "переменные", т.е. ты должен запомнить то, что выбрал руководитель в ComboBox-ах пользуясь забитыми в программу подсказками.

Да, и ещё одно упущение :
Когда руководителю удалось обозвать два насоса РАБОЧИМИ, а один РЕЗЕРВНЫМ - должен прозвучать или ТУШ или Гимн страны руководителя (тогда программу можно будет продавать в любое государство мира)

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 8930

Рейтинг: 823

#56: 2011-05-13 09:42:34 ЛС | профиль | цитата

[flood]Уже 4 страницы

Наверное, коллега Ingvar на атомной станции работает, а насосы - в системе охлаждения

Во как всех Фукусима напугала. Надо ещё предусмотреть учёт времени работы и выбирать рабочий насос соответственно

[/flood]

карма: 19

Разработчик

Ответов: 26170

Рейтинг: 2127

#57: 2011-05-13 11:19:47 ЛС | профиль | цитата

Tad писал(а):

нифига ты не понял

Я упрощал схему для дальнейшего использования. Предлагаю над сохранением подуматть самому топикстартеру. К тому же, это самое простое, что там есть.

карма: 22

Ответов: 3889

Рейтинг: 362

#58: 2011-05-13 11:26:31 ЛС | профиль | цитата

Tad, [flood]ты, похоже, тоже не до конца всё понял. Всё идёт к тому, что на обоих буках стоит HiAsm и на флешке носят SHA, а компилируют уже на месте