Windows Vista Forums
Vista Forums Home Join Vista Forums Windows 7 Forum Vista Tutorials Tags
Welcome to Windows Vista Forums. Our forum is dedicated to helping you find solutions with any problems, errors or issues you are experiencing with Windows Vista. The Vista forum also covers news and updates and has an extensive Windows Vista tutorial section that covers a wide range of tips and tricks.

Go Back   Vista Forums > Misc Newsgroups > VB Script

Vista - OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

Reply
 
Old 11-12-2008   #1 (permalink)
Dr J R Stockton


 
 

OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but I
have a syntax semantics query about code written in GW-Basic and now
running in QBasic from DOS 6.20 running in XP sp3.

Perhaps some long-established sage will remember enough to help.

The line is, with the weird term marked,

2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
^^^^^^^^^^^^^^

It is clear that B is a small non-negative integer, perhaps in the range
0 to 29; OM is either 3 or 4; OT is an integer in the range 1 to 31 ; SJ
is either 0 or 1. The result O is evidently a small integer too.

But what does B(SJ, (M - 1)) mean, and how?

--
(c) John Stockton, nr London UK. ?@merlyn.demon.co.uk IE7 FF2 Op9 Sf3
news:comp.lang.javascript FAQ <URL:http://www.jibbering.com/faq/index.html>.
<URL:http://www.merlyn.demon.co.uk/js-index.htm> jscr maths, dates, sources.
<URL:http://www.merlyn.demon.co.uk/> TP/BP/Delphi/jscr/&c, FAQ items, links.

My System SpecsSystem Spec
Old 11-12-2008   #2 (permalink)
Auric__


 
 

Re: OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

On Wed, 12 Nov 2008 22:26:25 GMT, Dr J R Stockton wrote:
Quote:

> I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but I
> have a syntax semantics query about code written in GW-Basic and now
> running in QBasic from DOS 6.20 running in XP sp3.
>
> Perhaps some long-established sage will remember enough to help.
>
> The line is, with the weird term marked,
>
> 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
> ^^^^^^^^^^^^^^
>
> It is clear that B is a small non-negative integer, perhaps in the range
> 0 to 29; OM is either 3 or 4; OT is an integer in the range 1 to 31 ; SJ
> is either 0 or 1. The result O is evidently a small integer too.
>
> But what does B(SJ, (M - 1)) mean, and how?
B() is just a multi-dimensional array. The selected item (O) is column SJ (SJ
should be a number between zero and... I don't remember), row M - 1 (M should
be a number between one and whatever).

Some of us old fogeys still discuss (and *GASP* use) older BASICs in
alt.lang.basic and comp.lang.basic.misc.

--
Beware a smiling dungeon master.
My System SpecsSystem Spec
Old 11-12-2008   #3 (permalink)
MikeB


 
 

Re: DOS 6.20 QBasic, GW-Basic - syntax semantics query


"Dr J R Stockton" <jrs@xxxxxx> wrote in message
news:e+$K15hRg1GJFw$C@xxxxxx
Quote:

>I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but I
> have a syntax semantics query about code written in GW-Basic and now
> running in QBasic from DOS 6.20 running in XP sp3.
>
> Perhaps some long-established sage will remember enough to help.
>
> The line is, with the weird term marked,
>
> 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
> ^^^^^^^^^^^^^^
>
> It is clear that B is a small non-negative integer, perhaps in the range
> 0 to 29; OM is either 3 or 4; OT is an integer in the range 1 to 31 ; SJ
> is either 0 or 1. The result O is evidently a small integer too.
>
> But what does B(SJ, (M - 1)) mean, and how?
Dr John,
There are more than a few older guys in m.p.vb.general.discussion that likely
know the answer...
Quote:

> --
> (c) John Stockton, nr London UK. ?@merlyn.demon.co.uk IE7 FF2 Op9 Sf3
> news:comp.lang.javascript FAQ <URL:http://www.jibbering.com/faq/index.html>.
> <URL:http://www.merlyn.demon.co.uk/js-index.htm> jscr maths, dates, sources.
> <URL:http://www.merlyn.demon.co.uk/> TP/BP/Delphi/jscr/&c, FAQ items, links.

