PureBasic Forums - English

Here is the 4th prg that searches for prime numbers between 0 and 2 ^ 64-1 using a window to limit exploration. The results are in the raw state.



; algorithme de recherche des nombres PREMIERS par zones
; ATTENTION ENTRE 1E2-1E1 =90 entre 1E3-1E2=900 entre 1E4-1E3=9000 entre 1E12-1E11 ...

Hello everyone

Here are the 2 prg that explore the area from 1 to 2 ^ 64-1 considering any number as a positive integer. Indeed the Zone from 2 ^ 63 to 2 ^ 64-1 in PB is signed and the numbers are seen as negative values. Prg must work in 32 and 64 bits

1) The first decomposes a number into prime ...

Hello everyone

Here are the 2 prg that explore the area from 1 to 2 ^ 64-1 considering any number as a positive integer. Indeed the Zone from 2 ^ 63 to 2 ^ 64-1 in PB is signed and the numbers are seen as negative values. Prg must work in 32 and 64 bits

1) The first decomposes a number into prime ...

Hello everyone

After a few days and over 150 visits
No one has detected error in programming
So we have a bug. In PureBasic since at least PB420.
It's not too annoying but you have to know.

excuse me missing the macro _D

Bug or programming error ?
Here are 2 prg that work properly


Macro _q_t_
"

EndMacro
Macro _n (__n)
_q_t_#__n#=_q_t_+Str(__n)+" "
EndMacro
Macro _d (__D,__nv=8)
_q_t_#__D#=_q_t_+StrD(__D,__nv)+" "
EndMacro
Procedure.d PI_Double()
!FLDPI
; !ret
ProcedureReturn
EndProcedure
Procedure.d ...

Hello everyone.
For the For .. Next PB instruction can change the start parameter and end of the statement.
with the following example.

A1=0
fin=50
pas=20
For deb=0 To 30 Step 10
Debug "** debut ** ="+Str(deb)
For A1=deb To fin Step 5
Debug _n(deb)+_n(fin)+_n(pas)+_n(A1)
Next
Next


To ...

Hello everyone

Here are two macros (FORD NEXTD ..) that allow to emulate a FOR ... NEXT.
The main features of these two macros are:
1) all parameters can be passed by variable
2) The step can be an integer or a positive or negative float

Syntax for these macros.
FORD (variable name, value of start ...

Hello everyone

An idea of ​​Danilo here's the catch with no title bar window.
It can be moved and resized with the left mouse button.
To capture after placing the window type and sized F12.

PS: Transparency can be modified and the background color as the PRG.
To exit press the right button and ...

Hello Danilo

With XP SP3 window can be moved, but you can not resize
By cons with some modifications of the program, it works perfectly
With these changes, we can remove the callback.

Thank you Danilo. I'll try to put this program in the capture.


Enumeration
#FEN=2
#POP
#BOXSIZE=8 ...

Hello Danilo

Okay thank you.
But the area can not be resized misses the parameter #PB_Window_SizeGadget
Or if it is on the title bar reappears.

Thank you to all

Here is the requested correction (semi-transparent option)
For a semitransparent three possibilities:
1) You run the prg in the absence of an external parameter you will be asked to provide the level of transparency
Complete transparency <50
Sem-transparency (50 <xxx <200 ...

Opus can set the capture area according to your desires.

In my home area is defined when moving is an option: the XP property)
This is the area defined when moving that sets the limits of the rectangle to capture.

Good bye

Hello to All

Here is a small program to capture any screen area you choose yourself
This PRG is unpretentious.

Operation:

1) Start the prg

2) You get a transparent window which can be moved and enlarged on demand.

3) when moving, as the area does not appear (In my option: Property Office ...

Hi ABBKlaus,
Thank you!!!
There is a missing structure – ‘MEM_DataStructure'. Possible for you to add it?