[Redraw]
ansi = 1 view "/osbbs/screens/mail.ansi"
ansi = 0 view "/osbbs/screens/mail.ascii"

interrupt 1 
select key "raw lebins"
interrupt 0

key = " " jump Redraw
key = "n" readnewmail
key = "a" readallmail
key = "w" jump BBSMail
key = "b" menu /osbbs/menus/main
key = "i" jump NetMail
key = "s" jump SysOpMail
key = "r" jump BugReport
key = "e" jump EditSig
jump Redraw

[BBSMail]
echo "$grey$Write to which user: $yellow$"
getstring touser 40
touser = "Empty" jump Redraw # Note the capital E

echo "\n$grey$Subject: $yellow$"
getstring subject 40
subject = "empty" set subject "None"

mailbbs
exitcode = 2 echo "\n$bred$No such user." getkey tmp
exitcode = 1 log "local mail error"
exitcode = 1 echo "\n$bred$Error. Please notify the sysop." getkey tmp

jump Redraw

[NetMail]
echo "$grey$Enter internet address: $yellow$"
getstring netuser 80
netuser = "empty" jump Redraw # Note the lowercase e

echo "\n$grey$Subject: $yellow$"
getstring subject 40
subject = "empty" set subject "None"

mailsmtp
exitcode = 1 log "net mail error"
exitcode = 1 echo "\n$bred$Error. Please notify the sysop." getkey tmp

jump Redraw

[SysOpMail]
echo "$grey$Subject: $yellow$"
getstring subject 40
subject = "empty" jump Redraw

set touser "exile"
mailbbs
exitcode = 1 log "local mail error"
exitcode = 1 echo "\n$bred$Error. Please panic." getkey tmp
jump Redraw

[BugReport]
set netuser "exile@chamber.ee"
set subject "Onyx Sidewinder BBS Bug report"
mailsmtp

exitcode != 0 echo "\cWhoops... guess you wanted to report a mailer bug ;-)\n"
exitcode != 0 getkey tmp
jump Redraw

[EditSig]
ansi = 0 echo "Sorry, you need ANSI to edit your signature :-(\n" 
ansi = 0 getkey tmp jump Redraw
editsig
jump Redraw 