Difference between revisions of "User:Stefan Haubenthal"
Jump to navigation
Jump to search
Stephen Shaw (talk | contribs) (respond to bug report) |
|||
| Line 7: | Line 7: | ||
Buggy: Example in [[TI Logo II]] http://shawweb.myzen.co.uk/stephen/times9.htm | 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) | |||
Revision as of 18:30, 18 December 2015
I'm interested in assembler programming, right now I have a GPL project... 50 words? I'm interested in assembler programming, right now I have a GPL project... I'm interested in assembler programming, right now I have a GPL project... I'm interested in assembler programming, right now I have a GPL project... I'm interested in assembler programming, right now I have a GPL project...
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)