Has anyone seen this before?

#1

Quote:

ED BP.WRM TEMP
3 lines long.

----: P
0001: TEST = "0E0179"
0002: IF TEST = "0E0181" THEN CRT TEST
0003: END
Bottom at line 3.
----: FI
"TEMP" filed in file "BP.WRM".

Quote:

BASIC BP.WRM TEMP
Compiling: Source = 'BP.WRM/TEMP', Object = 'BP.WRM.O/TEMP'

Compilation Complete.

Quote:

RUN BP.WRM TEMP
0E0179

HUH?

Universe 10.1.1 on Windows Server 2003

TIA

Bill

#2

Seems only to be an issue with the letter E

Quote:

ED BP.WRM TEMP
8 lines

long.

----:
P
0001: ALPHABET =
'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
0002: FOR CNT = 1 TO
26
0003: LETTER = ALPHABET[CNT,
1]
0004: STRING =
'0':LETTER:'0179'
0005: STRING2 =
'0':LETTER:'0181'
0006: IF STRING = STRING2 THEN CRT
STRING
0007: NEXT
CNT
0008:
END
Bottom at line
8.
----:
FI
"TEMP" filed in file
"BP.WRM".

Quote:

BASIC BP.WRM TEMP
Compiling: Source = 'BP.WRM/TEMP', Object = 'BP.WRM.O/

TEMP'

Compilation
Complete.

Quote:

RUN BP.WRM TEMP
0E0179

E must mean Exponential or something?

Bill

#3

On 09/22/2010 01:22 PM, Bill wrote:

Quote:

0001: TEST = "0E0179"
0002: IF TEST = "0E0181" THEN CRT TEST

Isn't 0E179 notation for 0 raised to the 179th power? Which would be the
same as 0 raised to the 181th power. Or do I not remember my scientific
notation correctly?
Art

#4

On Sep 23, 9:40*am, Art <artma... (AT) triad (DOT) rr.com> wrote:

Quote:

On 09/22/2010 01:22 PM, Bill wrote:

0001: * * * TEST = "0E0179"
0002: * * * IF TEST = "0E0181" THEN CRT TEST

Isn't 0E179 notation for 0 raised to the 179th power? Which would be the
same as 0 raised to the 181th power. *Or do I not remember my scientific
notation correctly?
Art

I think your memory is working just fine! I'd say this a bug in UV -
code works AOK on D3 7.5

Gotta luv scientific notation & floating point in an integer world

#5

Does Universe still have the 10^32 limitation? If so, perhaps anything over
that amount will "wrap" to the same overflow...

Ed

"Bill" <progguy (AT) isp (DOT) com> wrote

Quote:

Seems only to be an issue with the letter E

ED BP.WRM TEMP
8 lines
long.

----:
P
0001: ALPHABET =
'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
0002: FOR CNT = 1 TO
26
0003: LETTER = ALPHABET[CNT,
1]
0004: STRING =
'0':LETTER:'0179'
0005: STRING2 =
'0':LETTER:'0181'
0006: IF STRING = STRING2 THEN CRT
STRING
0007: NEXT
CNT
0008:
END
Bottom at line
8.
----:
FI
"TEMP" filed in file
"BP.WRM".

BASIC BP.WRM TEMP
Compiling: Source = 'BP.WRM/TEMP', Object = 'BP.WRM.O/
TEMP'

Compilation
Complete.

RUN BP.WRM TEMP
0E0179

E must mean Exponential or something?

Bill

#6

"Art" <artmartz (AT) triad (DOT) rr.com> wrote

Quote:

On 09/22/2010 01:22 PM, Bill wrote:
0001: TEST = "0E0179"
0002: IF TEST = "0E0181" THEN CRT TEST

Isn't 0E179 notation for 0 raised to the 179th power? Which would be the
same as 0 raised to the 181th power. Or do I not remember my scientific
notation correctly?
Art
Nope, istr 0E179 is notation for 0 times 10 raised to 179th power.

As in, one thousand is 1E3 and one hundred twenty three is 1.23E2
I didn't think any of these vendor basics used that floating point notation,
though...

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Has anyone seen this before?

comp.databases.pick comp.databases.pick

Has anyone seen this before? - 09-22-2010 , 12:22 PM

Re: Has anyone seen this before? - 09-22-2010 , 05:48 PM

Re: Has anyone seen this before? - 09-22-2010 , 06:40 PM

Re: Has anyone seen this before? - 09-22-2010 , 08:10 PM

Re: Has anyone seen this before? - 09-22-2010 , 08:38 PM

Re: Has anyone seen this before? - 09-23-2010 , 08:13 AM