New version - v3.80 - 30th May 2008

Talk about anything about MSN Messenger for mIRC or leave some comments.
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

New version - v3.80 - 30th May 2008

Post by andyc »

Note that file sending and receiving has been redesigned for this version.

Due to the way file sending and receiving works, you can only send files to and receive files from the official Microsoft clients. These include:
- Windows Live Messenger (tested on 8.5, but any should be fine)
- Windows Messenger (comes with XP, tested and works fine)
- MSN Messenger (fairly recent versions, not tested but should work)

Note that you must have port 6891 forwarded to your computer for both file sending and file receiving to work.

The script works fine on the latest mIRC (6.32) but will be fine on other recent versions too.
FactoR

Re: New version - v3.80 - 30th May 2008

Post by FactoR »

I instaled a new version ... 3.80 ... but when I start it, it shows message like before

Image
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

Re: New version - v3.80 - 30th May 2008

Post by andyc »

Odd..

Can you tell me what it says when you type:

//echo -a $msnversion

Also, press Alt+R, then view > msn.mrc. What version does it say at the top of the file?
factor

Re: New version - v3.80 - 30th May 2008

Post by factor »

Version 3.71

dont show new ... O_o ....

I deleted all old files from mirc folder of msn ... and copy new files of new version and its still the same O_o
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

Re: New version - v3.80 - 30th May 2008

Post by andyc »

Can you redownload it from:

www.burningimage.net/msn ?

It's the correct one there.
FactoR

Re: New version - v3.80 - 30th May 2008

Post by FactoR »

NOTHING o_O

VERSION 3.71

I REINSTALED MIRC AND AGAING NOTHING o_O .....

i use mirc 6.31 ...
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

Re: New version - v3.80 - 30th May 2008

Post by andyc »

Most bizarre...

I am certain that the version on the site is 3.80, if you download it then open msn.mrc you can see it says version 3.80.

All I can suggest is to wipe all traces of msn.mrc (so a search for msn.mrc) from your PC, then try to reinstall.
xGrind

Re: New version - v3.80 - 30th May 2008

Post by xGrind »

está travando o mIRC

BUG. freezing mIRC
FactoR

Re: New version - v3.80 - 30th May 2008

Post by FactoR »

i forgot to delete all files from aplication folder .....

