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 - William33

Pages: [1]
1
QB64 Discussion / Re: QB64 vs Python and a humble request
« on: April 24, 2020, 09:26:02 am »
I would say, it depends on the task. Apart from Python; imagine you have to code an accounting software with an SQL database and a report designer. I doubt anyone would start with the WinAPI (which also can be considered as a library)  wihtout using existing libraries.

2
Programs / Re: Moon Lander (reprise by request)
« on: March 02, 2020, 03:21:52 pm »
Thanks bplus, this I didn't know. First few issues was because Linux is case sensitive. Some file names are not correct.
The next error I couldn't solve: Input past end of file in line 2318.

 
inputpast.png


Sorry, I used the wrong ZIP - from the other thread. Now I got a screen but I can't do anything, just showing some particle effects over and over again.

 
puncturedamage.png

3
Programs / Re: Moon Lander (reprise by request)
« on: March 02, 2020, 12:49:51 pm »
Unfortunately this seems not to work on Linux although it compiled without any error. All I got is a black window...

4
QB64 Discussion / Re: Rotating Sprites
« on: November 08, 2019, 04:22:42 pm »
I once changed rotozoom, so it lets you draw a part of an image, rotated and scaled:

Code: QB64: [Select]
  1. SUB RotoZoom (X AS INTEGER, Y AS INTEGER, Image AS LONG, startx AS INTEGER, starty AS INTEGER, xoffset AS INTEGER, yoffset AS INTEGER, Scale AS SINGLE, Rotation AS SINGLE)
  2.     DIM px(3) AS SINGLE: DIM py(3) AS SINGLE
  3.     W& = _WIDTH(Image&): H& = _HEIGHT(Image&)
  4.     px(0) = (-xoffset + startx) / 2: py(0) = (-yoffset + starty) / 2: px(1) = (-xoffset + startx) / 2: py(1) = (yoffset - starty) / 2
  5.     px(2) = (xoffset - startx) / 2: py(2) = (yoffset - starty) / 2: px(3) = (xoffset - startx) / 2: py(3) = (-yoffset + starty) / 2
  6.     sinr! = SIN(-Rotation / 57.2957795131): cosr! = COS(-Rotation / 57.2957795131)
  7.     FOR i& = 0 TO 3
  8.         x2& = Scale * (px(i&) * cosr! + sinr! * py(i&)) + X: y2& = Scale * (py(i&) * cosr! - px(i&) * sinr!) + Y
  9.         px(i&) = x2&: py(i&) = y2&
  10.     NEXT
  11.     _MAPTRIANGLE (startx, starty)-(startx, yoffset - 1)-(xoffset - 1, yoffset - 1), Image& TO(px(0), py(0))-(px(1), py(1))-(px(2), py(2))
  12.     _MAPTRIANGLE (startx, starty)-(xoffset - 1, starty)-(xoffset - 1, yoffset - 1), Image& TO(px(0), py(0))-(px(3), py(3))-(px(2), py(2))

5
Hi Fifi,

I am new on the forum and this is actually my first post. I want to thank you for your script, it works great. Finally I've got "real" binaries on Linux Mint again.

P.S. If desired, I can help improving the German translation because not everything is correct (no offense).

Pages: [1]