Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Mercurio

Pages: [1]
1
Programs / Re: Drag-drop
« on: September 08, 2019, 01:32:51 pm »
Thank you for Welcome
I'm one old programmer, for me not 1 is 0, not 0 is 1.

The Qbasic not have the boolean variables, boolean signed worst. The drag-drop example is one outgrowth of one
my old software of '90 years. If somebody is interested, i attach in this post one little txt of my old
subroutines for manage the mouse. Is possible it is useful for old hardware with MSDOS until Windows XP.
Naturally the variable bott% is integer.
My big surprise, is when i developped one recent videogame with the mouse subroutines with integer: something not go.
Fortunatly, some time after, i discover that is possible write the boolean variables.

For clear my mind, i conceive this experiment:

Code: QB64: [Select]
  1. bott% = 1 'The experiment can be repeated with bott% = 0 or -1 if want, or other, or other type variables, signed or unsigned.
  2.     bott% = NOT bott%
  3.     a% = a% + 1       'One check for see how many cicles does.
  4. LOOP UNTIL bott% > 1 OR bott% < 0 'The unexpected result go out. The parameters can be changed.
  5. COLOR 3: PRINT ; a%, bott%

One bug?
Best regards at allbody, and excuse for my delay (I have always a lot of things to do), and for my not advanced english.

2
Programs / Drag-drop
« on: August 25, 2019, 12:15:31 pm »
Hello!
Here one simple example for drag one object on the screen and drop it in another place.
From one old programmer in Qbasic.

Pages: [1]