Skip to content
MSN

Get script to display ASL on join in groups

A TG007 community discussion started by drfeelgood.

Closed discussion 17 posts
Page 1 of 1
Closed
Topic #1427 · 17 published posts · 1,394 views

I have Sercencer V2.0 and Hybrid Omega running in my MSN group. I want one of the bots to display the ASL of the guest coming into the room, echoed in channel.

 

Anyone know how I can do it with either of these scripts?

I'm pretty sure neither of those scripts has the option to do such a thing. I think GuarDDog v.4.0 has this options though (Not 100% sure). Download it at the Main Techgear Site.
Edited Sep 18, 2004 8:32 PM by Absorbx_o

"Be more concerned with your character than your reputation

because your character is who you really are while your reputation is merely what others think of you."

 

DesolateMx 8.0

there is an addon in the addons section of this forum to do that

My code does NOT have bugs. It just develops random features.

I just tried looking for it and couldn't find it. Is it possible that you could point me to it Ozzy? Thanks smile.gif

I knew I had it buried somewhere laugh.gif

alias profileinfo {
 if ($prop == puid) { return $gettok($right($gettok($1,3,47),-10),1,38) }
 if ($prop == userget) { return $gettok($1,3,47) }
}
alias profile { sockopen $+(profile.,$1) chat.msn.com 80 }

raw 818:*:{ if (%inpuid $+ $2) { unset %inpuid $+ $2 | writeini PUID.ini PUID $2 $4 | profile $2 } }

on *:JOIN:*:{ if ($nick != $me) { set -u6 %inpuid $+ [ $nick ] $true | prop $nick PUID | window -h @hiddenwindow } }

