It looks like my 3D library
no, this code is from my Flash days and was ported to B4A in 2012 already (and screenshot should exist on this forum from back then)
I'll post a project file after supper
It looks like my 3D library
The turtle moves to the other side of the canvas so it probably breaks the algorithm.if you reduce the depth value a bit and it draws outside the visible canvas everything seems to stop.
I find better, so I can quickly jump to a page without searching in the video for this one place.BTW, what do you think about presentations as a documentation tool? It is easier for me to create, compared to video tutorials.
Although not always, often if something is easier to do it is less "powerful".BTW, what do you think about presentations as a documentation tool? It is easier for me to create, compared to video tutorials.
Nothing against it, but, there has to be a balance of detail in the presentation. Most presentations end up as "helicopter" views used as a background to a lecture or speech. So, from those sessions one takes the presentation away, but, then, a month later its very difficult to understand because most often we don't take notes of the lecture or speech. So, the presentation becomes a bit meaningless. In other words its not a good way to "jog" the memory.think about presentations as a documentation tool?
the turtle is turning right, but if i look around my room and focus again on the turtle she moves left!here you go...
to stick to the turtle theme the dolphin has morphed into a turtle
View attachment 94761
    Turtle.SetX(Turtle.Width/2)
    Turtle.SetY(Turtle.Height/2)
    Turtle.TurtleMode
    Dim colors() As Int= Array As Int(xui.Color_Red, xui.Color_Cyan, xui.Color_Blue, xui.Color_Green, xui.Color_Magenta, xui.Color_Yellow)
    
    For x = 0 To 360
        Turtle.SetPenColor(colors(x Mod 6))
        Turtle.SetPenSize(x/100 + 1)
        Turtle.moveforward(x)
        Turtle.turnleft(59)
    NextSub Turtle_Start
    Turtle.SetX(Turtle.Width/2)
    Turtle.SetY(Turtle.Height/2)
    Turtle.TurtleMode
    Turtle.SetPenColor(xui.Color_Cyan)
    Turtle.SetPenSize(0.5)
    For i = 1 To 100
        drawCircle(i)
        Turtle.TurnLeft(4)
    Next
    Turtle.SetTurtleVisible(False)
    
End Sub
Sub drawCircle (r As Int)
    
    For i = 0 To 360
        Turtle.MoveForward(r * 2 * cPI/360)
        Turtle.TurnLeft(1)
    Next
    
End Sub