| Guido van Rossum | 17448e2 | 1995-01-30 11:53:55 +0000 | [diff] [blame] | 1 | # Show off SndPlay (and some resource manager functions). |
| 2 | # Get a list of all 'snd ' resources in the system and play them all. | ||||
| 3 | |||||
| 4 | from Res import * | ||||
| 5 | from Snd import * | ||||
| 6 | |||||
| 7 | ch = SndNewChannel(0, 0, None) | ||||
| 8 | print "Channel:", ch | ||||
| 9 | |||||
| 10 | type = 'snd ' | ||||
| 11 | |||||
| 12 | for i in range(CountResources(type)): | ||||
| 13 | r = GetIndResource(type, i+1) | ||||
| 14 | print r.GetResInfo(), r.size | ||||
| 15 | if r.GetResInfo()[0] == 1: | ||||
| 16 | print "Skipping simple beep" | ||||
| 17 | continue | ||||
| 18 | ch.SndPlay(r, 0) | ||||