now I do it ... and instaled this new version .... it`s working great .... txnks !
Guest

Re: New version - v3.80 - 30th May 2008

Post by Guest »

FactoR wrote:I instaled a new version ... 3.80 ... but when I start it, it shows message like before

Image
El_Santo

Re: New version - v3.80 - 30th May 2008 "Proposed changes"

Post by El_Santo »

Sorry, I do not speak English. I propose changes to a new version. Thank you
1) -----------------------
if ( $version >= 6.3 ) && ( $tip(msnmirc,MSN for mIRC,%msn.nick has logged on,,$shortfn($scriptdir) $+ msn2.ico,,msnchatwindow $gettok(%msn.data,3,32),) != 0 )

replaced by

if ( $version >= 6.2 ) && ( $msnpopups($mg(MSN for mIRC ), %msn.nick has logged on ) != 0 )

and add

alias msnpopups {
set %msncartel.m 2- siempre
if ($away) && (%msncartel.aw == on) return
var %a = $left(%msncartel.m,1)
if (%a == 2) goto muestra
if (%a isin 4 5) && ($appstate == tray) goto muestra
if (!$appactive) && (%a == 3) && ($appstate != tray) goto muestra
if (!$appactive) && (%a isin 3 5) goto muestra
return
:muestra
var %x = $calc($window(-1).w - $window(@tttip).w - 10)
if ($1) {
%cartel = $window(-1).h
var %t1 = $wrap($replace($1,_,$chr(32)),tahoma,11,300,1) , %t2 = $wrap($strip($2-),tahoma,11,300,1) | if $wrap($strip($2-),tahoma,11,300,0) > 1 { %t2 = %t2 ... }
var %an = $width(%t1,tahoma,11,1), %an2 = $width(%t2,tahoma,11) | if %an2 > %an { %an = %an2 } | inc %an 20
.timerTTTIP off | window -c @tttip | window -pkdoihn +dL @tttip %x %cartel %an 50
drawrect -rnf @tttip $rgb(185,201,239) 1 0 0 %an 50 | drawrect -rnfd @tttip $rgb(233,239,250) 1 1 1 $calc(%an -2) 48 6 6
drawtext -rno @tttip $rgb(225,234,248) tahoma 11 $calc((%an / 2) - ($width(%t1,tahoma,11,1) / 2) + 1) 11 %t1
drawtext -rno @tttip $rgb(0,51,102) tahoma 11 $calc((%an / 2) - ($width(%t1,tahoma,11,1) / 2)) 10 %t1
drawtext -rn @tttip $rgb(255,255,255) tahoma 11 $calc((%an / 2) - ($width(%t2,tahoma,11) / 2) + 1) 27 %t2
drawtext -rn @tttip 0 tahoma 11 $calc((%an / 2) - ($width(%t2,tahoma,11) / 2)) 26 %t2
%cartelfunde = 20 | .timerTTTIP off
drawline @tttip | window -o @tttip %x %cartel | .timerCARTELI -mi 1 100 .timerTTTIP -mio 100 0 msnpopups
return
}
if (%cartel < $calc($window(-1).h - 80)) { unset %cartel | .timerTTTIP -oi 1 2 tttipfunde ini | return }
dec %cartel 4 | window @tttip %x %cartel | setlayer %cartelfunde @tttip | inc %cartelfunde 12
}


2) ----------------------------------------

in: menu @*@* {
replace
elseif (*Send E-mail* iswm %a) { run http://www.hotmail.com }
for
elseif (*Send E-mail* iswm %a) { run http://www.hotmail.msn.com/secure/start?action=compose&to= $+ %msn.clickemail }

3)----------------------------------------

viewer logs

alias msn.winlist {

add

if ($fline(@ $+ $1,*Vewer Logs*,1,1) == $null) { /aline -l @ $+ $1 8Vewer Logs }


in: menu @*@* {
add after

elseif (*View Profile* iswm %a) { if ( %msn.clickemail == $null ) { halt } | run explorer.exe http://members.msn.com/ $+ %msn.clickemail }

ADD

elseif (*Vewer Logs* iswm %a) { if ( %msn.clickemail == $null ) { halt }
set %logs.reload %msn.dirlog $+ %msn.clickemail $+ .log
if $findfile(%msn.dirlog,%msn.clickemail $+ .log,0,) == 0 { echo -a There is no record of conversation | halt }
window -kSz @MSN_Historial_ $+ %msn.clickemail -1 -1 600 300 @MSN_Historial_ $+ %msn.clickemail
clear @MSN_Historial_ $+ %msn.clickemail
loadbuf -p @MSN_Historial_ $+ %msn.clickemail %logs.reload }



4)--------------------------
in alias viewlogs {
replace
run $shortfn($mircdir) $+ mod\msn\logs
for
msn.logs

and add

;------- Logs -----------------
alias msn.logs {
window -kSl30z @MSN_logs 135 50 850 300 @MSN_logs
aline $color(notice) @MSN_logs -LOG- $+($chr(3),$color(info)) $+ Cargando logs del directorio $+($chr(3),$color(action)) $+ %msn.dirlog $+ ...
var %logs.alias.time $ticks
var %logs.alias.U 1
while ($findfile(%msn.dirlog,*.log,%logs.alias.U)) {
if (!$1) goto cargar
if ($1 == c) { if ($chr(35) isin $findfile(%msn.dirlog,*.log,%logs.alias.U)) goto cargar | else goto incrementa }
if ($1 == p) { if ($chr(35) !isin $findfile(%msn.dirlog,*.log,%logs.alias.U)) goto cargar | else goto incrementa }
:cargar
aline -l @MSN_logs $nopath($findfile(%msn.dirlog,*.log,%logs.alias.U))
:incrementa
inc %logs.alias.U
}
aline $color(notice) @MSN_logs -LOG- $+ $+($chr(3),$color(action)) $line(@MSN_logs,0,1) $+($chr(3),$color(info)) $+ logs cargados en $round($calc(($ticks - %logs.alias.time) / 1000),2) segundos $+($chr(3),$color(info2)) $+ $chr(40) $+ $+($chr(3),$color(info)) $findfile(%msn.dirlog,*.log,0) logs en total $+ $+($chr(3),$color(info2)) $chr(41)
unset %logs.alias.*
}
alias -l logdel {
if (!$1) halt
else {
var %log.borrar.x 1
aline $color(notice) @MSN_logs -LOG- $+ $+($chr(3),$color(info)) Eliminando logs...
var %log.borrar.time $ticks
:borrador
if ($file($findfile(%msn.dirlog,*.log,%log.borrar.x)).size < $$1) {
if ($fline(@MSN_logs,$nopath($findfile(%msn.dirlog,*.log,%log.borrar.x)),1,1)) dline -l @MSN_logs $fline(@MSN_logs,$nopath($findfile(%msn.dirlog,*.log,%log.borrar.x)),1,1)
aline $color(notice) @MSN_logs -LOG- $+ $+($chr(3),$color(info)) Log $+ $+($chr(3),$color(action)) $nopath($findfile(%msn.dirlog,*.log,%log.borrar.x)) $+($chr(3),$color(info)) $+ borrado de %msn.dirlog
/.remove -b $findfile(%msn.dirlog,*.log,%log.borrar.x) | inc %log.borrar.cont
if (%log.borrar.x <= $findfile(%msn.dirlog,*.log,0)) goto borrador | else goto fin
}
else { inc %log.borrar.x | if (%log.borrar.x <= $findfile(%msn.dirlog,*.log,0)) goto borrador | else goto fin }
:fin
if (!%log.borrar.cont) aline $color(notice) @MSN_logs -LOG- $+($chr(3),$color(info)) $+ No hay logs menores a $+ $+($chr(3),$color(action)) $round($calc($1 / 1024),1) $+($chr(3),$color(info)) $+ kb.
else aline $color(notice) @MSN_logs -LOG- $+ $+($chr(3),$color(action)) %log.borrar.cont $+($chr(3),$color(info)) $+ logs menores a $round($calc($1 / 1024),1) kb borrados en $round($calc(($ticks - %log.borrar.time)/1000),2) segundos.
}
unset %log.borrar.*
}
menu @MSN_Historial_* {
Buscar texto en log: findtext $$?="Texto a buscar?"
Borrar: clear | .remove -b %msn.dirlog $+ %msn.clickemail $+ .log
}
menu @MSN_logs {
dclick { clear @MSN_logs | set %logs.reload %msn.dirlog $+ $sline(@MSN_logs,1) | loadbuf -p @MSN_logs %logs.reload }
Actualizar: window -c @MSN_logs | .msn.logs
-
Cargar log seleccionado: { clear @MSN_logs | if ($sline(@MSN_logs,1)) { set %logs.reload %msn.dirlog $+ $sline(@MSN_logs,1) | loadbuf -p @MSN_logs %logs.reload } | else aline $color(notice) @MSN_logs -LOG- $+($chr(3),$color(info)) $+ Selecciona el log que deseas cargar. }
Cargar log de archivo: { clear @MSN_logs | var %log.sfile = $sfile(%msn.dirlog) | if (%log.sfile) loadbuf -p @MSN_logs %log.sfile }
-
Editar log: { if ($sline(@MSN_logs,1)) run notepad %msn.dirlog $+ $ifmatch | else aline $color(notice) @MSN_logs -LOG- $+($chr(3),$color(info)) $+ Selecciona el log que deseas editar. }
Borrar
.Seleccionados: {
clear @MSN_logs | while ($sline(@MSN_logs,0)) {
/.remove -b %msn.dirlog $+ $sline(@MSN_logs,1) | aline $color(notice) @MSN_logs -LOG- $+($chr(3),$color(info)) $+ Log $+($chr(3),$color(action)) $+ $sline(@MSN_logs,1) $+($chr(3),$color(info)) $+ borrado de %msn.dirlog | dline -l @MSN_logs $sline(@MSN_logs,1).ln
}
}
.Menores a 3 kb: clear @MSN_logs | logdel 3072
.Menores a ?: clear @MSN_logs | var %log.input $$?="Tamaño en kb?" | logdel $calc(%log.input * 1024)
-
Buscar texto en log: findtext $$?="Texto a buscar?"
-
Cerrar: window -c @MSN_logs
}
on 1:CLOSE:@MSN_logs: unset %logs.*



---------------------------------------------

Thank you very much
El_Santo

Re: New version - v3.80 - 30th May 2008

Post by El_Santo »

Postscript: Al want to delete a contact offline, MSN mIRC cause for disconnection, I settled in this way

Delete Contact:{
set %msn.clickemail $gettok($sline(@Messenger,1),2-,60)
set %msn.clickemail $left(%msn.clickemail,$calc($len(%msn.clickemail)-1))
if ( %msn.clickemail == $null ) { halt }
delmsnuser %msn.clickemail
}


$iif( $fline(@Messenger,$1,1,1) < $fline(@Messenger,*Offline Contacts*,1,1),Delete Contact,) : {
set %msn.clickemail $gettok($sline(@Messenger,1),2-,60)
set %msn.clickemail $left(%msn.clickemail,$calc($len(%msn.clickemail)-1))
if ( %msn.clickemail == $null ) { halt }
delmsnuser %msn.clickemail
}



Thank you
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

Re: New version - v3.80 - 30th May 2008

Post by andyc »

Thanks for these suggestions - I'll have a look through them but they seem good!
andyc
MSN for mIRC Creator
Posts: 243
Joined: Sun Dec 01, 2002 21:26 pm

Re: New version - v3.80 - 30th May 2008

Post by andyc »

Sorry I've not got round to looking at this yet, I'm very busy at work.

It's not been forgotten though, is much appreciated and I'll get round to it soon!
Guest

Re: New version - v3.80 - 30th May 2008

Post by Guest »

FactoR wrote:NOTHING o_O

VERSION 3.71

I REINSTALED MIRC AND AGAING NOTHING o_O .....

i use mirc 6.31 ...
Post Reply