YoOGoU
HELPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP !!!
Voila jai vu cette source dun bnc :
;IRC Bouncer Version Test
;By ocZio
;ID $9/05/2002 14:38$
./set %login ooo
./set %pass 666777
on 1:sockclose:bouncerirc: {
//unset %connection
}
on 1:sockclose:lol: {
//unset %connection
}
alias bouncer {
/socklisten bouncer 6668
}
alias bouncermotd {
//sockwrite -n lol :Welcome To The The Alfa version Of The oBNC
//sockwrite -n lol :This BNC was maked by mIRC scripting
//sockwrite -n lol :Scripters :
//sockwrite -n lol :5ocZio
//sockwrite -n lol :5BaK
//sockwrite -n lol :The Commands Are :
//sockwrite -n lol :/quote 10BOUNCERCONNECT 10HOST7/10IP 14PORT
//sockwrite -n lol :/quote BOUNCERDISCONNECT 1
//sockwrite -n lol :This is only test version of the Bouncer so only 1 connection and 1 user is allowed
//sockwrite -n lol :Have Fun ! =D
}
alias bouncerbadmotd {
//sockwrite -n lol :Invalid Pass/User Account pls Check again and retry!
//sockwrite -n lol :Sorry But For the Security reasons you will be disconnected...
//sockclose lol
}
on 1:socklisten:bouncer:{
if $sock(lol).status != active {
/sockaccept lol
/sockwrite -n lol :Pls Enter Your BNC account Infos :
/sockwrite -n lol :/quote LOGIN PASSWORD
/sockwrite -n lol :Thx!
}
else { //goto end }
:end
}
on 1:sockread:lol:{
if ($sockerr > 0) return
:nextread
sockread %temp
if ($sockbr == 0) return
if (%temp == $null) %temp = -
echo 4 %temp
set %atemp %temp
if ($left(%temp,4) == NICK) && ($sock(lol).status == active) { //set %usernick $gettok(%temp,2,32) }
if ($left(%temp,4) == USER) && ($sock(lol).status == active) { //set %useruser $gettok(%temp,2-,32) }
if ($left(%temp,5) == LOGIN) && ($gettok(%temp,2,32) != $null) && ($gettok(%temp,3,32) != $null) {
if ($gettok(%temp,2,32) == %login) && ($gettok(%temp,3,32) == %pass) {
//set %connection Ok | /bouncermotd
}
elseif ($gettok(%temp,2,32) != %login) || ($gettok(%temp,3,32) != %pass) { //bouncerbadmotd | //set %bad 1 }
}
if (($sock(bouncer).status == listening) && ($sock(lol).status == active) && ($sock(bouncerirc).status == active)) { //sockwrite -n bouncerirc %atemp }
if ($left(%temp,$len(bouncerconnect)) == bouncerconnect) {
if ($gettok(%temp,2,32) != $null) && ($gettok(%temp,3,32) != $null) && (%connection == Ok) && ($gettok(%temp,3,32) isnum) { //sockopen bouncerirc $gettok(%temp,2,32) $gettok(%temp,3,32) }
else { //sockwrite -n lol :Error Pls Check Your Port Number and all values!!! }
}
if ($left(%temp,$len(bouncerdisconnect)) == bouncerdisconnect) {
if ($gettok(%temp,2,32) != $null) && ($sock(bouncerirc).status == active) && ($sock(lol).status == active) && (%Connection == Ok) && ($gettok(%temp,2,32) isnum) && ($gettok(%temp,2,32) == 1) {
//sockwrite -n lol :Ok I will try to Disconnect the Connection pls wait...
//sockwrite -n lol :Done.
//sockclose bouncerirc
//sockclose lol
//unset %connection
}
else { //sockwrite -n lol : Error pls check all values!! }
}
goto nextread
}
on 1:sockopen:bouncerirc:{
if $sock(bouncerirc).status = active {
//sockwrite -n bouncerirc NICK %usernick
//sockwrite -n bouncerirc USER %useruser
}
else { //echo -a Error... }
}
on 1:sockread:bouncerirc:{
if ($sockerr > 0) return
:nextread
sockread %temp
if ($sockbr == 0) return
if (%temp == $null) %temp = -
echo 4 %temp
if $left(%temp,4) = PING {
//sockwrite -n bouncerirc PONG : $+ $gettok(%temp,2,58)
//sockwrite -n lol %temp
}
//sockwrite -n lol %temp
goto nextread
}
;Dialog by BaK
;ID $BaK 22:00$
on 1:dialog:oBNC:init:0:{
if %oBNC.loginuser.1.active == on did -c oBNC 80
if %oBNC.loginuser.2.active == on did -c oBNC 83
if %oBNC.loginuser.3.active == on did -c oBNC 86
if %oBNC.loginuser.4.active == on did -c oBNC 89
if %oBNC.loginuser.5.active == on did -c oBNC 92
if %oBNC.loginuser.6.active == on did -c oBNC 95
if %oBNC.loginuser.7.active == on did -c oBNC 98
if %oBNC.loginuser.8.active == on did -c oBNC 101
if %oBNC.loginuser.9.active == on did -c oBNC 104
if %oBNC.loginuser.0.active == on did -c oBNC 107
if %oBNC.logging == on did -c oBNC 35
}
; ID,left,top,width,height
Dialog oBNC {
option bu
size -1 -1 374 244
title "Options for oBNC."
tab "Main", 1, 1 1 372 225
text "Listen on port:" 31, 5 30 80 15,style,tab1
EDIT %oBNC.port, 32, 75 27 100 19,style,tab1
text "Admin. pass.:" 33, 5 47 80 15,style,tab1
EDIT %oBNC.adminpass, 34, 75 45 100 19,style,tab1
CHeCK "Logging" 35, 5 64 60 19,style,tab1
tab "Login", 2
text "Active. User. Password." 79, 5 30 300 19,style,tab2
CHeCK "On" 80, 5 43 36 19,style,tab2
EDIT %oBNC.loginuser.1, 81, 40 43 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.1.password, 82, 92 43 280 19,style,tab2,autohs
CHeCK "On" 83, 5 60 36 19,style,tab2
EDIT %oBNC.loginuser.2, 84, 40 60 53 19,style,tab2,autohs
EDIt %oBNC.loginuser.2.password, 85, 92 60 280 19,style,tab2,autohs
CHeCK "On" 86, 5 77 36 19,style,tab2
EDIT %oBNC.loginuser.3, 87, 40 77 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.3.password, 88, 92 77 280 19,style,tab2,autohs
CHeCK "On" 89, 5 94 36 19,style,tab2
EDIT %oBNC.loginuser.4, 90, 40 94 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.4.password, 91, 92 94 280 19,style,tab2,autohs
CHeCK "On" 92, 5 111 36 19,style,tab2
EDIT %oBNC.loginuser.5, 93, 40 111 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.5.password, 94, 92 111 280 19,style,tab2,autohs
CHeCK "On" 95, 5 128 36 19,style,tab2
EDIT %oBNC.loginuser.6, 96, 40 128 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.6.password, 97, 92 128 280 19,style,tab2,autohs
CHeCK "On" 98, 5 145 36 19,style,tab2
EDIT %oBNC.loginuser.7, 99, 40 145 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.7.password, 100, 92 145 280 19,style,tab2,autohs
CHeCK "On" 101, 5 162 36 19,style,tab2
EDIT %oBNC.loginuser.8, 102, 40 162 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.8.password, 103, 92 162 280 19,style,tab2,autohs
CHeCK "On" 104, 5 179 36 19,style,tab2
EDIT %oBNC.loginuser.9, 105, 40 179 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.9.password, 106, 92 179 280 19,style,tab2,autohs
CHeCK "On" 107, 5 196 36 19,style,tab2
EDIT %oBNC.loginuser.0, 108, 40 196 53 19,style,tab2,autohs
EDIT %oBNC.loginuser.0.password, 109, 92 196 280 19,style,tab2,autohs
BUTTON "&OK" 3, 266 223 54 21, ok
BUTTON "&Cancel" 4, 320 223 54 21, cancel
}
on *:Dialog:obnc:Sclick:3:{
if $did(oBNC,35).state == 1 { set %oBNC.logging on }
else { unset %oBNC.logging }
set %oBNC.loginuser.1 $did(oBNC,81)
set %oBNC.loginuser.2 $did(oBNC,84)
set %oBNC.loginuser.3 $did(oBNC,87)
set %oBNC.loginuser.4 $did(oBNC,90)
set %oBNC.loginuser.5 $did(oBNC,93)
set %oBNC.loginuser.6 $did(oBNC,96)
set %oBNC.loginuser.7 $did(oBNC,99)
set %oBNC.loginuser.8 $did(oBNC,102)
set %oBNC.loginuser.9 $did(oBNC,105)
set %oBNC.loginuser.0 $did(oBNC,108)
set %oBNC.loginuser.1.password $did(oBNC,82)
set %oBNC.loginuser.2.password $did(oBNC,85)
set %oBNC.loginuser.3.password $did(oBNC,88)
set %oBNC.loginuser.4.password $did(oBNC,91)
set %oBNC.loginuser.5.password $did(oBNC,94)
set %oBNC.loginuser.6.password $did(oBNC,97)
set %oBNC.loginuser.7.password $did(oBNC,100)
set %oBNC.loginuser.8.password $did(oBNC,103)
set %oBNC.loginuser.9.password $did(oBNC,106)
set %oBNC.loginuser.0.password $did(oBNC,109)
if $did(oBNC,80).state == 1 { set %oBNC.loginuser.1.active on }
else { unset %oBNC.loginuser.1.active }
if $did(oBNC,83).state == 1 { set %oBNC.loginuser.2.active on }inuser.4.active on }
else { unset %oBNC.loginuser.4.active }
if $did(oBNC,92).state == 1 { set %oBNC.loginuser.5.active on }
else { unset %oBNC.loginuser.5.active }
if $did(oBNC,95).state == 1 { set %oBNC.loginuser.6.active on }
else { unset %oBNC.loginuser.6.active }
if $did(oBNC,98).state == 1 { set %oBNC.loginuser.7.active on }
else { unset %oBNC.loginuser.7.active }
if $did(oBNC,101).state == 1 { set %oBNC.loginuser.8.active on }
else { unset %oBNC.loginuser.8.active }
if $did(oBNC,104).state == 1 { set %oBNC.loginuser.9.active on }
else { unset %oBNC.loginuser.9.active }
if $did(oBNC,107).state == 1 { set %oBNC.loginuser.0.active on }
else { unset %oBNC.loginuser.0.active }
}
alias obnc { .dialog -m oBNC oBNC }
-------------
donc ken je fait la commende o debut /set %login ooo et /set %pass 666777 ba sa marche.
mais ken je tape /bouncer sa mecrit : /socklisten: 'bouncer' socket in use (line 16, script4.ini)
donc je vais a la ligne 16 ( /socklisten bouncer 6668 )
maintenant je voudrais savoir c koi le probleme ??????
merci et @+