инверсия

Форумы Между деломинверсия ← Ctrl12 3 4 5 6Ctrl →

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

Ответов: 875

Рейтинг: 322

#1: 2010-10-17 15:04:04 ЛС | профиль | цитата

Как то не сталкивался раньше, а сейчас потребовалось. Допустим строка, или несколько переменных содержат следующее - 001011 - нужно инвертировать значение. Почему то операцию NOT не нашел, или её нет? Пока думается так, но не уверен правильно ли с точки зрения Хиасма.
code_21072.txt

карма: 1

файлы: 1

code_21072.txt [1.1KB] [257]

Ответов: 356

Рейтинг: 31

#2: 2010-10-17 15:44:43 ЛС | профиль | цитата

code_21073.txt

карма: 0

файлы: 1

code_21073.txt [1.3KB] [168]

Ответов: 875

Рейтинг: 322

#3: 2010-10-17 16:05:26 ЛС | профиль | цитата

olDjeka, так уже пробовал, но меня зациклило на MathParse.

карма: 1

Ответов: 356

Рейтинг: 31

#4: 2010-10-17 17:10:44 ЛС | профиль | цитата

На Math


Add(MainForm,12554562,294,168)
{
 Width=332
 Height=167
}
Add(Edit,12658659,378,168)
{
 Left=40
 Top=25
 Text="0"
}
Add(Edit,14405351,420,168)
{
 Left=110
 Top=25
 Text="1"
}
Add(Edit,7022689,462,168)
{
 Left=180
 Top=25
 Text="0"
}
Add(Edit,1435577,504,168)
{
 Left=250
 Top=25
 Text="1"
}
Add(Label,5803453,525,259)
{
 Left=150
 Top=80
}
Add(Button,11984370,357,259)
{
 Left=40
 Top=80
 link(onClick,6532954:doString,[])
}
Add(Math,2285938,469,259)
{
 OpType=1
 Op1=1111
 link(onResult,5803453:doText,[])
}
Add(FormatStr,6532954,413,259)
{
 DataCount=4
 Mask="%1%2%3%4"
 Point(FString)
 link(onFString,2285938:doOperation,[])
 link(Str1,12658659:Text,[(419,226)(384,226)])
 link(Str2,14405351:Text,[])
 link(Str3,7022689:Text,[(433,226)(468,226)])
 link(Str4,1435577:Text,[(440,240)(510,240)])
}

На MathParse


Add(MainForm,12554562,357,98)
{
 Width=332
 Height=167
}
Add(Edit,12658659,441,98)
{
 Left=40
 Top=25
 Text="0"
}
Add(Edit,14405351,483,98)
{
 Left=110
 Top=25
 Text="1"
}
Add(Edit,7022689,525,98)
{
 Left=180
 Top=25
 Text="0"
}
Add(Edit,1435577,567,98)
{
 Left=250
 Top=25
 Text="1"
}
Add(Label,5803453,539,189)
{
 Left=150
 Top=80
}
Add(Button,11984370,413,189)
{
 Left=40
 Top=80
 link(onClick,13542971:doCalc,[])
}
Add(MathParse,13542971,476,189)
{
 DataCount=4
 MathStr="1000*(1-%1)+100*(1-%2)+10*(1-%3)+(1-%4)"
 link(onResult,5803453:doText,[])
 link(X1,12658659:Text,[(482,159)(447,159)])
 link(X2,14405351:Text,[])
 link(X3,7022689:Text,[(496,159)(531,159)])
 link(X4,1435577:Text,[(503,173)(573,173)])
}

карма: 0

Ответов: 8926

Рейтинг: 823

#5: 2010-10-17 17:33:56 ЛС | профиль | цитата

[b]kamakama[/b],


Add(MainForm,8936660,217,63)
{
 link(onCreate,14738840:doData,[])
}
Add(Convertor,10742743,343,77)
{
 Mode=8
 link(onResult,11286152:doText,[])
}
Add(Edit,11286152,385,77)
{
 Left=120
 Top=15
 Width=205
 Color=12639424
 Ctl3D=1
 Text=""
 ReadOnly=0
 link(onChange,3498229:doReplace,[])
}
Add(Edit,2783069,301,77)
{
 Left=60
 Top=15
 Text=""
 DataType=2
 link(onChange,10742743:doConvert,[])
}
Add(Edit,12862673,553,77)
{
 Left=120
 Top=45
 Width=205
 Color=12639424
 Ctl3D=1
 ReadOnly=0
}
Add(Replace,3498229,427,77)
{
 SubStr="0"
 DestStr="$"
 link(onReplace,6083297:doReplace,[])
}
Add(Replace,6083297,469,77)
{
 SubStr="1"
 DestStr="0"
 link(onReplace,14953807:doReplace,[])
}
Add(Replace,14953807,511,77)
{
 SubStr="$"
 DestStr="1"
 link(onReplace,12862673:doText,[])
}
Add(DoData,14738840,259,77)
{
 Data=Integer(151)
 link(onEventData,2783069:doText,[])
}

