Difference between revisions of "User:Stefan Haubenthal"

From Ninerpedia
Jump to navigation Jump to search
(finally)
(838-SXB)
 
Line 30: Line 30:
== TODO ==
== TODO ==
* Battlezone
* Battlezone
* [[838-SXB]]


== Links ==
== Links ==

Latest revision as of 18:09, 5 October 2025

My ports of the DOS emulator by Ton Brouwer.

Buggy: Example in TI Logo II http://shawweb.myzen.co.uk/stephen/times9.htm

Thanks Stefan- I think the errors are due to uncorrected OCR- try this instead: TO TREE :SIZE :ANGLE :LEVEL

IF :LEVEL = 0 THEN STOP
LEFT :ANGLE
FORWARD :SIZE * 2
TREE :SIZE :ANGLE :LEVEL - l
BACK :SIZE * 2
RIGHT 2 * :ANGLE
FORWARD :SIZE
TREE :SIZE :ANGLE :LEVEL - 1
BACK :SIZE
LEFT :ANGLE
END
TO WILLOW
TELL TURTLE
PENUP
BACK 24
PENDOWN
TREE 8 15 8
BACK 24
END

(Stephen)

TODO

Links