diff --git a/exec/newuser.src b/exec/newuser.src index 3ec7e7bfb86fe40475e9471f0fc5e079af644429..fa55920f3908b875d3c612b2eff33eeffcdf97b4 100644 --- a/exec/newuser.src +++ b/exec/newuser.src @@ -1,3 +1,11 @@ +# newuser.src + +# New user login module + +# $Id$ + +# @format.tab-size 8, @format.use-tabs true + !include sbbsdefs.inc cls @@ -8,7 +16,7 @@ set_user_string USER_STRING_ADDRESS int i qnet str tmp -no_yes "\r\nIs this account for QWK Networking (PonyNet, Dove-Net, etc..) \1w\1iONLY\1n\1h\1b" +no_yes "\r\nIs this account to be used for QWK Networking (DOVE-Net)\1b" if_false no_yes "\r\nARE YOU \1wPOSITIVE\1n\1h\1b (If you're unsure, press '\1wN\1b')" if_false @@ -91,52 +99,10 @@ if_true return end_if toggle_user_flag 1 S -yes_no "\r\nDo you wish to access the Synchronet BBS List database" -if_true - exec_xtrn SBL +compare_ars "REST Q" +if_false + yes_no "\r\nDo you wish to access the Synchronet BBS List database" + if_true + exec_xtrn SBL + end_if end_if - - -!include file_io.inc -!include sbbsdefs.inc - -int msg_file -int tmpfile -str tmp - -:newuser_msg -fopen tmpfile O_CREAT|O_TRUNC|O_WRONLY "%nnewuser.tmp" - if_false - printf "\r\nError opening TMP File!\r\n" - return - else - fprintf tmpfile "%%a\r\n%%1\r\nPony's Corral BBS\r\n1\r\nWelcome NewUser!" - fclose tmpfile - end_if - - - fopen tmpfile O_CREAT|O_TRUNC|O_WRONLY "%nemail.bat" - if_true - sprintf str "%%!smbutil.exe i%%znewuser.txt %%jmail.shd < %%nnewuser.tmp" - fprintf tmpfile "%s" str - fclose tmpfile - sprintf str "%%nemail.bat" - exec "%s" - sprintf str "%%nemail.bat" - remove_file str - else - printf "\r\nError opening TMP File!\r\n" - end_if - -cls -print "\r\n\r\nhbююююююююююююююююююююююююююююююююююююю" -print "\r\n\1n\1k7You have new Email which must be Readn" -print "\r\nhbююююююююююююююююююююююююююююююююююююю\r\n\r\n" -pause -mail_read - - -return - - -#end Newuser