My System SpecsSystem Spec
Old 11-13-2008   #4 (permalink)
Dr J R Stockton


 
 

Re: OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

On Nov 13, 12:18*am, "Auric__" <not.my.r...@xxxxxx> wrote:
Quote:

> On Wed, 12 Nov 2008 22:26:25 GMT, Dr J R Stockton wrote:
Quote:

> > I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but I
> > have a syntax semantics query about code written in GW-Basic and now
> > running in QBasic from DOS 6.20 running in XP sp3.
Quote:
Quote:

> > The line is, with the weird term marked,
>
Quote:

> > 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
> > * * * * * * * * * * * * *^^^^^^^^^^^^^^
>
Quote:

> > It is clear that B is a small non-negative integer, perhaps in the range
> > 0 to 29; OM is either 3 or 4; OT is an integer in the range 1 to 31 ; SJ
> > is either 0 or 1. *The result O is evidently a small integer too.
>
Quote:

> > But what does * B(SJ, (M - 1)) * mean, and how?
>
> B() is just a multi-dimensional array. The selected item (O) is column SJ(SJ
> should be a number between zero and... I don't remember), row M - 1 (M should
> be a number between one and whatever).
B(x,y) indeed looks like a two-dimensional array. But what does that
code mean when B is, as I said, a small integer?

--
(c) John Stockton, near London, UK. Posting with Google.
Mail: J.R.""""""""@physics.org or (better) via Home Page at
Web: <URL:http://www.merlyn.demon.co.uk/>
FAQish topics, acronyms, links, etc.; Date, Delphi, JavaScript, ....|
My System SpecsSystem Spec
Old 11-14-2008   #5 (permalink)
Auric__


 
 

Re: OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

On Thu, 13 Nov 2008 13:56:35 GMT, Dr J R Stockton wrote:
Quote:

> On Nov 13, 12:18*am, "Auric__" <not.my.r...@xxxxxx> wrote:
Quote:

>> On Wed, 12 Nov 2008 22:26:25 GMT, Dr J R Stockton wrote:
Quote:

>> > I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but
>> > I have a syntax semantics query about code written in GW-Basic and
>> > now running in QBasic from DOS 6.20 running in XP sp3.
>
Quote:
Quote:

>> > The line is, with the weird term marked,
>>
Quote:

>> > 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
>> > * * * * * * * * * * * * *^^^^^^^^^^^^^^
>>
Quote:

>> > It is clear that B is a small non-negative integer, perhaps in the
>> > range 0 to 29; OM is either 3 or 4; OT is an integer in the range 1
>> > to 31 ; SJ is either 0 or 1. *The result O is evidently a small
>> > integer too.
>>
Quote:

