Skip to content
MSN Addons

Looking for !profile

A TG007 community discussion started by tom718.

Discussion 20 posts
Page 1 of 1
Open
Topic #1256 · 20 published posts · 2,223 views

Hey guys I am very very new to this msn group irc thing.... I would like to add !profile to my Group room. Would someone please lead me in the right direction. smile.gif

 

 

Thanks for your help.... I've learned alot from this site already in the past week.

 

Tom718

 

that can be done, but waht do you wnat it to do, tell if there profile is male/female/unknown, and if they have a pic, there age, or what? lol

No Anthony. He wants it to give the link of the profile. Ozzy has one somewhere..

on *:!profile *:#: { 
if ($2 == $null) { /msg $chan Please specify the nickname you wish to view. }
else { 
set -u3 %pronick $2
set -u3 %prochan $chan
set -u3 %profile. [ $+ [ $2 ] ] $true
.sockwrite -tn msn.server. $+ $cid prop %pronick PUID 
}
}

raw 818:*:{ 
 if ($3 != MSNPROFILE) && (%profile. [ $+ [ $2 ] ]) {
   var %x http://chat.msn.com/profile.msnw?epuid= $+ $4-
   /msg %prochan %nick $+ 's Profile: %x
 } 
 haltdef 
} 

 

untested, and done in like 2 mins so yea, should do the trick, but if it doesn't, you know why, because its untested. If you are using vincula, find the raw 818 code and put this in on the top line.

 

if (%profile. [ $+ [ $2 ] ]) { haltdef | return }

Edited Aug 25, 2004 1:23 PM by The Gate Keeper

#profilecheck on 
on *:TEXT:!Profile*:*:{ 
 if ($2 ison $comchan($nick,1)) { 
   set %pflshw $true 
   set -u15 %nowhisp $true 
   set %pronick $nick 
   PROP $2 PUID
 } 
 else { 
   .notice $nick Cannot find " $+ $2 $+ " in the room, please make sure you have the nickname exactly how it appears in the room. 
 } 
} 
raw 818:*: { 
 if ($3 == PUID) && (%prfoj) { 
   $opmsgprf 
   %msnc.stoppropend = $true 
   timerclose 1 5 close -@ *Vincula* 
   haltdef 
 } 
 if ($3 == PUID) && (%pflshw) { 
   .notice %pronick $2 $+ 's Profile link = http://members.msn.com/default.msnw?mpp= $+ $4- 
   %msnc.stoppropend = $true 
   timerclose 1 5 close -@ *Vincula* 
   closemsg %pronick
   unset %pflshw 
   unset %pronick 
   haltdef 
 } 
}


ctcp *:ERR*:*: { 
 if ($2 == NOUSERWHISPER) && (%nowhisp) { 
   msg $comchan($nick,1) $nick $+ , please enable your whispers to view profiles :D
   unset %pflshw 
   unset %nowhisp 
 } 
} 

#profilecheck end

 

;By Rümßäär http://www.rumbaar.vze.com

 

Custom Computer

AMD Athlon 64 x2 Dual Core 5200+

Asus M2N-SLI MOB

2GB DDR2 @ 800mhz

160GB Hard Drive

NVidia GeForce 8400GS 256

Thank You Gate Keeper smile.gif I'm gonna give it a try. I will post my results.

 

 

Thanks again

 

Tom718

I'm alittle confused how to apply that script to my script... Would u please explain alittle more... I know that u need to copy and paste it to notepad and save it as "whatever.mrc"... I then click remote script and load the .mrc and click ok...

 

 

I have two questions...

 

A. Did I do the above right???

 

B. How would I find the raw 818 code so i can insert that data.

 

 

 

Thanks a bunch.

 

Tom

I really think you should try the code i have posted as i dont think gatekeepers wont work..but what i do know..

Custom Computer

AMD Athlon 64 x2 Dual Core 5200+

Asus M2N-SLI MOB

2GB DDR2 @ 800mhz

160GB Hard Drive

NVidia GeForce 8400GS 256

Molson... I took your advice and tried the code u posted above... I gotta say that code u posted got the farthest... What happens is when a user in the group types

!profile Usernic..... It opens the profile but the only problem the user don't see that and the bot does. What i am looking for is this...

 

 

1. User whispers the bot with the command: !profile usernic

 

2. The bot whispers back the link to the profile.

 

 

Thanks for all your help without this site i would be lost.

 

 

Thanks again

 

