Maze generation

[johnno56]

Marcus.

"Well, none of my childhood boomerangs returned."

Short story: Boomerang (returning) needs to be symmetrical. Top surface similar to a wing. Throwing method is critical. Hold between thumb and forefinger. Reach back. Whilst keeping the boomerang vertical, aim at the horizon, release when your outstretched arm is aligned with the horizon. The boomerang will head for the horizon, due to the shape of the top surface, it will begin to "flatten" from the vertical and begin to climb and eventually return. With much practice, with the correct speed and wrist action, one will be able to make it return and actually "catch" the boomerang without moving the feet. nb: Catching is also an acquired skill. The method is simple. Catching requires both hands to be horizontal. Like you would catch a Frisbee. The acquired skill is timing... Watch those fingers... lol

---

After posting I searched for a simple video. It's a little hard to see the actual flight, due to the bright sky, but the method seems to be ok. Enjoy. https://www.youtube.com/watch?v=ymprFzGiY6Y

[Marcus]

Damnit! Now I want to buy a boomerang just to try that out!

[johnno56]

LOL...

[1micha.elok]

Boomerang mmm.....

   
click the image to zoom in

Code:

' Sprites :
' https://www.spriters-resource.com/arcade/tmnt/sheet/32980/?source=genre

#win32
set window "Boomerang",500,100,false,2
set redraw off

'color definition
black   = [0,0,0]
white   = [255,255,255]

'assets
boomerang = loadimage("assets/32980_1.png",8,1)
person    = loadimage("assets/32980_2.png",9,1)

'initial value
i = 0
s = 0
x = 100 ' Start position of boomerang
j = 2


'-------------
'main program
'-------------
while not keydown(KEY_ESCAPE,true)

    set color black ; cls ; set color white       
                   
    'animate person
    if s = 0 then
        i = i % 9
        draw image person,10,10,i
        i = i + 1
       
        'Check if person animation has reached final frame
        if i = 9 then
            s = 1
        endif
    else
        ' Freeze person
        draw image person,20,10,0
    endif
     
    'animate boomerang
    if s=1 then
        j = j % 8
        draw image boomerang, x, 10, j
        x = x + 20
        j = j + 1
    endif
   
    'check boundary
    if x > width()-70 then
        'reinitialize value
        i = 0
        s = 0
        x = 100
        j = 2
    endif
     
    fwait 5
    redraw
wend