User ads You !?

Talk about anything about MSN Messenger for mIRC or leave some comments.
Post Reply
Golden

User ads You !?

Post by Golden »

What if someone ads you , will I see that as a pop-up ?
or what ?!
Sat

i fixed it

Post by Sat »

take ur time for adding these code right


first find this line

if ( $left(%msn.data,3) = LST ) {
set %msn.nick $gettok(%msn.data,5-,32)
set %msn.temp4 $calc($numtok(%msn.nick,32)-1)
set %msn.nick $gettok(%msn.nick,1 - %msn.temp4 ,32)
}

;replace -->

if ( $left(%msn.data,3) = LST ) {
set %msn.nick $gettok(%msn.data,5-,32)
set %msn.temp4 $calc($numtok(%msn.nick,32)-1)
set %msn.nick $gettok(%msn.nick,1 - %msn.temp4 ,32)
}
if (*ADD*RL* iswm %msn.data) {
var %msndata $gettok(%msn.data,5,32)
sendmsn ADD %msn.main FL $gettok(%msn.data,5,32) $gettok(%msn.data,5,32) 0
sendmsn ADD %msn.main AL $$gettok(%msn.data,5,32) $gettok(%msn.data,5,32)
sendmsn REM %msn.main AL $gettok(%msn.data,5,32)
sendmsn ADD %msn.main BL $gettok(%msn.data,5,32) $gettok(%msn.data,5,32)
if (!$dialog(adduser)) { dialog -m adduser adduser | dialog -s adduser 1 95 271 132 }
if ($did($dialog(adduser),10) !iswm $gettok(%msn.data,5,32)) && ($dialog(adduser)) { did -a adduser 10 $gettok(%msn.data,5,32) | did -c adduser 10 1 }
writeini msn\adduser.ini $gettok(%msn.data,5,32) name $gettok(%msn.data,5,32)
}

;after find:

if ($gettok(%msn.data,3,32) == NLN) {
aline -l @Messenger $convertmsn2(%msn.nick) 15< $+ $gettok(%msn.data,4,32) $+ > }

;replace -->

if ($gettok(%msn.data,3,32) == NLN) {
if ($fline(@Messenger,*< $+ $gettok(%msn.data,4,32) $+ >,1,1) = $null) {
if ($readini(msn\adduser.ini,$gettok(%msn.data,4,32),name) = $gettok(%msn.data,4,32)) { aline -l @Messenger 14(0Contact not added for moment14) $+ 15< $+ $gettok(%msn.data,4,32) $+ > } | if (!$dialog(adduser)) { dialog -m adduser adduser | dialog -s adduser 1 95 271 132 } | if ($did($dialog(adduser),10) !iswm $gettok(%msn.data,4,32)) && ($dialog(adduser)) { did -a adduser 10 $gettok(%msn.data,4,32) | did -c adduser 10 1 } | goto a } }
aline -l @Messenger 15< $+ $gettok(%msn.data,4,32) $+ >
:a
if ($gettok(%msn.data,3,32) == AWY) {

;after find it --->

if ($gettok(%msn.data,2,32) == NLN) {
if ( $fline(@Messenger,*< $+ $gettok(%msn.data,3,32) $+ >,1,1) == $null ) {
put it here --->
.
if ($fline(@Messenger,*< $+ $gettok(%msn.data,3,32) $+ >,1,1) = $null) { if ($readini(msn\adduser.ini,$gettok(%msn.data,3,32),name) = $gettok(%msn.data,3,32)) { aline -l @Messenger 14(0Contact not added14) 15< $+ $gettok(%msn.data,3,32) $+ > | if (!$dialog(adduser)) { dialog -m adduser adduser | dialog -s adduser 1 95 271 132 } | if ($did($dialog(adduser),10) !iswm $gettok(%msn.data,3,32)) && ($dialog(adduser)) { did -a adduser 10 $gettok(%msn.data,3,32) | did -c adduser 10 1 } }
else { aline -l @Messenger $convertmsn2(%msn.nick) 15< $+ $gettok(%msn.data,3,32) $+ > } }
}
}

;after find -->

}
goto nextread
}

;replace code


}
goto nextread
}
dialog adduser {
title "Automatic request contact "
size -1 -1 134 65
option dbu
text "Ajouter ce contact", 1, 45 2 45 6
button "Accepter", 2, 2 55 29 9
button "Refuser", 3, 53 55 29 9
check "", 4, 1 12 6 6
check "", 6, 1 30 6 6
text "do u want appear offline for him", 7, 9 12 108 6
text "if u decline this request u get his adress backup", 9, 9 30 123 6
combo 10, 1 41 81 50, size drop
button "Fermer", 11, 104 55 29 9, cancel
}
on *:dialog:adduser:init:*:{
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetDialog $dname bgcolor $rgb(0,0,0)
$mdxSC 1,7,8,9 background $rgb(0,0,0)
$mdxSC 7,8,9 text $rgb(0,255,0)
$mdxSC 1 text $rgb(180,180,180)
$mdxSC 1,7,8,9 textbg $rgb(0,0,0)
}
on *:dialog:adduser:sclick:*:{
if ($did = 2) {
if ( $sock(msn) != msn ) || ($did(10) = $null) { halt }
if ($readini(msn\adduser.ini,$did(10),name) != $null) { remini msn\adduser.ini $did(10) name }
.timer 1 1 dline -l @Messenger $fline(@Messenger,*< $+ $did(10) $+ >,1,1)
sendmsn REM %msn.main FL $did(10)
.timer 1 3 sendmsn ADD %msn.main FL $did(10) $did(10) 0
.timer 1 3 sendmsn ADD %msn.main AL $did(10) $did(10)
if ($did(4).state = 0) { sendmsn REM %msn.main BL $did(10) }
if ($did(4).state = 1) { sendmsn REM %msn.main AL $did(10) | sendmsn ADD %msn.main BL $did(10) $did(10) }
}
if ($did = 3) {
sendmsn REM %msn.main FL $did(10)
sendmsn REM %msn.main AL $did(10)
sendmsn ADD %msn.main BL $did(10) $did(10)
dline -l @Messenger $fline(@Messenger,*< $+ $did(10) $+ >,1,1)
if ($did(6).state = 1) { writeini msn\adduser.ini $did(10) conserver $did(10) }
}
}

if it doesnt work ill implemented these lines in ur files .. sorry im really bad in english ssatangel@gmail.com
Guest

Post by Guest »

did this work?

if so, is it in the released version? (3.50)
Post Reply