Tom

 

Oh and I am using Kenobi_Script_final By Ozzy10

Thanks Ozzy for the great script.... U THE MAN!

Molson another problem I see... Any new users that join the group aren't able to type !profile usernic and have the bot see it until after i restart the bot... Does this make sence???

 

 

I also wouldn't mind having the users type that command in the main chatroom. All i would like is to be able to view profiles without having the users leave the channel or having to search for them.

 

Thanks again... I'm a rookie with this stuff and all your guys help is really Appreciated thanks for helping out a newbie... smile.gif

 

 

Tom

the code works both in whispers and main screen. if the user has their whispers off they wont see it. If Ozzy read this thread he can maybe help you with the problem cause it is script and i dont use kenboi.

Edited Aug 29, 2004 10:45 PM by Molsonâ„¢

Custom Computer

AMD Athlon 64 x2 Dual Core 5200+

Asus M2N-SLI MOB

2GB DDR2 @ 800mhz

160GB Hard Drive

NVidia GeForce 8400GS 256

try type in room , @profile test , i cant remember if i added the profile thing in kenobi lol

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

Thanks Ozzy for the reply... I've tried @profile test and it doesn't seem to do anything. I'm all about learning here so would love to learn how to do this...

 

 

Thanks Again

 

Tom718 smile.gif

 

if i get chance i will change kenobi , but am a bit busy at minute

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

Thanks Bro.... I will be looking for it...

 

 

Thanks again for everyones help...

 

Tom718

OK Guys... Update... I just got !profile working with the below script. I take no credit in writing it. The problems i see with this code is a few things.

 

 

1. When new members joins the room it posts there profile link onjoin. Is there a way to remove that?

 

2. When a user type !profile Nic it posts the link twice in the main room. Is there a way to have it whisper back the user.

 

 

Thanks again for everyone's help... This site is cool i wouldn't have gotten this far without the help of others and this site itself... smile.gif

 

Tom718

 

 

#puid on

on *:JOIN:* {

if ($nick != $me) && (> !isin $nick) {

prop $nick PUID

}

}

on *:TEXT:!Profile*:*:{

if ($2 ison $comchan($nick,1)) {

set %pflshw $true

set %pronick $nick

PROP $2 PUID }

else { .notice $nick Cannot find " $+ $2 $+ " in the room, please make sure you have the nickname exactly how it appears in the room. }

}

raw 818:*: {

if ($3 == PUID) && (!%pflshw) {

msg $comchan($2,1) $2 $+ 's (i)PROFILE-LINK(i) CLICK HERE----> http://chat.msn.com/profile.msnw?epuid= $+ $4-

%msnc.stoppropend = $true

timerclose 1 5 close -@ *Vincula*

haltdef

}

if ($3 == PUID) && (%pflshw) {

.notice %pronick $2 $+ 's Profile link = http://members.msn.com/default.msnw?mpp= $+ $4-

%msnc.stoppropend = $true

timerclose 1 5 close -@ *Vincula*

unset %pflshw

unset %pronick

haltdef

}

}

#puid end

 

uk users need to change this line

 

http://chat.msn.com/profile.msnw?epuid= $+ $4-

 

 

for this line

 

 

http://chat.msn.ca/profile.msnw?epuid= $+ $4-

 

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

ok i got deleted:

 

