Bot Theme

Please Register to submit score.

Average Score	4.0
Scores Submitted	1
Date Added	Apr 20, 2008
Last Updated	Apr 20, 2008
Tags	.ini .txt bot irc jonesy jonesy44 mirc script theme

Introduction

A usefull little snippet for a multi channel bot, so that users may set a general theme for the bot

In each "msg $chan" or something like that you have on your bot, make it;

Code:

/msg $chan $theme $+ text...

to add the theme to the text for the channel

[b]**NOTE: This currently saves the themes to "bot/data/themes.fos". You may change the directory by editing this bit wherever you see it. Else use;

Code:

/mkdir bot

Code:

/mkdir bot/data

Enjoy, and post any feedback, comments, or possible ideas. thanks :-)

Grab the Code

;;                 V1.0                ;;
;;          Script by Jonesy44         ;;
;;            www.hawkee.com           ;;
;; irc.deltaanime.net:6667 - #Jonesy44 ;;
;;Theme set command
on *:TEXT:!theme*:#: {
  if (!$2) {
    msg $chan You can set $me $+ 's (Unique) theme for $chan by using: !Theme <Color Code> (You may add any extra words, such as "bold" or "line" to add text-decoration)
    msg $chan Color Codes: 1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10 11 11 12 12 13 13 14 14 15 15
    if ($theme) {
      msg $chan $theme $+ This current theme was set by ( $+ $theme(setby) $+ ) at ( $+ $theme(time) $+ ) on ( $+ $theme(date) $+ )
    }
  }
  else {  
    write -ds $+ $chan bot/data/themes.fos
    write bot/data/themes.fos $chan $time $date $nick $iif( isin $2- || bold isin $2-,,$null) $+ $iif( isin $2- || underline isin $2- || line isin $2-,,$null) $+  $+ $remove($2-,,,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z)
    msg $chan $theme $+ The theme has been set
  }
}

;;Theme Alias
alias theme {
  if (!$1) {
    if ($read(bot/data/themes.fos, s, $chan)) {
      return $gettok($read(bot/data/themes.fos, s, $chan),4-,32)
    }
  }
  if ($1 == setby) {
    return $gettok($read(bot/data/themes.fos, s, $chan),3,32)
  }
  if ($1 == time) {
    return $gettok($read(bot/data/themes.fos, s, $chan),1,32)
  }
  if ($1 == date) {
    return $gettok($read(bot/data/themes.fos, s, $chan),2,32)
  }
}

Comments

(2) RSS

Go to Bottom

Comments: 834

mIRC Snippet: Bot Theme
Posted on Apr 20, 2008 11:18 pm

o0o neat man im test XD

jonesy44

Comments: 644

mIRC Snippet: Bot Theme
Posted on Apr 21, 2008 7:48 am

cheers bud :P

Hope ya enjoy ;-)

Bot Theme

Introduction

Grab the Code

Comments

jonesy44

My Snippet Tags

Contact

Friends (17)

Sponsors

		Student UK
Last seen: Jul 07, 2008 Profile \| Website Friends (17) Snippets (32) Images (24) Reviews (1) Comments Received (391) Comments Submitted (644) Forum Posts (34)