Page Script
Posted by JcD
Thursday, September 08, 2005
Description: Page Script

My first page script.

When someone pages you they can also leave a message.
Page messagehere.

If they type that in the private message it'll leave you the message in the page aswell as the time, date and the name of the person who pmed u.

on *:TEXT:*:?:{
  if (page == $1) {
    msg $me ----------------------------------------------------------------
    msg $me ---
    msg $me --- $nick has paged you
    msg $me --- $asctime(hh:nn) $+ , $date $+,
    msg $me ---
    msg $me --- Message: $2-
    msg $me ---
    msg $me ----------------------------------------------------------------
    msg $nick Thank you for pagging me $nick $+, il make sure to respond as soon as i can.
  }
}
on *:OPEN:*:{
  if ($me == $1) { HALT } {
    msg $nick [^K]9,1[^B][^U]([^U][^B] [^B][^U]H[^K]0[^U][^B]ello[^K]9[^B] $nick $+ [^B][^K]14,[^K]0 I am currently busy at the moment [^K]9[^B][^U])[^U][^B]
    msg $nick [^K]9,1[^B][^U]([^U][^B] [^B][^U]I[^K]0[^U][^B] currently have $query(0) Message(s) open so please be paitent [^K]9[^B][^U])[^U][^B]
    msg $nick [^K]9,1[^B][^U]([^U][^B] [^B][^U]P[^K]0[^U][^B]lease type Page -messagehere- to leave a message and il pm you A.S.A.P [^K]9[^B][^U])[^U][^B]
  }
}
Remake
Posted by JcD
Saturday, September 10, 2005 09:25am PDT
Here is my remake with a pager window.

////////////////////////////////////////
////
//// Created By JcD
////
//// Edited By OTHello
////
////////////////////////////////////////

menu status,pager,@pager {
  -
  Pager
  .pager window:{
    if (!$window(@pager)) {
      pager
      halt
    }
    else {
      echo -a The pager window is already open
    }
  }
}
on *:TEXT:*:?:{
  if (page == $1) {
    page $nick $2-
  }
}

alias pager {
  window -e @pager
  aline @pager -------------------------------------------
  aline @pager ---
  aline @pager --- Just loaded Pager Script
  aline @pager ---
  aline @pager --- Created by JcD
  aline @pager ---
  aline @pager -------------------------------------------
}

alias page {
  if (!$window(@pager)) {
    winsow -e @pager
  }
  else {
    aline @pager -------------------------------------------
    aline @pager ---
    aline @pager --- $1 has just paged you.
    aline @pager --- $asctime(hh:nntt) $+ , $date(m/d/yyyy) $+
    aline @pager ---
    aline @pager --- Message: $2-
    aline @pager ---
    aline @pager -------------------------------------------
  }
}
Remake
Posted by Othello
Saturday, September 10, 2005 09:27am PDT
=]
Submit a comment
Oops! You need to login or register before you can post a comment!

ebaum's world