Вверх ↑
Ответов: 13
Рейтинг: 0
#1: 2006-12-05 00:20:30 ЛС | профиль | цитата
вот ешё пример:

Add(MainForm,933168,21,105)
{
Left=20
Top=105
Width=164
Height=101
Caption="proxirc"

link(onCreate,3225578:doEvent1,[(100,146)(100,202)])
}
Add(TCP_ServerEx,891266,245,196)
{
ServerPort=6667
link(client,9910034:Array,[(251,177)(251,177)])
}
BEGIN_SDK
Add(EditMultiEx,744206,3,3)
{
WorkCount=#6:##open|
DataCount=#6:client|
Width=629
Height=375
}
Add(TCP_Client,3677526,98,98)
{
link(onRead,463249:doSend,[(271,104)(271,153)])
link(onConnect,7124158:doEvent1,[(138,111)(138,167)])
link(onDisconnect,463249:doClose,[(181,118)(181,146)])
}
Add(TCP_Client,463249,413,133)
{
Port=6667
link(onRead,3677526:doSend,[(448,139)(448,73)(89,73)(89,118)])
}
Add(Ping,4559837,336,133)
{
Name="тут адрес сервера"
link(onFind,463249:doOpen,[])
}
Add(ArrayEnum,5093710,147,217)
{
link(onItem,1657457:doCompare,[])
link(Array,744206:client,[(153,110)(9,110)])
}
Add(Hub,7124158,147,161)
{
link(onEvent1,13819713:doValue,[])
link(onEvent2,5093710:doEnum,[(189,174)(189,205)(137,205)(137,223)])
}
Add(Memory,13819713,210,161)
{
}
Add(If_else,1657457,210,217)
{
link(onTrue,4559837:doPing,[(289,223)(289,139)])
link(Op1,13819713:Value,[])
}
END_SDK
Add(Hub,3225578,147,196)
{
link(onEvent1,11264921:doEvent2,[(189,202)(189,181)(158,181)(158,146)])
link(onEvent2,891266:##open,[(212,209)(212,202)])
}
Add(StrList,9910034,231,126)
{
FileName="clients.txt"
}
Add(Hub,11264921,168,133)
{
InCount=2
OutCount=1
link(onEvent1,9910034:doLoad,[(215,139)(215,160)])
}
Add(Button,12859234,98,98)
{
Left=30
Top=20
Width=85
Caption="обновить"
link(onClick,11264921:doEvent1,[(142,104)(142,139)])
}

прокси сервер только для irc для определённого ирксервера с разграничением кого впускать,работает !
карма: 1

0