Gwen..can you post the update system in your vincula .....
coz i did all that you said and i even rebooted..and it still gave me the same error
• Updating the "Hitman" Passport SubscriberInfo...
• SubscriberInfo update for "Hitman" failed because the email/password is incorret (-232882.299 seconds)
Here's the code, but I don't think the code has anything to do with it--as it worked fine with GD also.
Aliases:
/urole2
/urole
/msn.dogetsub
------UserRole Updater Addon by Vexation Editted by Gwen
alias urole {
If ( %gn == $null) { %gn = $$?="Enter a Group Name for Updating UserRole Number, in the following format: GroupName (Don't add the G__)"
%gn2 = $left(%gn,2)
%gn4 = $left(%gn,1)
if (%gn2 = G_) { %gn = $mid(%gn,3) }
if (%gn4 = %) %gn = $mid(%gn,5)
else %gn = %gn
echo $color(info text) -a 8• Updating UserRole for %gn ( $+ %msnpp.email $+ )...
echo $color(mode text)-at To Change Group Room For UserRole Update Type In: /urole2
sockopen urole groups.msn.com 80
set -u30 %ut $ticks
}
else {
echo $color(info text) -a 8• Updating UserRole for %gn ( $+ %msnpp.email $+ ), please wait...
echo $color(mode text) -at To Change Group Room For UserRole Update Type In: /urole2
set %22stoppu true
.timerechostop2 1 30 /stopppu
sockopen urole groups.msn.com 80
set -u30 %ut $ticks
}
}
on *:sockopen:urole:{
sockwrite -n $sockname GET / $+ %gn $+ /chat.msnw HTTP/1.1 $+ $crlf $+ User-Agent: Vincula/ $+ $vver (compatible; MSIE 6.0; Windows NT 5.1) $+ $crlf $+ Accept: */* $+ $crlf $+ Accept-Language: EN-US
sockwrite -n $sockname Host: groups.msn.com $+ $crlf $+ Cookie: AdultWarn=1;path=/;chocx=9,02,0310,2401; MSPProf= $+ %msnpp.profile $+; MSPAuth= $+ %msnpp.ticket $+; $+ $crlf $+ Connection: Close $+ $crlf $+ $crlf
}
on *:sockread:urole:{
if ($sockerr > 0) return
var %ur | sockread %ur
if (>RenderChat isin %ur) {
set %msnpp.userrole $gettok(%ur,8,39)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) UserRole $gettok(%ur,8,39)
echo $color(info2 text) -at 9• UserRole for %gn ( $+ %msnpp.email $+ ) Updated. ( $+ $calc(($ticks - %ut) / 1000) seconds)
/unset %22stoppu
sockclose $sockname
if (%rejoin1status = 1) { PROP $ ROLE %msnpp.UserRole | .timer.r2rejoinr2.2 1 1 /hop | set -u25 %rejoin1status 2 }
return
}
elseif (*HTTP/1.1 302* iswm %ur) { echo $color(info text) -at 4• Failed! UserRole update failed. Passport ( $+ %msnpp.email $+ ) must be updated before userrole can be updated. | sockclose $sockname | return }
elseif (*Error Message:* iswm %gr) { echo $color(info text) -at 4• Cannot update %gn (Error: $gettok(%gr,2-,58) $+ ) | sockclose $sockname | return }
}
menu * {
-
Update Current UserRole:urole
-
}
alias urole2 {
%gn = $$?="Group Room Name Change: Enter a Group Name for updating the UserRole Number, in the following format: GroupName (Don't add the G__)"
%gn2 = $left(%gn,2)
%gn4 = $left(%gn,1)
if (%gn2 = G_) { %gn = $mid(%gn,3) }
if (%gn4 = %) %gn = $mid(%gn,5)
else %gn = %gn
echo $color(info text) -at 8• Updating UserRole for %gn ( $+ %msnpp.email $+ )...
echo $color(mode text) -at To Change Group Room For UserRole Update Type In: /urole2
.set -u70 %22stoppu true
.timerechostop2 1 30 /stopppu
sockopen urole2 groups.msn.com 80
set -u30 %ut $ticks
}
on *:sockopen:urole2:{
sockwrite -n $sockname GET / $+ %gn $+ /chat.msnw HTTP/1.1 $+ $crlf $+ User-Agent: Vincula/ $+ $vver (compatible; MSIE 6.0; Windows NT 5.1) $+ $crlf $+ Accept: */* $+ $crlf $+ Accept-Language: EN-US
sockwrite -n $sockname Host: groups.msn.com $+ $crlf $+ Cookie: AdultWarn=1;path=/;chocx=9,02,0310,2401; MSPProf= $+ %msnpp.profile $+; MSPAuth= $+ %msnpp.ticket $+; $+ $crlf $+ Connection: Close $+ $crlf $+ $crlf
}
on *:sockread:urole2:{
if ($sockerr > 0) return
var %ur | sockread %ur
if (>RenderChat isin %ur) {
set %msnpp.userrole $gettok(%ur,8,39)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) UserRole $gettok(%ur,8,39)
echo $color(info2 text) -at 9• UserRole for %gn ( $+ %msnpp.email $+ ) Updated. ( $+ $calc(($ticks - %ut) / 1000) seconds)
/unset %22stoppu
sockclose $sockname
return
}
elseif (*HTTP/1.1 302* iswm %ur) { echo $color(info text) -at 4• Failed! UserRole Update Failed. Passport ( $+ %msnpp.email $+ ) must be updated before updating userRole. | sockclose $sockname | return }
elseif (*Error Message:* iswm %gr) { echo $color(info text) -at 4• Cannot update %gn (Error: $gettok(%gr,2-,58) $+ ) | sockclose $sockname | return }
}
menu * {
-
Update UserRole:urole
-
}
;¤†¤ SubscriberInfo ¤†¤
;¤†¤ This updater was created zBrute, Tyrant, Chris ¤†¤
;¤†¤ Modifed greatly by The Gate Keeper to work with Vincula settings ¤†¤
alias msn.dogetsub {
var %host
set %update.time $ticks
echo $color(info) -at 8• Updating the " $+ $msn.ini(selpp) $+ " Passport SubscriberInfo...
tokenize 32 $gettok(%msnpp.email,2,64)
if ($1 == hotmail.com) { %host = loginnet.passport.com }
elseif ($1 == msn.com) { %host = msnialogin.passport.com }
else { %host = login.passport.com }
sockopen update. $+ %msnpp.email %host 80
sockmark update. $+ %msnpp.email %msnpp.passwd %host
.set -u70 %2stoppu true
.timerechostop 1 30 /stopppu
}
on *:sockopen:update.*:{
var %email, %host, %password, %string
%email = $gettok($sockname,2-,46)
%password = $gettok($sock($sockname).mark,1,32)
%host = $gettok($sock($sockname).mark,2,32)
%string = Passport1.4 OrgVerb=GET,OrgURL=http%3A%2F%2Fchat%2Emsn%2Ecom,sign-in=
%string = %string $+ %email $+ ,pwd= $+ %password $+ ,id=2260
sockwrite -n $sockname GET http:// $+ %host $+ /login2.srf HTTP/1.1
sockwrite -n $sockname Authorization: %string
sockwrite -n $sockname Host: %host
sockwrite -n $sockname $crlf
}
on *:sockread:update.*:{
sockread -n &var
var %email = $gettok($sockname,2-,46)
if ($bvar(&var,0) > 0) {
if ($bfind(&var,1-,Authentication-Info:)) {
sockopen $replace($sockname,update,sub) chat.msn.com 80
tokenize 32 $wildtok($bvar(&var,1-).text,*t=*,1,39)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) ticket $remove($gettok($1-,2,61),&p)
%msnpp.ticket = $remove($gettok($1-,2,61),&p)
tokenize 32 $wildtok($bvar(&var,1-).text,*p=*,2,39)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) profile $gettok($1-,3,61)
%msnpp.profile = $gettok($1-,3,61)
}
elseif ($bfind(&var,1-,Unauthorized)) { echo $color(info) -at 4• SubscriberInfo update for " $+ $msn.ini(selpp) $+ " failed because the email/password is incorret ( $+ $calc(($ticks - %msnpp.lotime) / 1000) seconds)
.timerechostop off
sockclose sub.*
sockclose update.*
unset %update.*
unset %2stoppu
}
}
}
on *:sockopen:sub.*:{
var %email = $gettok($sockname,2-,46)
sockwrite -n $sockname GET /RenderChat.msnw? HTTP/1.1
sockwrite -n $sockname User-Agent: ChristianEthics (compatible; MSIE 6.0; Windows NT 5.1)
sockwrite -n $sockname Host: chat.msn.com
sockwrite -n $sockname Connection: Keep-Alive
sockwrite -n $sockname Cookie: MSPProf= $+ %msnpp.profile $+; MSPAuth= $+ %msnpp.ticket $+;
sockwrite -n $sockname $crlf
}
on *:sockread:sub.*:{
sockread -n &var
var %email = $gettok($sockname,2-,46)
if ($bvar(&var,0) > 0) {
if ($bfind(&var,1-,SubscriberInfo)) {
tokenize 32 $wildtok($bvar(&var,1-).text,*SubscriberInfo*,1,60)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) SubscriberInfo $gettok($1-,4,34)
%msnpp.SubscriberInfo = $gettok($1-,4,34)
writeini $+(",$scriptdir,vpassport.dat") $msn.ini(selpp) updated $ctime
echo $color(info2) -at 9• Passport and SubscriberInfo for " $+ $msn.ini(selpp) $+ " is now updated ( $+ $calc(($ticks - %update.time) / 1000) seconds)
unset %2stoppu
sockclose sub.*
sockclose update.*
unset %update.*
}
}
}
alias stopppu {
if (%2stoppu = true) {
/echo $color(info text) -at 4• SubscriberInfo Update Failed. Check status window for more details. ( $+ $calc(($ticks - %msnpp.lotime) / 1000) seconds)
sockclose sub.*
sockclose update.*
unset %update.*
unset %2stoppu
}
if (%22stoppu = true) {
/echo $color(info text) -at 4• UserRole Update Failed. Check status window for more details. ( $+ $calc(($ticks - %msnpp.lotime) / 1000) seconds)
sockclose sub.*
sockclose update.*
unset %update.*
unset %22stoppu
}
if (%33stoppu = true) {
/echo $color(info text) -at 4• MSNREGCookie Update Failed. Check status window for more details. ( $+ $calc(($ticks - %msnpp.lotime) / 1000) seconds)
unset %33stoppu
window -c @VinculaPPU
unset %msnpp.lo*
return S_CANCEL
}
}
alias rejoin {
$msn.recent(1,2)
}
;--- End of script
Edited Apr 8, 2006 7:41 PM by Gwen
and the Variables clears when the script starts up every time so that has nothing to do with what I did initially....
