CJG Away System

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	4.0
Scores Submitted	1
Date Added	Nov 18, 2007
Last Updated	Nov 18, 2007
Tags	away charltonj cjg g13aoustis system

Introduction

Just a simple away system CharltonJ and I made!

Grab the Code

on *:load: //echo -a $smb 4,1Thank You for Loading The CJG Away System Type /awaysys or right click in a channel and hit Away System to Run it 
dialog away {
  title "CJG Away System"
  size -1 -1 122 120
  option dbu
  radio "On", 5, 24 8 26 10, 
  radio "Off", 6, 72 8 26 10
  box "Away Logger", 7, 8 0 106 26
  text "Away Reason:", 1, 16 48 41 8, center
  text "Away Nick :", 2, 16 64 41 8, center
  edit %areason, 3, 56 48 50 10, autohs
  edit %anick, 4, 56 64 50 10, autohs
  box "Enter Your Reason And Nick", 8, 8 32 106 50
  button "Away", 10, 7 85 107 12, center
  button "Back", 11, 7 100 107 12, center
}

on *:dialog:away:edit:*: {
  if ($did == 3) { /set %areason $did(away,3) }
  if ($did == 4) { /set %anick $did(away,4) }
}

on *:dialog:away:sclick:*: {
  if ($did == 10) { /ame 4,1is now away! 0 %areason  0,1 4*CJG Away System* | /set %backnick $me | /nick %anick | set %mtime $ctime | .enable #away | window -aei @AwayLogs  }
  if ($did == 11) {    /ame 4,1is now back from away!0 %areason  4Duration: 0 $duration($calc($ctime - %mtime))   4*CJG Away System*  |  /nick %backnick | disable #away | /unset %anick | /unset %areason | /unset %mtime   }
}

on *:dialog:away:sclick:*: {
  if ($did == 5) { /set %log 1  }
  if ($did == 6) { /set %log 0 }
}

#away off
on *:text:*:?: { 
  if (%log == 1) { //echo @AwayLogs 4< $+ $nick $+ > $1- | /msg $nick I Am Not Away Your Messages Are Logged! | /close -m }
}
#away end

alias awaysys { 
  /dialog -m away away
}

menu channel  {
  -
  Away System: /awaysys
}

Comments

(1) RSS

Go to Bottom

CharltonJ

Comments: 37

mIRC Snippet: CJG Away System
Posted on Nov 18, 2007 2:17 pm

it's nice :P

CJG Away System

Introduction

Grab the Code

Comments

G13AoUsTiS

My Snippet Tags

Contact

Friends (2)

Sponsors


Last seen: Aug 28, 2008 Profile Friends (2) Snippets (36) Images (1) Comments Received (92) Comments Submitted (37)