Author Topic: Set Info Script  (Read 1959 times)

j4ck

  • Newbie
  • *
  • Posts: 14
Set Info Script
« on: October 20, 2011, 03:18:22 PM »
well, for some reason i cant make a new topic in the Uploaded Scripts Section, so ill post it Here!

What my script does is when someone joins if they have made any info, it displays it.
You can change the info at any time!
Example
Code: [Select]
[b][J4cK][/b]<-- That Guy Is So BOSSS!!!
ok so heres the code:
Code: [Select]
Dim joininfo, botmask
'BotMask is the mask you would like so for example, if i want * as my mask, the *setinfo would be my command, if i wanted ! as my mask, !setinfo would be my command
botmask="*"
Sub ONJOIN(Nickname,Host,Channel,ServerNumber)
joininfo=GetINIFile("joininfo.ini",NickName,nothingness,"")
If Not joininfo="" Then
SendCommand "/msg " & Channel & " [" & NickName & "]" & joininfo & "",ServerNumber
End If
End Sub

Sub ONTEXT(Message,Channel,Nickname,Host,ServerNumber)
If Left(lcase(Message),8)=botmask & "setinfo" then
WriteIniFile"setjoin.ini",NickName,nothingness,Mid(Message,10)
SendCommand "/msg " & Channel & " Info Saved",ServerNumber
SendCommand "/timer joindelay 1 3 /msg " & Channel & " Your Info Is: " & joininfo & "",ServerNumber
End If
End Sub
End If

Thumbs up if any one can move it to the uploaded Scripts section?