on *:JOIN:* {

if ($nick != $me) && (> !isin $nick) {

prop $nick PUID

 

and was able to remove the onjoin message... smile.gif

 

Now I am trying to figure out why it sends the link twice in the main room when u type !quote nic

 

Any idea's anyone...

 

 

Thanks again

 

Tom

woot_jump.giffixed.gif

 

Thanks I solved my own problems... I did my own edits and fixed the problems i was having... Now Only if i can have it whisper the user, But i am happy with what i have really. Thanks again for everyone's help with the problem.

 

 

 

This is not my code... I just edited it to suit my needs...

 

Thanks again

 

Tom718

 

 

#puid on

 

}

raw 818:*: {

if ($3 == PUID) && (!%pflshw) {

msg $comchan($2,1) $2 $+ 's (i)PROFILE-LINK(i) CLICK HERE----> http://chat.msn.com/profile.msnw?epuid= $+ $4-

%msnc.stoppropend = $true

timerclose 1 5 close -@ *Vincula*

haltdef

}

if ($3 == PUID) && (%pflshw) {

.notice %pronick $2 $+ 's Profile link = http://members.msn.com/default.msnw?mpp= $+ $4-

%msnc.stoppropend = $true

timerclose 1 5 close -@ *Vincula*

unset %pflshw

unset %pronick

haltdef

}

}

#puid end

 

Try This, It's A Little More Advaced Then The Others. Use Partial Names And Emails

If It Finds More Then One Nick That Could Be What You Are Looking For It Will List And Let The Person Pick From That.

Usage " !pro nick " To Whisper " !spro Nick " To Say In Room

 

on *:TEXT:!*Pro*:*:{ 
 set %whocheckpro $iif(spro isin $1,msg $comchan($nick,1),notice $nick)
 if (@ isin $2) {
if ($right($2,8) != @msn.com) || ($right($2,12) != @hotmail.com) { halt }
   if (@hotmail.com isin $2) {
     %whocheckpro Check out $remove($2,@hotmail.com) @ http://members.msn.com/ $+ $2 | halt
   }
   else if (@msn.com isin $2) {
     %whocheckpro Check out $remove($2,@msn.com) @ http://members.msn.com/ $+ $2 | halt
   }
 }
 if ($2 == me) { set %pronick $nick | set %whocheckpro msg $comchan($nick,1) S eCourier\bNew;0 | PROP $nick PUID | halt }
 if ($ialchan($+(*,$2,*),$chan,0) == 0) { msg $comchan($nick,1) Sorry $nick But There Where No Matches Found | halt }
 if ($ialchan($+(*,$2,*),$chan,0) == 1) { set -u3 %othercheckpro $true | set %pronick $2 | PROP $2 PUID | halt }
 if ($ialchan($+(*,$2,*),$chan,0) > 1) {
   set %a 1
   set %prosnick $getdecodenick($2)
   set %prosnicknum $ial($+(*,$getdecodenick($2),*),0)
   notice $nick Who Are You Looking For [-Say ~show (number)-]
   while (%a <= %prosnicknum) {
     set %prosnicklist $+ %a $ial($+(*,$2,*),%a).nick
     notice $nick %a ~*~ $ial($+(*,$2,*),%a).nick
     inc %a
   }
   enable #shownumpro
   halt
 }
}

#shownumpro off
on *:TEXT:~show *:#: {
 if ($nick !isin %whocheckpro) { notice $nick Wait Your Turn :| | halt } 
 if ($2 !isnum) || (($2 == 0) || ($2 > %prosnicknum)) { notice $nick $iif($2 !isnum,Dude I Said Number Not Letter :|,That Number Was Not Posted | halt }
 else { set -u3 %othercheckpro $true | set %pronick $var($+($chr(37),prosnicklist,$2),1).value | PROP $var($+($chr(37),prosnicklist,$2),1).value PUID | /disable #shownumpro | halt }
}
#shownumpro end

;;In Vincula Look For " raw 818 " And Replace It With This 
raw 818:*: {
 if ($3 == PUID) {
   if (%othercheckpro != $null) {
     %whocheckpro %pronick $+ 's Profile link = http://members.msn.com/default.msnw?mpp= $+ $4- 
     halt
   }
   else {
     echo $color(info2) -at * Opening $msn.ifdecode($2) $+ 's profile...
     var %m, %c, %x, %p http://chat.msn.com/profile.msnw?epuid= $+ $4- , %w @Vincula -  $+ $msn.ifdecode($2) $+ 's Profile
     window -pk0 %w
     %m = $msn.ndll(attach,$window(%w).hwnd)
     %m = $msn.ndll(select,$window(%w).hwnd)
     %m = $msn.ndll(handler,msn.hnd.prof)
     %m = $msn.ndll(navigate,%p)
     %msnc.stoppropend = $true
     haltdef
   }
 }
 elseif (($3 == MSNPROFILE) && ($window($msn.get($cid,room)))) {
   if ($4 == 1) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) has a regular profile
   elseif ($4 == 3) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) $+ 's profile says he is male
   elseif ($4 == 5) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) $+ 's profile says she is female
   elseif ($4 == 9) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) has a picture in his or her profile
   elseif ($4 == 11) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) $+ 's profile has a picture, and says he is male
   elseif ($4 == 13) echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) $+ 's profile has a picture, and says she is female
   else echo $color(info2) -t $msn.get($cid,room) * $msn.ifdecode($2) does not have a profile
   %msnc.stoppropend = $true
   haltdef
 }
}

 

Bry`