{\rtf1\ansi\ansicpg1252\deff0\deflang1036{\fonttbl{\f0\fswiss\fcharset0 Arial;}}
{\*\generator Msftedit 5.41.15.1507;}\viewkind4\uc1\pard\f0\fs20 PythonWin 2.3.5 (#62, Feb 8 2005, 16:23:02) [MSC v.1200 32 bit (Intel)] on win32.\par
Portions Copyright 1994-2004 Mark Hammond (mhammond@skippinet.com.au) - see 'Help/About PythonWin' for further copyright information.\par
>>> from Tkinter import *\par
>>> def cercle(x,y,r,coul='black'):\par
... \tab can.create_ovale(x-r,y-r,x+r,y+r,outline=coul)\par
... \tab #trac\'e9 d'un cercle de centre (x,y) et de rayon r\par
... \tab\par
>>> def figure_1():\par
... \tab "dessiner une cible"\par
... \tab #nettoyage du canevas\par
... \tab can.delete(ALL)\par
... \tab #trac\'e9 des lignes de la cible\par
... \tab can.create_line(100,0,100,200,fill='blue')\par
... \tab can.create_line(0,100,200,100,fill='blue')\par
... \tab #trac\'e9 des cecles concentrique\par
... \tab x=100\par
... \tab y=100\par
... \tab r=15\par
... \tab while r<100 :\par
... \tab\tab cercle(x,y,r)\par
... \tab\tab r=r+15\par
... \tab\tab\par
|