Difference between revisions of "TI Logo II"
Stephen Shaw (talk | contribs) (Just the start of an article. Needs lots more work.) |
Stephen Shaw (talk | contribs) (add sample TI Logo procedure) |
||
Line 8: | Line 8: | ||
LOGO 2 contains a new tiny bug...the primitive MS (makeshape) which works in a defined procedure in LOGO 1 can only be used in direct mode in LOGO 2. Thus one of the sample procedures supplied will not run. | LOGO 2 contains a new tiny bug...the primitive MS (makeshape) which works in a defined procedure in LOGO 1 can only be used in direct mode in LOGO 2. Thus one of the sample procedures supplied will not run. | ||
Sample of a TI Logo routine: | |||
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 :5IZE | |||
LEFT :ANGLE | |||
END | |||
TO WILLOW | |||
TELL TURTLE | |||
PENUP | |||
BACK 24 | |||
PENDOWN | |||
TREE B 15 B | |||
BACK 24 | |||
END | |||
NOW key in WILLOW Not an unpleasant result. | |||
[[Category:Module]] | [[Category:Module]] | ||
[[Category:Programming language]] | [[Category:Programming language]] |
Revision as of 11:45, 12 October 2014
This was the second attempt by TI to implement LOGO, a language they had worked on with its inventor Seymour Papert (see his book "Mindstorms").
LOGO II like LOGO I requires memory expansion.
The graphics are produced by the language constantly redefining the usual character set, with a limit on the number of characters to redefine ("Out of Ink" error) and the use of color.
LOGO 1 had a number of bugs which were addressed in LOGO II but at the last minute a few bugs were discovered to have been introduced, as usual with software debugging.
LOGO 2 contains a new tiny bug...the primitive MS (makeshape) which works in a defined procedure in LOGO 1 can only be used in direct mode in LOGO 2. Thus one of the sample procedures supplied will not run.
Sample of a TI Logo routine:
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 :5IZE LEFT :ANGLE END TO WILLOW TELL TURTLE PENUP BACK 24 PENDOWN TREE B 15 B BACK 24 END
NOW key in WILLOW Not an unpleasant result.