All pastes #466879 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-05-02 04:44 UTC
rendered paste body
menu * {
  Memo Dialog
  ..Version V.10: Dialog -m MemoServ MemoServ
}
dialog MemoServ {
  title "Halo3_Fanatic's Memo Serv V.10"
  size -1 -1 149 95
  option dbu
  button "Halo3_Fanatic's MemoServ Version V.10", 3, 7 2 137 12
  button "Send Memo", 5, 32 23 37 12
  button "Cancel Memo", 6, 73 23 37 12
  button "List Memo's", 7, 32 37 37 12
  button "Read Memo", 8, 73 37 37 12
  button "Del Memo", 9, 32 51 37 12
  button "Memo Options", 10, 73 51 37 12
  button "Info", 11, 32 64 37 12
  button "Check", 12, 73 64 37 12
  button "Read Memo's", 15, 51 78 37 12
  box "MemoServ Options", 4, 30 16 84 77

}


dialog Memo_Options {
  title "Memo Options"
  size -1 -1 107 91
  option dbu
  button "[Halo]'s Memo Options", 1, 8 4 93 12
  box "Limit", 2, 26 17 50 26
  button "Limit Memo's", 3, 33 25 37 12
  box "Notify", 4, 26 46 50 37
  button "On", 5, 33 54 37 12
  button "Off", 6, 33 68 37 12
  button "?", 7, 77 24 11 12
  button "?", 8, 77 69 11 12
}
dialog LimitHelp {
  title Limit Help
  size -1 -1 107 54
  option dbu
  box "Limit Memo's Help", 1, 1 1 105 87
  text "Limit Help: Sets the maximum number of memos you (or the given channel) are allowed to have. If you set this to 0, no one will be able to send any memos to you. However, you cannot set this any higher than 20.", 2, 4 8 99 42
}
dialog NotifyHelp {
  title NotifyHelp
  size -1 -1 107 73
  option dbu
  box "Notify Memo Help", 1, 1 0 105 71
  text "Notify ON Help: You will be notified of memos when you log on,  when you unset /AWAY, and when they are sent to you.", 2, 4 7 99 29
  text "Notify OFF Help: You will not receive any notification of memos.", 3, 4 41 99 27
}
dialog Read {
  title "Reading Memo's"
  size -1 -1 149 95
  option dbu
  button "Read A Memo", 1, 4 4 53 12
  list 2, 4 20 136 71, size
}

on *:DIALOG:MemoServ:sclick:5:{ ms send $$?="NickName To Send Memo To" $$?="Message To Memo"  } 
on *:DIALOG:MemoServ:sclick:6:{ ms cancel $$?="NickName/Channel That You Want To Cancel" }
on *:DIALOG:MemoServ:sclick:7:{ ms list }
on *:DIALOG:MemoServ:sclick:8:{ ms read $$?="Number Of Memo To Read" }
on *:DIALOG:MemoServ:sclick:9:{ ms del $$?="Number Of Memo To Delete" }
on *:DIALOG:MemoServ:sclick:10:{ dialog -x MemoServ MemoServ | dialog -m Memo_Options Memo_Options }
on *:DIALOG:MemoServ:sclick:11:{ ms info }
on *:DIALOG:MemoServ:sclick:12:{ ms check $$?="Nick You Want To Check If You Sent Memo To" }
on *:DIALOG:MemoServ:sclick:15:{ dialog -m Read Read }
on *:DIALOG:Memo_Options:sclick:3:{ ms set limit $$?="Number Of Limits You Want" }
on *:DIALOG:Memo_Options:sclick:5:{ ms set notify on }
on *:DIALOG:Memo_Options:sclick:6:{ ms set notify off }
on *:DIALOG:Memo_Options:sclick:7:{ dialog -m LimitHelp LimitHelp }
on *:DIALOG:Memo_Options:sclick:8:{ dialog -m NotifyHelp NotifyHelp }
on *:DIALOG:Read:sclick:1:{  }
on *:NOTICE:*:?: { if ($Nick == ChanServ) && (%check == true) { did -a Read 2 $1- }