>> > But what does * B(SJ, (M - 1)) * mean, and how?
>>
>> B() is just a multi-dimensional array. The selected item (O) is column
>> SJ (SJ should be a number between zero and... I don't remember), row M
>> - 1 (M should be a number between one and whatever).
>
> B(x,y) indeed looks like a two-dimensional array. But what does that
> code mean when B is, as I said, a small integer?
(Sorry I didn't reply sooner, but I was offline yesterday.)

If I understand you correctly, B was declared as an INTEGER, rather than an
INTEGER array, right? Something like "DIM B AS INTEGER"? You can have both
B and B() as separate vars in the same program. (If B() isn't declared
anywhere, then it is a SINGLE array, the default data type for MS BASICs
before VB. Undeclared arrays can have up to 4 dimensions, LBOUND 0 and
UBOUND 10.)

....or am I still not understanding your question? If so, please rephrase
it. :-(

--
Yet even now -- here was the hell of it -- he wasn't completely sure.
My System SpecsSystem Spec
Old 11-14-2008   #6 (permalink)
Luuk


 
 

Re: OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

Dr J R Stockton schreef:
Quote:

> I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but I
> have a syntax semantics query about code written in GW-Basic and now
> running in QBasic from DOS 6.20 running in XP sp3.
>
> Perhaps some long-established sage will remember enough to help.
>
> The line is, with the weird term marked,
>
> 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
> ^^^^^^^^^^^^^^
>
> It is clear that B is a small non-negative integer, perhaps in the range
> 0 to 29; OM is either 3 or 4; OT is an integer in the range 1 to 31 ; SJ
> is either 0 or 1. The result O is evidently a small integer too.
>
> But what does B(SJ, (M - 1)) mean, and how?
>
http://www.geocities.com/KindlyRat/GWBASIC.html

;-)
My System SpecsSystem Spec
Old 11-14-2008   #7 (permalink)
Dr J R Stockton


 
 

Re: OT : DOS 6.20 QBasic, GW-Basic - syntax semantics query

In microsoft.public.scripting.vbscript message <Xns9B5660130C633auricaur
icauricauric@xxxxxx>, Fri, 14 Nov 2008 16:27:31, Auric__
<not.my.real@xxxxxx> posted:
Quote:

>On Thu, 13 Nov 2008 13:56:35 GMT, Dr J R Stockton wrote:
>
Quote:

>> On Nov 13, 12:18*am, "Auric__" <not.my.r...@xxxxxx> wrote:
Quote:

>>> On Wed, 12 Nov 2008 22:26:25 GMT, Dr J R Stockton wrote:
>>> > I know that VBScript is not exactly DOS 6.20 QBasic or GW-Basic ; but
>>> > I have a syntax semantics query about code written in GW-Basic and
>>> > now running in QBasic from DOS 6.20 running in XP sp3.
>>
Quote:

>>> > The line is, with the weird term marked,
>>>
>>> > 2390 T = OT: M = OM: O = B(SJ, (M - 1)) + T
>>> > * * * * * * * * * * * * *^^^^^^^^^^^^^^
>>>
>>> > It is clear that B is a small non-negative integer, perhaps in the
>>> > range 0 to 29; OM is either 3 or 4; OT is an integer in the range 1
>>> > to 31 ; SJ is either 0 or 1. *The result O is evidently a small
>>> > integer too.
>>>
>>> > But what does * B(SJ, (M - 1)) * mean, and how?
>>>
>>> B() is just a multi-dimensional array. The selected item (O) is column
>>> SJ (SJ should be a number between zero and... I don't remember), row M
>>> - 1 (M should be a number between one and whatever).
>>
>> B(x,y) indeed looks like a two-dimensional array. But what does that
>> code mean when B is, as I said, a small integer?
>
>(Sorry I didn't reply sooner, but I was offline yesterday.)
>
>If I understand you correctly, B was declared as an INTEGER, rather than an
>INTEGER array, right? Something like "DIM B AS INTEGER"? You can have both
>B and B() as separate vars in the same program. (If B() isn't declared
>anywhere, then it is a SINGLE array, the default data type for MS BASICs
>before VB. Undeclared arrays can have up to 4 dimensions, LBOUND 0 and
>UBOUND 10.)
There are no declarations. The only statement assigning to B is
B = S - 30 * (INT(S / 30))
where S is a fairly large integer. That amounts to B = S mod 30.

Tests indicate that the dubious part is taken as zero - I'm veering
towards the belief that that part of the program, performed after the
main result is obtained, is best explained as a failed attempt to do a
subsidiary task, not documented = though why SJ, which stands for
Schaltjahr, is thought to be relevant is beyond me.

I was studying that in order to understand something different which is
now understood, so the matter can drop - but thanks.

--
(c) John Stockton, nr London, UK. ?@merlyn.demon.co.uk Turnpike v6.05.
Web <URL:http://www.merlyn.demon.co.uk/> - w. FAQish topics, links, acronyms
PAS EXE etc : <URL:http://www.merlyn.demon.co.uk/programs/> - see 00index.htm
Dates - miscdate.htm moredate.htm js-dates.htm pas-time.htm critdate.htm etc.
My System SpecsSystem Spec
Reply

Thread Tools


Similar Threads
Thread Forum
Generic Interface syntax in VS 2005 using Old syntax .NET General
QBasic? On Vista? Software
I'm still unhappy with get-childitem semantics PowerShell
Natural Query Syntax Vista file management
Kill semantics PowerShell


Vista Forums is an independent web site and has not been authorized,
sponsored, or otherwise approved by Microsoft Corporation.
"Windows Vista", the Start Orb, and related materials are trademarks of Microsoft Corp.
© Designer Media Ltd

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46