AT2k Design BBS - VBBS/VADV Script Discussion

Script idea

Sat, 20 Jun 2020 07:48:43 -0500

From: Lorrim @1 *1
To: Lorrim @1 *1
Subject: Script idea

Re: Script idea

Forgot something. There needs to be a CLOSE statement here to close the file:

> 'Open the file we created with the REXX script in output mode'
> OPEN C:\VADV\TXT\TIMER.TXT, O
> READ C:\VADV\TXT\TIMER.TXT d0
CLOSE

--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]

Script idea

Sat, 20 Jun 2020 07:32:27 -0500

From: Lorrim @1 *1
To: jahmas @1410000 *1
Subject: Script idea

Re: Script idea

> If I could write a script, it would be a countdown until the November
> presidential election.

My board is down because of packing to move so I can't test the vscript part of
this but here is a quick and dirty way to pull it off. Vscript doesn't have a
way to calculate dates, but you can have an external program convert date x to
day-of-the-year format (sometimes called Julian or epoch) and do simple math on
it. I used REXX for this example and vscript to do the bbs output part of it.
You can replace the text with calls to display ANSI files or what have you to
pretty it up.

/* REXX script to do coundown calculation */

day = Date('Days')

/* Write the output to a text file. Overwrite if it already exists */
rc = LINEOUT("C:\VADV\TXT\TIMER.TXT", day, 1)
IF rc \== 0 THEN DO
Error:
SAY "ERROR:" STREAM("C:\VADV\TXT\TIMER.TXT", "D")
RETURN
END

RETURN

================================

'VADV Countdown Script'

'This is the target day of the year from 1-365. Nov. 3 2020 in this case'
let t0=308

'Open the file we created with the REXX script in output mode'
OPEN C:\VADV\TXT\TIMER.TXT, O
READ C:\VADV\TXT\TIMER.TXT d0

IFVAL t0 = d0 GOTO EDay

let x0 = t0-d0

IFVAL x0 > 0 GOTO CTimer

PRINT "The election is over. Did you vote?"
END

EDay:
PRINT "Today is election day. Be sure to vote!"
END

CTimer:
PRINT "It is " x0 " days until election day."
END

--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]

Script idea

Wed, 17 Jun 2020 05:56:31 -0500

From: jahmas @1410000 *1
To: All @ *0
Subject: Script idea

If I could write a script, it would be a countdown until the November
presidential election.

Mysteria Majicka BBS: Cape Cod Massachusetts. Running Virtual Advanced BBS on
10 Nodes. VirtualNet / AspectNet,telnet://majicka.at2k.org or majicka,no-ip.org

TelView v1.11

Tue, 08 Oct 2019 14:11:43 -0500

From: Havok @1352000 *1
To: Steve Winn @1 *1
Subject: TelView v1.11

Re: TelView v1.11

> TelView has been updated to fix the issues it had with SSL connections. It
> contains a new wget.exe as well as an updated ibbsupd.bat.
>

Works just like it should, good job Steve!

Thanks

-= Havok =-

TelView v1.11

Fri, 04 Oct 2019 04:09:26 -0500

TelView v1.11

Thu, 03 Oct 2019 05:23:49 -0500

From: jahmas @1410000 *1
To: Steve Winn @1 *1
Subject: TelView v1.11

Re: TelView v1.11

> TelView has been updated to fix the issues it had with SSL connections. It
> contains a new wget.exe as well as an updated ibbsupd.bat.
> It is available on my BBS or at:
> https://www.vadvbbs.com/web-bbs/forums/files-...
> --

Kewl!

Mysteria Majicka BBS: Cape Cod Massachusetts. Running Virtual Advanced BBS on
10 Nodes. VirtualNet / AspectNet,telnet://majicka.at2k.org or majicka,no-ip.org

TelView v1.11

Wed, 02 Oct 2019 21:33:05 -0500

From: Steve Winn @1 *1
To: All @ *0
Subject: TelView v1.11

TelView has been updated to fix the issues it had with SSL connections. It
contains a new wget.exe as well as an updated ibbsupd.bat.

It is available on my BBS or at:
https://www.vadvbbs.com/web-bbs/forums/files-...

--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]

TelView

Sat, 11 May 2019 02:51:08 -0500

From: Havok @1352000 *1
To: Steve Winn @1 *1
Subject: TelView

> TelView is currently broken and can't download the listing. I am hoping to ha
> a fix soon.

Morning Steve

Thanks I'll be looking forward to the update.

-Havok

TelView

Fri, 10 May 2019 20:00:25 -0500

