All pastes #767512 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-11-09 20:29 UTC
rendered paste body
menu * { 
  Amsg:/dialog -m amsg amsg
} 
dialog amsg { 
  title "Multi Purpose" 
  size -1 -1 112 112 
  option dbu
  Tab "Amsg", 1, 0 0 112 112
  Tab "Memoserv", 2, 5 5 112 112
  Button "AFK", 3, 7 25 42 16, flat tab 1
  Button "Food", 4, 7 45 42 16, flat tab 1
  Button "Soccer", 5, 59 25 42 16, flat tab 1
  Button "Other", 6, 59 45 42 16, flat tab 1
  Edit "Put Away Message Here", 7, 7 65 100 16, autohs tab 1
  Button "Set Back", 8, 7 84 95 16, flat tab 1
  Text "Made by Abiotic Soul", 9, 32 100 95 8, tab 1
  Edit "User", 10, 7 30 49 10, autohs tab 2
  Box "MemoServ Commands:", 11, 0 17 110 110, tab 2
  Edit "Message", 12, 7 45 49 35, autohs tab 2
  Button "Send Memo", 13, 7 84 49 16, flat tab 2
  box "Amsg Commands:", 14, 0 17 110 110, tab 1
  Button "List All Memos", 15, 59 30 49 10, flat tab 2
  Button "Read Memo #", 16, 59 45 49 10, flat tab 2
  Edit "#", 17, 77 55 10 10, autohs tab 2
  Button "Delete Memo #", 18, 59 65 49 10, flat tab 2
  Edit "#", 19, 77 75 10 10, autohs tab 2
  Button "Delete All", 20, 59 87 49 10, flat tab 2
  Text "Made by Abiotic Soul", 21, 32 100 95 8, tab 2,
} 
on *:dialog:amsg:sclick:3: { 
  /amsg 7[Amsg7] AFK 3[1 I left at $time(hh:nn:ss) 3] | inc -c %atime
  /away 4AFK 
} 
on *:dialog:amsg:sclick:4: { 
  /amsg 7[Amsg7] Eating 3[1 I left at $time(hh:nn:ss) 3] | inc -c %atime
  /away 4Eating 
} 
on *:dialog:amsg:sclick:5: { 
  /amsg 7[Amsg7] Soccer Game 3[1 I left at $time(hh:nn:ss) 3] | inc -c %atime
  /away 4Soccer Game
} 
on *:dialog:amsg:sclick:6: { 
  /amsg 7[Amsg7] $did(7) $2- 3[1 I left at $time(hh:nn:ss) 3] | inc -c %atime
  /away $did(7) $2-
} 
on *:dialog:amsg:sclick:8: { 
  /away
  /amsg 7[Amsg7] I'm back. 3[1 I was gone for $duration(%atime) 3] | unset %atime 
} 
on *:dialog:amsg:sclick:13: { 
  /msg memoserv send $did(10) $did(12)
}
on *:dialog:amsg:sclick:15: { 
  /msg memoserv list
}
on *:dialog:amsg:sclick:16: { 
  /msg memoserv read $did(17)
}
on *:dialog:amsg:sclick:18: { 
  /msg memoserv del $did(19)
}
on *:dialog:amsg:sclick:20: { 
  /msg memoserv del all
}