on *:SOCKOPEN:profile.*:{ sockwrite $sockname GET /profile.msnw?epuid= $+ $readini(PUID.ini,PUID,$gettok($sockname,2,46)) HTTP/1.1 $+ $crlf $+ Accept: */* $+ $crlf $+ Accept-Language: en-us $+ $crlf $+ User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0) $+ $crlf $+ Host: chat.msn.com $+ $crlf $+ Connection: close $+ $crlf $+ $crlf }
on *:SOCKOPEN:profile2.*:{ sockwrite $sockname GET / $+ $readini(PUID.ini,UserGet,$gettok($sockname,2,46))  HTTP/1.1 $+ $crlf $+ Accept: */* $+ $crlf $+ Accept-Language: en-us $+ $crlf $+ User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0) $+ $crlf $+ Host: members.msn.com $+ $crlf $+ Connection: close $+ $crlf $+ $crlf }
on *:SOCKREAD:profile.*:{
 if ($sockerr > 0) return
 var %t | sockread %t
 while ($sockbr > 0) {
   tokenize 32 %t
   if ($1 == LOCATION:) {
     writeini PUID.ini Redirect $gettok($sockname,2,46) $1- | writeini PUID.ini UserGet $gettok($sockname,2,46) $profileinfo($readini(PUID.ini,Redirect,$gettok($sockname,2,46))).userget
     remini PUID.ini Redirect $gettok($sockname,2,46) | sockopen profile2. $+ $gettok($sockname,2,46) members.msn.com 80
     return
   }
   sockread %t
 }
}
on *:SOCKREAD:profile2.*:{
 if ($sockerr > 0) return
 var %x | sockread %x
 while ($sockbr > 0) {
   .echo @hiddenwindow $regsub(%x,/(<[^>]+>)/g,,%output)
   if (*Take*a*look*at*my* iswm %output) { 
     %pro = $remove($gettok($remove(%x,	<font class=viewDesc>Take a look at my </font>,<A class=viewDesc title,",=),1,32),")
     echo -a $gettok($sockname,2,46) $+ 's Profile Link is: %pro
     if (*cam* iswm %pro) { kick $comchan($me,1) $gettok($sockname,2,46) no spam links in profile " $+ %pro $+ " }
   }
   if (%rn == on) { unset %rn | echo -a $gettok($sockname,2,46) $+ 's Real name is: $remove(%x,$chr(9),</td>) }
   if (*Real*Name:* iswm %output) { set -u1 %rn on }
   if (%age == on) { unset %age | echo -a $gettok($sockname,2,46) $+ 's Age is: $remove(%x,$chr(9),</td>) }
   if (*Age:* iswm %output) { set -u1 %age on }
   if (%loc == on) { unset %loc | echo -a $gettok($sockname,2,46) $+ 's Location is: $remove(%x,$chr(9),</td>,<br>) }
   if (*Location:* iswm %output) { set -u1 %loc on }
   if (%ms == on) { unset %ms | echo -a $gettok($sockname,2,46) $+ 's Martial Status is: $remove(%x,$chr(9),</td>,<br>) }
   if (*Marital*Status:* iswm %output) { set -u1 %ms on }
   if (%gn == on) { unset %gn | echo -a $gettok($sockname,2,46) $+ 's Gender is: $remove(%x,$chr(9),</td>,<br>) }
   if (*Gender:* iswm %output) { set -u1 %gn on }
   if (%oc == on) { unset %oc | echo -a $gettok($sockname,2,46) $+ 's Occupation is: $remove(%x,$chr(9),</td>,<br>) }
   if (*Occupation:* iswm %output) { set -u1 %oc on }
   .sockread %x
 }
}

The addon Ozzy was thinking of opened the user's profile in a webpage, whereas the above will display it in a window. I do believe the addon was made by Vawluum (a similar one was made by someone else but I'm 95% sure the above was his because I used his for my unreleased, wannabe-release connection [if that makes sense])

 

You can easily modify it to show only the asl in the active window

 

Yeah, I only want to display the A/S/L or something like that.

 

I really appreciate you posting this. Now to try and edit it to do only what I want and make use of it. I presume I can just put this under popups?

Hmmmm. It doesn't work in Hybrid for some reason. I put it in popups. What am I missing?

if you have access to Rumbaar's Place of Whatever, download this.

 

http://www.rumbaar.net/public/modules.php?...eScan#dldetails

 

it does what you want, plus more, but it also has the ability to turn things off and on very easily, as well as changing what the responces are.

Yes, that is the one I was originally using. It is very good, but it won't echo the results to everyone, just to the hosts or the guest who is joining.

 

Can you help me edit it to display to everyone in the room? I've been trying for a couple of hours now and can't figure it out.

Here's an edit of the bottom section, for displaying age, gender and location:

on *:SOCKREAD:profile2.*:{
if ($sockerr > 0) return
var %x | sockread %x
while ($sockbr > 0) {
  .echo @hiddenwindow $regsub(%x,/(<[^>]+>)/g,,%output)
  if (%age == on) { unset %age | var %a = $remove(%x,$chr(9),</td>) }
  if (*Age:* iswm %output) { set -u1 %age on }
  if (%loc == on) { unset %loc | var %l = $remove(%x,$chr(9),</td>,<br>) }
  if (*Location:* iswm %output) { set -u1 %loc on }
  if (%gn == on) { unset %gn | var %s = $remove(%x,$chr(9),</td>,<br>) }
  if (*Gender:* iswm %output) { set -u1 %gn on }
  .sockread %x
   if (%a) && (%s) && (%l) say $gettok($sockname,2,46) $+ 's asl is $+(%a,/,%s,/,%l)
   if (%a) && (%s) && (!%l) say $gettok($sockname,2,46) $+ 's %a years old and is %s but I don't know their location.
   if (%a) && (!%s) && (%l) say $gettok($sockname,2,46) $+ 's %a years old and lives in %l but I don't know their gender.
   if (%a) && (!%s) && (!%l) say $gettok($sockname,2,46) $+ 's %a years old but I don't know their gender or location.
   if (!%a) && (%s) && (%l) say $gettok($sockname,2,46) $+ 's %s and lives in %l but I don't know their age.
   if (!%a) && (%s) && (!%l) say $gettok($sockname,2,46) $+ 's %s but I don't know their age or location.
   if (!%a) && (!%s) && (%l) say $gettok($sockname,2,46) lives in %l but I don't know their age or gender.
   if (!%a) && (!%s) && (!%l) say I don't know $gettok($sockname,2,46) $+ 's asl.
}
}

That should do the trick.

 

Ok, I edited it, but it still does not display any info in the channel.

 

I'm using Hybrid in a Group chat. I put your script into the popups section.

 

What is it that I'm doing wrong?

I guess you can laugh at me, cuz I clearly suck or something. :S

 

What about modifying the other script that Gate Keeper posted to display the info in channel, and not just to the hosts?

Edited Sep 19, 2004 12:43 AM by drfeelgood

i guess u shud use $comchan instead of $chan in the /echo or /msg commands

on me:*:join:#:hop #

Wow, you guys are blind, his problem is clearly he has it in the popups section, put it in remotes feelgood.

Thanks for all the help guys. We're up and running smile.gif

Thanks for all the help guys. We're up and running smile.gif

It'd be beneficial for other people for future reference to say exactly what you used in the end (ie: what addon is it that is "up and running"?)

 

Yeah, thats useful. Plus if you decide to, you should submit it to Techgear if it isn't already because this question appears in a lot of places. Everyone is trying to do it lol. Personally I don't see the fascination but whatever floats your boat lol_sign.gif

"Be more concerned with your character than your reputation

because your character is who you really are while your reputation is merely what others think of you."

 

DesolateMx 8.0