• wcBASIC Snippet for MAIN.WCC

    From ROBERT WOLFE@44:901/0 to All on Tue Mar 3 11:39:00 2015
    I know that not many of you run Wildcat!, but this is the modding echo
    and what I am posting is a Wildcat! mod :) So here goes :)

    Ok, so a fellow WC! sysop was having an issue getting his PRELOG.SCR
    file (ANSI format) to display during the opening login sequence. So
    what I did was take an existing piece of the MAIN.WCC file (in the Plus
    Pack) which reads as follows:

    if DisplayFile("prelog") then
    print
    end if

    And wrote a wrapper around those lines as follows:

    // begin rwolfe 3-3-2015
    if AnsiDetected and exists("wc:\disp\prelog.scr") then
    WriteActivityLogEntry(" [MOD!] ANSI Detected and PRELOG.SCR
    detected!")
    dim ff as integer = freefile
    dim line as string = ""
    open "wc:\disp\prelog.scr" for input as #ff
    WriteActivityLogEntry(" [MOD!] PRELOG.SCR used!")
    while not eof(ff)
    input #ff, line
    print line
    wend
    close #ff
    print
    else
    if DisplayFile("prelog") then
    WriteActivityLogEntry(" [MOD!] PRELOG.BBS used!")
    print
    end if
    end if
    // end rwolfe 3-3-2015

    And it works fine according to the node activity logs. Just thought I
    would post this little tidbit of wcBASIC code for the day :) Use as you
    will.

    --- Platinum Xpress/Win/WINServer v3.0pr5
    * Origin: Omicron Theta | Memphis TN | winserver.us (44:901/0)
  • From dream master@44:100/0 to ROBERT WOLFE on Tue Mar 3 10:42:00 2015
    On 03/03/15, ROBERT WOLFE said the following...
    I know that not many of you run Wildcat!, but this is the modding echo
    and what I am posting is a Wildcat! mod :) So here goes :)

    what's wildcat? isnt that a movie? ;)

    |08 .|05|13|15Dr|07e|08am Ma|07st|15er|13|05|08.
    |08 |05|13 |13|05|08
    |11 DoRE|03!|11ACiDiC|03!|11Demonic |08<|15dreamland|09.|15darktech|09.|15org|08>

    --- Mystic BBS v1.10 (Windows)
    * Origin: |08--[|15!|07dreamland BBS dreamland.darktech.org (44:100/0)
  • From Al@44:250/0 to ROBERT WOLFE on Tue Mar 3 11:05:00 2015
    On 03/03/15, ROBERT WOLFE said the following...

    I know that not many of you run Wildcat!, but this is the modding echo
    and what I am posting is a Wildcat! mod :) So here goes :)

    I was looking for a wildcat.. but that's another thing.. :)

    Have you done up any mystic mpl stuff.. If you do I'd be intesested in looking..

    Ttyl :-),
    Al

    --- Mystic BBS v1.10 (Linux)
    * Origin: The Rusty MailBox - Penticton, B.C. Canada (44:250/0)
  • From mental block@44:100/2 to ROBERT WOLFE on Sat Mar 7 11:03:00 2015
    // begin rwolfe 3-3-2015
    if AnsiDetected and exists("wc:\disp\prelog.scr") then
    WriteActivityLogEntry(" [MOD!] ANSI Detected and PRELOG.SCR
    detected!")
    dim ff as integer = freefile
    dim line as string = ""
    open "wc:\disp\prelog.scr" for input as #ff
    WriteActivityLogEntry(" [MOD!] PRELOG.SCR used!")
    while not eof(ff)
    input #ff, line
    print line
    wend
    close #ff
    print
    else
    if DisplayFile("prelog") then
    WriteActivityLogEntry(" [MOD!] PRELOG.BBS used!")
    print
    end if
    end if

    now if we can get ssi to display scr files for ansi, instead of
    defaulting to bbs pipe color code.

    |15[tnabbs.org] - |05T|08.|03N|08.|07A |15+ |03XTC

    --- Mystic BBS v1.10 (Windows)
    * Origin: FlupH * fluph.darktech.org (44:100/2)
  • From ROBERT WOLFE@44:901/0 to mental block on Sat Mar 7 13:13:00 2015
    You know, I never saw your reply here. It seems like that happens from several Mystic systems that I see (or don't see) messages from.

    ... Keyboard not found. Visualize "F1" to continue.
    --- Wildcat! v6.4.454.2 (Nov 17 2011), Editor Mod v1.7
    * Origin: Omicron Theta | Memphis TN | winserver.us (44:901/0)
  • From Warp 4@44:901/0 to Al on Sat Dec 8 20:57:13 2018
    Al wrote to Warp 4 <=-

    I was looking for a wildcat.. but that's another thing.. :)

    ROTFLMAO!!!

    Have you done up any mystic mpl stuff.. If you do I'd be intesested in looking..

    What were we talking about again? :)

    ... Voluteers are being given fake placebos.
    ___ MultiMail/OS/2 v0.50

    --- Mystic BBS/QWK v1.12 A39 2018/04/21 (Windows/32)
    * Origin: Omicron Theta * Southaven MS * winserver.org:2300 (44:901/0)
  • From Al@44:250/0 to Warp 4 on Sat Dec 8 19:40:46 2018
    Have you done up any mystic mpl stuff.. If you do I'd be intesested in
    looking..

    What were we talking about again? :)

    Mystic MPL or a wcBASIC script? I don't quite remember ;)

    --- BBBS/Li6 v4.10 Toy-3
    * Origin: The Rusty MailBox - Penticton, BC Canada (44:250/0)