Faire mumuse avec les lecteurs CD :)

Programmation d'applications complexes
KrisJNT
Messages : 110
Inscription : ven. 31/oct./2008 16:51

Faire mumuse avec les lecteurs CD :)

Message par KrisJNT »

Voila le code pour s'amuser avec les lecteurs CD :

Code : Tout sélectionner

nbCd = InitAudioCD()
state = 1
Repeat
	For i = 0 To nbCd - 1
		UseAudioCD(i)
		EjectAudioCD(state)
	Next
	state = state XOr 1
ForEver
A modifier à souhaits !

Kris