From 78169d2b4a254552af6329ae0633115dd26c6160 Mon Sep 17 00:00:00 2001
From: Walter Bender <walter@walter-laptop.(none)>
Date: Sun, 18 Jan 2009 07:59:10 +0000
Subject: added step button

---
(limited to 'talogo.py')

diff --git a/talogo.py b/talogo.py
index 44a3232..efc6e86 100644
--- a/talogo.py
+++ b/talogo.py
@@ -149,6 +149,12 @@ def evline(lc, list):
     lc.iline = list[:]
     lc.arglist = None
     while lc.iline:
+        if lc.tw.step_time > 0:
+            setlayer(lc.tw.turtle.spr,630)
+            endtime = millis()+an_int(lc,lc.tw.step_time)*100
+            while millis()<endtime:
+                yield True
+            setlayer(lc.tw.turtle.spr,100)
         token = lc.iline[0]
         if token==lc.symopar: token=lc.iline[1]
         icall(lc, eval); yield True
@@ -429,7 +435,9 @@ def stopsignoff(lc):
     setshape(lc.stopsign, lc.stopsign.offshape)
     setlayer(lc.tw.turtle.spr,630)
 
-def stop_logo(tw): tw.lc.step = just_stop()
+def stop_logo(tw):
+    tw.step_time = 0
+    tw.lc.step = just_stop()
 
 def just_stop(): yield False
 
--
cgit v0.9.1