From 7a84c5a3544425810e9dd0fd7bf226a5f620cf95 Mon Sep 17 00:00:00 2001
From: Guido van Rossum <guido@python.org>
Date: Fri, 10 Mar 1995 14:47:38 +0000
Subject: pseudo progress bar (not finished)

---
 Mac/Lib/test/progressbar.py | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 Mac/Lib/test/progressbar.py

diff --git a/Mac/Lib/test/progressbar.py b/Mac/Lib/test/progressbar.py
new file mode 100644
index 0000000..59e0cc1
--- /dev/null
+++ b/Mac/Lib/test/progressbar.py
@@ -0,0 +1,31 @@
+# Progress dialog
+
+from addpack import addpack
+addpack('Demo')
+addpack('bgen')
+addpack('dlg')
+addpack('evt')
+
+from Dlg import GetNewDialog, ModalDialog, SetIText
+
+count = 0
+
+def filter(d, e):
+	r = 1
+	print "Filter(%s, %s) -> %s" % (`d`, `e`, `r`)
+	return r
+
+def main():
+	d = GetNewDialog(256, -1)
+	tp, h, rect = d.GetDItem(2)
+	SetIText(h, "Progress...")
+	for i in range(100):
+		if i%10 == 0:
+			str = "Progress...%d" % i
+			SetIText(h, str)
+			ModalDialog(filter)
+		for j in range(100): pass
+
+if __name__ == '__main__':
+	main()
+
-- 
cgit v0.12