View

Awayness 1.0

Snippet Author: ZabuzaMomochi
Rated:

Snippet Description: Just another away script.

on 1:load:{
  echo -a Awayness 1.0
  echo -a Author: ZabuzaMomochi
  echo -a Email: kakashi1948@Yahoo.com
  echo -a Usage: Type /adialog to open the awayness dialog.
}
alias Awayness {
  if (%Awaymsg == $null) {
    if (%Amsg == Yes) {
      Set %Away Yes
      Set %TimeToBeBack $$?="Around what time will you be back?"
      amsg 4,0I am away. Reason: %AAmessage On messenger: %Messenger Messenger ID: %messengerID I will be back around: %TimeToBeBAck
    } 
    if (%amsg == no) {
      set %Away Yes      
      Set %TimeToBeBack $$?="Around what time will you be back?"
      msg $Active 4,0I am away. Reason: %AAmessage On messenger: %Messenger Messenger ID: %messengerID I will be back around: %TimeToBeBAck
    }
  } 
  Elseif (%Awaymsg != $Null) {  
    if (%Amsg == Yes) {
      set %away Yes
      Set %TimeToBeBack $$?="Around what time will you be back"
      set %Awaymsg $$?="What is your away message?"
      Amsg 4,0I am away. Reason: %Awaymsg On messenger: %Messenger Messenger ID: %messengerID I will be back around: %TimeToBeBAck
    }
    If (%Amsg == no) {
      set %away Yes
      Set %TimeToBeBack $$?="Around what time will you be back"
      set %Awaymsg $$?="What is your away message?"
      msg $Active 4,0I am away. Reason: %Awaymsg On messenger: %Messenger Messenger ID: %messengerID I will be back around: %TimeToBeBAck
    }
  }
}
alias back {
  unset %Away
  unset %TimeToBeBack
  Amsg 4,0I am back from: %Awaymsg %AAmessage
  timer 1 3 unset %Awaymsg
}
menu channel,nicklist,status {
  Awayness 1.0: /Dialog -m awayness awayness
}
Dialog awayness {
  Title "Itachi's Away Dialog"
  size -1 -1 262 180
  option Dbu
  Button "Set away", 1, 0 0 70 12
  Button "Set Back", 2, 0 12 70 12
  Text "You are using Alkora's(Itachi's) Away system!", 3, 100 12 80 80
  Button "Messenger ON", 4, 192 0 70 12
  Button "Messenger OFF", 5, 192 12 70 12
  Text "Please put your messenger ID below:", 6, 90 50 90 15
  Edit "", 7, 90 60 100 10, autohs %MessengerID
  Button "Done!" 9, 115 100 40 20, ok
  Edit "", 10, 80 158 130 10, autohs %AAmessage
  Text "Enter auto away message below!", 11, 80 150 90 6
  Button "Amsg On", 12, 0 168 70 12
  Button "Amsg Off", 13, 192 168 70 12
}
on *:DIALOG:Awayness:*:*: {
  if ($Devent = Sclick) {
    If ($Did = 1) {
      if (%Away == Yes) {
        echo -a You're already away!
      }
      Else {
        awayness
      }
    }
    If ($Did = 2) {
      if (%Away == Yes) {
        Back
      }
      Else {
        echo -a Your not away!
      }
    }
    if ($did = 4) {
      set %Messenger Yes
    }
    if ($did = 5) {
      set %Messenger No 
    }
    if ($did = 12) {
      set %Amsg Yes
    }
    if ($did = 13) {
      set %Amsg No
    }
  } 
}
on *:OPEN:?: {
  if (%Away == Yes) {
    Msg $nick 4,0Sorry, i am currently away. Please wait until i set back. Thanks! ^-^
    close -m $nick
  }
}
on *:TEXT:*: {
  if ($me isin $1-) && (%away == Yes) {
    beep 5
    msg $chan 4,0 Sorry $nick $+ , but i am currently away. Thanks!
  }
}

Favorite Script -

Smilies	Message:
	Comments:

X-Static Codes

Search

Scripting

Links

Sponsors

Stats

View

Awayness 1.0