Difference between revisions of "TI Logo II"

From Ninerpedia
Jump to navigation Jump to search
(add sample TI Logo procedure)
(multiple corrections to code (from poor OCR))
 
Line 15: Line 15:
  LEFT :ANGLE
  LEFT :ANGLE
  FORWARD :SIZE * 2
  FORWARD :SIZE * 2
  TREE :SIZE :ANGLE :LEVEL - l
  TREE :SIZE :ANGLE :LEVEL - 1
  BACK :SIZE & 2
  BACK :SIZE * 2
  RIGHT 2 & :ANGLE
  RIGHT 2 * :ANGLE
  FORWARD :SIZE
  FORWARD :SIZE
  TREE :SIZE :ANGLE :LEVEL - 1
  TREE :SIZE :ANGLE :LEVEL - 1
  BACK :5IZE
  BACK :SIZE
  LEFT :ANGLE
  LEFT :ANGLE
  END
  END
Line 28: Line 28:
  BACK 24
  BACK 24
  PENDOWN
  PENDOWN
  TREE B 15 B
  TREE 8 15 8
  BACK 24
  BACK 24
  END
  END

Latest revision as of 08:45, 19 December 2015

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 - 1
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

NOW key in WILLOW Not an unpleasant result.