карма: 19

файлы: 1 code_21076.txt [947B] [227]

Голосовали: Tad, kamakama

Ответов: 16884

Рейтинг: 1239

#6: 2010-10-17 18:07:50 ЛС | профиль | цитата

Леонид, Нестандартно и оригинально

Полностью соответствует

Леонид писал(а):

К верхней части дна бочки приварено отверстие диаметром 25 на 40 сантиметров.

карма: 25

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

Ответов: 4641

Рейтинг: 334

#7: 2010-10-17 22:17:08 ЛС | профиль | цитата

kamakama, а что просто тупо перебрать не мог?
code_21084.txt

карма: 1

Время верстки: %cr_time% Текущее время: %time%

файлы: 1

code_21084.txt [991B] [210]

Ответов: 397

Рейтинг: 34

#8: 2010-10-17 22:46:11 ЛС | профиль | цитата

пусто

карма: 0

Ответов: 1376

Рейтинг: 197

#9: 2010-10-17 22:47:25 ЛС | профиль | цитата

А если так?
code_21085.txt

карма: 1

файлы: 1

code_21085.txt [639B] [223]

Разработчик

Ответов: 26151

Рейтинг: 2127

#10: 2010-10-17 22:50:53 ЛС | профиль | цитата

Ravilr, а разделитель зачем в твоей схеме, он там и нафиг не нужен

Delimiter=Символ-разделитель. Если не задан, то строка перебирается посимвольно

Плохо читаем описания к точкам

карма: 22

Ответов: 4641

Рейтинг: 334

#11: 2010-10-17 22:52:36 ЛС | профиль | цитата

nesco писал(а):

Ravilr, а разделитель зачем

а чтоб был....для точности....если есть разделитель другого не дано, ведь написано

kamakama писал(а):

Допустим строка

а стока может быть не только 101010 а еще и 12 33 22 44, так что сделано это намеренно.

карма: 1

Время верстки: %cr_time% Текущее время: %time%

Ответов: 1376

Рейтинг: 197

#12: 2010-10-17 22:53:46 ЛС | профиль | цитата

[offtop][/offtop]

карма: 1

Разработчик

Ответов: 26151

Рейтинг: 2127

#13: 2010-10-17 22:54:44 ЛС | профиль | цитата

Ravilr, кончай отмазки кидать, нет там такого в задании, есть обычная строка с нулями и едеиницами, остальное и нафиг никому не надо. А то в привычку у всех вошло -- шлангами прикидываться, чуть что не так

карма: 22

Ответов: 16884

Рейтинг: 1239

#14: 2010-10-17 23:44:17 ЛС | профиль | цитата

Ravilr, не спорь. Набери в Edit-ах (в своей схеме) все единицы.

именно получилось

Ravilr писал(а):

просто тупо

Вот так доработанная ещё может работать


Add(MainForm,2573341,168,84)
{
 Width=332
 Height=167
}
Add(Edit,12658659,238,84)
{
 Left=40
 Top=25
 Text="1"
}
Add(Edit,14405351,280,84)
{
 Left=110
 Top=25
 Text="1"
}
Add(Edit,7022689,322,84)
{
 Left=180
 Top=25
 Text="1"
}
Add(Edit,1435577,364,84)
{
 Left=250
 Top=25
 Text="1"
}
Add(Label,5803453,602,154)
{
 Left=150
 Top=80
}
Add(Button,11984370,168,154)
{
 Left=40
 Top=80
 link(onClick,9408821:doString,[])
}
Add(StrCat,1742984,546,154)
{
 Point(doClear)
 link(onStrCat,5803453:doText,[])
 link(Str1,1742984:Result,[(552,142)(536,142)(536,199)(552,199)])
}
Add(FormatStr,9408821,273,154)
{
 DataCount=4
 Mask="%1;%2;%3;%4"
 link(onFString,4369857:doEnum,[])
 link(Str1,12658659:Text,[(279,135)(244,135)])
 link(Str2,14405351:Text,[])
 link(Str3,7022689:Text,[(293,135)(328,135)])
 link(Str4,1435577:Text,[(300,141)(370,141)])
}
Add(Str_Enum,4369857,364,154)
{
 Direct=0
 link(onEnum,5482247:doCompare,[])
}
Add(ChanelToIndex,5116592,483,154)
{
 link(onIndex,1742984:doStrCat,[])
}
Add(If_else,5482247,427,154)
{
 Op2=Integer(1)
 link(onTrue,5116592:doWork1,[])
 link(onFalse,5116592:doWork2,[])
}