Сколько IP бывает

Форумы Между деломСколько IP бывает ← Ctrl1Ctrl →

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

Ответов: 110

Рейтинг: 9

#1: 2009-05-13 16:51:57 ЛС | профиль | цитата

Решил просто для интереса сделать программу которая считает сколько бывает айпи адресов.
Собственно в схеме какая то ошибка, и я не могу понять, почему программа сама закрывается, не досчитав количество IP

code_13250.txt

карма: 0

файлы: 1

code_13250.txt [3.7KB] [148]

Ответов: 1088

Рейтинг: 112

#2: 2009-05-13 17:10:43 ЛС | профиль | цитата

Если не менять алгоритм то надо делать так:


Add(MainForm,9331961,182,217)
{
 Width=191
 Height=74
 Caption="ФОРМА"
 BorderStyle=3
 Position=1
}
Add(Label,6420003,497,329)
{
 Width=10
 Height=17
 Caption="0"
 link(Text,4577984:Var2,[])
}
Add(Math,835183,504,266)
{
 Op2=1
 ResultType=0
 link(Op1,4577984:Var1,[(510,254)(498,254)])
}
Add(Thread,14263487,238,266)
{
 Delay=0
 FastStop=0
 link(onExec,4908660:doFor,[])
}
Add(Button,16055439,182,266)
{
 Left=5
 Top=25
 Width=65
 Caption="Посчитать"
 link(onClick,14263487:doStart,[])
}
Add(For,4908660,301,266)
{
 End=255
 link(onEvent,4033712:doFor,[])
}
Add(For,4033712,350,266)
{
 End=255
 link(onEvent,13940221:doFor,[])
}
Add(For,13940221,399,266)
{
 End=255
 link(onEvent,14985010:doFor,[])
 link(onStop,6420003:doText,[(442,279)(442,335)])
}
Add(For,14985010,448,266)
{
 End=255
 link(onEvent,835183:doOperation,[])
}
Add(GetDataEx,4577984,490,301)
{
 Angle=1
 link(Data,835183:Result,[(510,310)])
}

Правда с таким алгоритмом считаться будет супер долго.
Ещё можно почитать это:
http://hiasm.com/forum.html?q=3&p=114656
Рекомендации построения схем HiAsm

карма: 0

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