Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorWalter Bender <walter@walter-laptop.(none)>2009-11-03 19:26:14 (GMT)
committer Walter Bender <walter@walter-laptop.(none)>2009-11-03 19:26:14 (GMT)
commitfcca77ade46eee0a87b5052b45b61d1c1a54cc35 (patch)
tree7e3314e89b6892dda2b81f8c7e435e7f2880b472
parentc7137778523a7ec2abb6b0c8a7570b7e67d86134 (diff)
support for color blocks
-rw-r--r--talogo.py7
-rw-r--r--tasetup.py16
2 files changed, 19 insertions, 4 deletions
diff --git a/talogo.py b/talogo.py
index 017c032..16002d7 100644
--- a/talogo.py
+++ b/talogo.py
@@ -518,6 +518,13 @@ def lcNew(tw):
defprim(lc,'pensize', 0, lambda lc: lc.tw.turtle.pensize)
defprim(lc,'textcolor', 0, lambda lc: lc.tw.turtle.textcolor)
defprim(lc,'textsize', 0, lambda lc: lc.tw.textsize)
+ defprim(lc,'red', 0, lambda lc: 0)
+ defprim(lc,'orange', 0, lambda lc: 10)
+ defprim(lc,'yellow', 0, lambda lc: 20)
+ defprim(lc,'green', 0, lambda lc: 30)
+ defprim(lc,'cyan', 0, lambda lc: 50)
+ defprim(lc,'blue', 0, lambda lc: 70)
+ defprim(lc,'purple', 0, lambda lc: 90)
# flow primitives
defprim(lc,'wait', 1, prim_wait, True)
diff --git a/tasetup.py b/tasetup.py
index bd1a450..cc41b94 100644
--- a/tasetup.py
+++ b/tasetup.py
@@ -67,16 +67,24 @@ selectors = (
(('penup','penup','noarg'),
('pendown','pendown','noarg'),
('setpensize','setpensize','1arg',5),
+ ('settextsize','settextsize','1arg',32),
('setcolor','setcolor','1arg',0),
('setshade','setshade','1arg',50),
('fillscreen','fillscreen','twoargs',60,80),
- ('settextsize','settextsize','1arg',32),
- ('settextcolor','settextcolor','1arg',0),
('pensize','pensize','num'),
+ ('textsize','textsize','num'),
('color','color','num'),
('shade','shade','num'),
- ('textcolor','textcolor','num'),
- ('textsize','textsize','num'))),
+ ('red','red','num'),
+ ('orange','orange','num'),
+ ('yellow','yellow','num'),
+ ('green','green','num'),
+ ('cyan','cyan','num'),
+ ('blue','blue','num'),
+ ('purple','purple','num'),
+ # not selectable, but here for backward compatability
+ ('settextcolor','settextcolor','1arg',0),
+ ('textcolor','textcolor','num'))),
('numbers', 55,
(('number','','num',100,float,numcheck),
('plus2','plus','newari'),