From: Steve Winn @1 *1
To: Havok @1352000 *1
Subject: TelView

Re: TelView

> Hello Steve
>
> I keep getting this error: ERROR! ∩┐╜ The latest listing was not downloaded
> due to an error.
>
> The only thing I changed was the path statement in the script.
>
> c:\va\.....
>
> Stock was:
> d:\va\.....
>

TelView is currently broken and can't download the listing. I am hoping to have
a fix soon.

--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]

TelView

Fri, 10 May 2019 08:23:35 -0500

From: Havok @1352000 *1
To: All @ *0
Subject: TelView

Hello Steve

I keep getting this error: ERROR! ∩┐╜ The latest listing was not downloaded
due to an error.

The only thing I changed was the path statement in the script.

c:\va\.....

Stock was:
d:\va\.....

-=Havok The Ghetto BBS theghettobbs.com:2323
VirtualNET 1352000 Fidonet 1:123/131 Micronet 618:250/21 Survnet 9:91/6

TelView

Fri, 10 May 2019 08:20:42 -0500

From: Bones @1352000 *1
To: All @ *0
Subject: TelView

Hello Steve

Any idea on this error message.

ERROR! ∩┐╜ The latest listing was not downloaded due to an error.

The only thing I changed was the path statement in the script.

c:\va

Stock it was
d:\va

Thanks as always.

Variable name restrictions?

Wed, 08 May 2019 09:36:00 -0500

From: Weird Al @1740000 *1
To: Steve Winn @1 *1
Subject: Variable name restrictions?

Re: Variable name restrictions?

> No, we can assign A0 the value of 1 then we can use that to work with the
> array. In VADV, variables do not have a prefixed dollar sign. The dollar sign
> is used to specify the array.
> ' Assign variable A0 the value of 1
> LET A0 = 1
> ' Assign array element 1, a string value.
> LET $1 = "This is a test"
> ' Print the array by referencing the value of A0.
> ? $A0
> That should print "This is a test".
> This concept allows you to use loops with the array.

That clears up a lot. No wonder I was having issues with variables.

Variable name restrictions?

Wed, 08 May 2019 08:19:53 -0500

From: Steve Winn @1 *1
To: Weird Al @1740000 *1
Subject: Variable name restrictions?

Re: Variable name restrictions?

> Re: Variable name restrictions?
>
> > In VADV, you can use A0, A1, B0, etc. There are no descriptive named var
> > Some are reserved like X0, Y0, Z0.
> > You also have an array you can use $1-$255.. which is a really nice addi
> > from VBBS. You can use variables to reference the array, such as LET A0
> > LET $A0 = "BLAH" will set $1 to "BLAH".
> > Once you figure out a system on what letters to use for things, you can
> > track of what they are. You can look at my ATMatrix script for possibly
> > best example of what I do.
>
> Did you mean LET $A0 = $1?
>
> I'll have a look. I'm surprised my script works with the variable names I've
> used.

No, we can assign A0 the value of 1 then we can use that to work with the
array. In VADV, variables do not have a prefixed dollar sign. The dollar sign
is used to specify the array.

' Assign variable A0 the value of 1
LET A0 = 1
' Assign array element 1, a string value.
LET $1 = "This is a test"
' Print the array by referencing the value of A0.
? $A0

That should print "This is a test".

This concept allows you to use loops with the array.

--
[AT2k] -- Your VBBS/VADV Support Center -- [www.at2k.org] -- [bbs.at2k.org]

Ah yes.

Tue, 07 May 2019 21:44:57 -0500

From: Weird Al @1740000 *1
To: All @ *0
Subject: Ah yes.

Somehow I skimmed over the part in the script doc that explains variables.
It's starting to come back to me why I never upgraded from VBBS 6.12b to VADV.
The changes in the script language.

I was able to download your matrix script and see some examples of usage.

Variable name restrictions?

Tue, 07 May 2019 21:20:25 -0500

From: Weird Al @1740000 *1
To: Steve Winn @1 *1
Subject: Variable name restrictions?

Re: Variable name restrictions?

> In VADV, you can use A0, A1, B0, etc. There are no descriptive named variable
> Some are reserved like X0, Y0, Z0.
> You also have an array you can use $1-$255.. which is a really nice addition
> from VBBS. You can use variables to reference the array, such as LET A0 = 1;
> LET $A0 = "BLAH" will set $1 to "BLAH".
> Once you figure out a system on what letters to use for things, you can keep
> track of what they are. You can look at my ATMatrix script for possibly the
> best example of what I do.

Did you mean LET $A0 = $1?

I'll have a look. I'm surprised my script works with the variable names I've
used.