i kinda fixed it. i renamed | to winwin just because. and now it works.
;written l4roxyl,,.
;date 29/09/2012
;web; www.mircscripting.net
;..,
on ^*:hotlink:*<*>*:#: {
if ($mouse.key & 1) {
if ($regsubex($1,/[ $+ $prefix $+ <>]/g,) ison #) {
sline # $v1
.enable #winwin
.whois $v1
$(,%__c = #)
return
}
halt
}
}
alias -l _cp return $+($chr(2),$1,$chr(2))
alias -l winwin {
$(,%3 = 250)
while /____\ {
dec -u %3 1
window @_/ $window(@_/).dx $window(@_/).dy %3 $iif(%3 < 100,$v1,100)
setlayer $calc(%3 -35) @_/
if %3 = 0 { window -c @_/ | $iif($hget(%_w),hfree $v1) | break }
}
}
alias -l sq {
$(,%_w = $1)
$iif($window(@_/),window -c $v1)
window -pdBw0zo +bL @_/ $2 $3 0 0
while /?/?_\?\? {
inc -u %2 5
window @_/ $calc($2 -10) $calc($3 -10) %2 $iif(%2 >= 100,100,%2)
drawrect -rf @_/ $rgb(0,0,0) 1 0 0 %2 %2
setlayer $iif(%2 >= 215,215,%2) @_/
if %2 = 250 break
}
drawfill -r @_/ $rgb(0,0,0) - 0 0
drawrect -rf @_/ $rgb(65,129,127) 1 0 0 250 7
drawrect -r @_/ $rgb(65,129,127) 1 0 0 248 98
var %_dt__: = drawtext -rop @_/ $rgb(255,255,255) Verdana 10 5
var %_n = $token($hget($1,_id),3-,32)
%_n = $iif($len(%_n) >= 32,$mid(%_n,1,32) $+ ..,%_n)
%_dt__: 9 Ident: $_cp($token($hget($1,_id),1,32))
%_dt__: 22 Name: $_cp(%_n)
%_dt__: 35 Chans: $_cp($token($hget($1,_chans),0,32)) $&
- Prefixes: $_cp($regex($hget($1,_chans),/([ $+ $prefix $+ ])#./g)) / Left Click.
%_dt__: 48 Register: $_cp($iif($hget($1,_reg),$v1,Non-register.))
%_dt__: 60 Idle: $_cp($iif($hget($1,_idle),$regsubex($v1,/(\D+)/g,$chr(32) \1),Accessible.))
%_dt__: 71 Connect time: $_cp($iif($hget($1,_sign),$v1,Accessible.))
%_dt__: 83 Status: $_cp($iif($hget($1,_own),$v1,Unauthorized user.))
}
menu @_/ {
leave:winwin
rclick:!echo -ec info %__c - %_w in chans: $_cp($hget(%_w,_chans))
dclick:winwin | query %_w
}
#winwin off
raw *:*: {
haltdef
tokenize 32 $rawmsg
var %_ = hadd -m $4
if ($2 = 311) %_ _id $5-6 $strip($right($8-,-1))
if ($2 = 307) %_ _reg Registered.
if ($2 = 319) %_ _chans $right($5-,-1)
if ($2 = 317) {
%_ _idle $duration($5)
%_ _sign $asctime($6,dd/mm/yy - hh:nn:ss)
}
if ($2 = 313) %_ _own $right($5-,-1)
if ($2 = 318) {
sq $4 $mouse.dx $mouse.dy $active
.disable #winwin
}
}
#winwin end
why would you want to say a long amount of text via a mirc bot. just do longer phrases
talking like this
is
really
gay
but, talking like this is the proper way to do. multiple lines is not always the best way to go, and if i were you, i would delete this piece of code. Its not really a code, you simply added a if ($nick == $nick) that is equivalent to if (1 == 1) {...}
You should try and look at other people's codes. use them, modify them extremely, and then take out another version to call it your own. (hawkee reality)
something you might wanna add is a flood protection.
Lets say on your channel, there is 100 nicknames/users
Bam! .net .split
50% of them leaves.
Bam. Net-merge (a ".net .split" fixing itself)
50 users joins your room. you send 150 /say, you quit in (Excess flood)
Try to make sure they are not rejoining from a netsplit, or put a %var that will make the script do nothing if exceeded . with a /return or /halt.
here is an example with your code.
on *:join:#: {
if (%noflood.example. [ $+ [ $chan ] ] >= 2) { halt }
inc -u3 %noflood.example. [ $+ [ $chan ] ] 1
if ($nick == $nick) {
timer 1 3 Describe $chan humps $nick
timer 1 5 say Ohhaithar $nick
timer 1 7 say how YOU doin?!? ;)
}
}
Please keep in mind, that i really don't think small lines of useless codes like this one should be on hawkee.
There should be a minimum of ~50 lines to be valid...
But the method is there, learn from it, and use it in everything. (with different %variable.names.
Here is what i would do. (if i would be in a life or death situation)
on *:join:#: {
if (%noflood.example. [ $+ [ $chan ] ] >= 2) { halt }
inc -u3 %noflood.example. [ $+ [ $chan ] ] 1
Describe $chan humps $nick
.notice $nick Welcome on $chan $+($nick,!) This is your $iif($+(%n.j.,$chan) == 0,First, $+(%n.j.,$chan)) Visit with us. Have fun :)
}
}
Welcome on hawkee :)
this is completely useless... your client is your bouncer. you are evading the principal reason why someone would use a bouncer...
Nice coding, it completely works, i see your talent.. the thing is.. its not usefull... at all.
a Bouncer is to keep you alive in case your client crashes, or to protect yourself from ddos attacks. witch even now, your client will be the one receiving it (if happening)
3/10 (not usefull)
+Like (Great idea)