Recent posts

#91

OxygenBasic Examples / Re: get o2 version

Last post by Pierre Bellisle - June 12, 2025, 04:32:34 AM

Hi Aurel,
Good to ear from you,

Seems you got the same file  I used, aka server part from post #3.
I got no problem to compile the file as is from Oxide.
Under Windows 7/64, I tried eight O2 version, same gpf on all of them.
This include 6.04, so you might have the same gpf since you use this version.

All you have to do to test is compile the  server part from post #3,
run it, then when you click the OK button a gpf error message from Windows appear.
It won't appear if I rem the line UnmapViewOfFile(pBuf)

This is the details provided in the gpf message box.

Signature du problème :
  Nom d'événement de problème: BEX64
  Nom de l'application: NamedSharedMemoryA01.exe
  Version de l'application: 0.0.0.0
  Horodatage de l'application: 684a3a2c
  Nom du module par défaut: StackHash_5d53
  Version du module par défaut: 0.0.0.0
  Horodateur du module par défaut: 00000000
  Décalage de l'exception: 0000010000000001
  Code de l'exception: c0000005
  Données d'exception: 0000000000000008
  Version du système: 6.1.7601.2.1.0.256.48
  Identificateur de paramètres régionaux: 3084
  Information supplémentaire n° 1: 5d53
  Information supplémentaire n° 2: 5d53daca3c00ebb4a7319390a6b37de1
  Information supplémentaire n° 3: c8b0
  Information supplémentaire n° 4: c8b099d242f1a67858aa0c71c55b8faf

Note that UnmapViewOfFile(pBuf) works fine in the client part.

#92

OxygenBasic Examples / Re: get o2 version

Last post by Zlatko Vid - June 08, 2025, 08:16:16 AM

Hi Pierre
I am not sure what this examples exactly do
i simply don't make such types of programs
but interesting my code editor written in OxygenBasic
cannot found compiler path ..look in image..

#93

OxygenBasic Examples / Re: get o2 version

Last post by Zlatko Vid - June 08, 2025, 08:07:11 AM

I have Win7_64bit on Dual core with 2GB ram
(blame me i am lazy to build win10/11 PC..i have parts)
so what exactly i must test?
this program or download latest release?
(again i use older o2_sc604)   

#94

OxygenBasic Examples / Re: get o2 version

Last post by Pierre Bellisle - June 08, 2025, 01:43:51 AM

Hi Charles,

I've tested under Windows 11 and all is fine.
Windows 7, not so...

Server.exe 64-bit 0.9.0 2025-04-15t13:55:16
Client.exe  32-bit 0.9.0 2025-04-15T13:55:03

Windows 7-64  Server gpf systematically on closing on UnmapViewOfFile(pBuf)
Windows 11-64 Server does not gpf  at all
Cpu is AMD Ryzen 7 5800x
SharedMem.zip does the same.
Both Windows are on the same machine, no virtual Windows used but different boot partition.
It would be cool if anybody have a W7 around and feel like to test, if not, we will survive. :-)
I might try JIT in a week or so, I will be off the net for a little while.

Bind=eBind is a beauty !

Regards

#95

OxygenBasic Examples / Re: get o2 version

Last post by Charles Pegge - June 07, 2025, 04:38:53 PM

Hi Pierre,
No, I've checked this version 4 on Oxide, Peroxide & JIT and compiled . UnmapViewOfFile does not cause a GPF.

#96

OxygenBasic Examples / Re: get o2 version

Last post by Pierre Bellisle - June 07, 2025, 05:13:40 AM

Charles,

From your code, on my pc, UnmapViewOfFile(pBuf) goes systematically to GPF.
pBuf is always OK.

This might be of help...
In my experiment, one time I had:
[Window Title] Kick - Error
[Main Instruction] Oxigen co264 can't compile this code!
[Content] ErrLevel: 31
Header: ASSEMBLER:
Error: mov qword r8,0x20202020!!  wrong size for this register: e8
Error in: [D:\Dev\Oxygen\o2\inc\rtl64.inc]
Main file: [d:\dev\oxygen\o2\~code\interprocess\namedsharedmemoryb01.o2bas]
[Goto line  316, column 1 ?] [No]
Note, I got the same problem using UltraEdit or the Oxyde editor.

Do you have an idea on what's wrong?

#97

OxygenBasic Examples / Re: get o2 version

Last post by Pierre Bellisle - June 05, 2025, 03:32:09 AM

Hi Charles, 

Now that I had a look at it, yes I got many examples in my PowerBASIC folders.

I think you posted the first process ms example twice. The Server is the same as the client.

It is always interesting to see how you implement your code, much to learn from it.

Take care.

#98

OxygenBasic Examples / Re: get o2 version

Last post by Pierre Bellisle - June 05, 2025, 03:01:48 AM

Thank you Charles,
I like it, new stuff to study...

#99

OxygenBasic Examples / Re: Deep Basic

Last post by Zlatko Vid - June 01, 2025, 05:01:05 PM

..and here is code if you want to try o2v604

Code Select Expand

Deep Basic v1 in o2 /QB code by DeepAI /mod by Aurel
uses console
'Global block
Declare SUB RunProgram(lines() AS STRING)
Declare FUNCTION FindLabel(label as string ) AS INT
Declare FUNCTION EvalExpression(expr As STRING) AS FLOAT
Declare FUNCTION ParseTerm() AS FLOAT
Declare FUNCTION ParseFactor() AS FLOAT
Declare FUNCTION GetNextToken() AS STRING
Declare SUB SkipWhitespace()
'print " compiled ...OK!"

Dim Lines[1024] AS STRING
Dim Labels[1024] AS STRING
Dim LabelLine[1024] AS INT

Dim LineCount AS INT
Dim PC AS INT ' Program Counter
Dim Stack[128] AS INT
Dim StackPtr AS INT

Dim Variables[100] AS STRING
Dim VariablesVal[100] AS FLOAT

Dim Token as STRING : Dim TokenPos AS INT
Dim CurrentToken AS STRING
Dim Expr AS STRING

'input block i guess...
PRINT "Enter your BASIC program line by line." + cr
PRINT "End with a line containing just 'END'"
'show in console ...hmm i am not used to console programs?
Waitkey
CLS

#100

OxygenBasic Examples / Re: Deep Basic

Last post by Zlatko Vid - June 01, 2025, 04:59:47 PM

..i must say that i am very stupid for console programs   
but here is how look...