Back in 1985 I had this C64 machine and that fabulous cassette-recorder to
Load,8,1 "" anything from tape ;-) (took me ages..)
Well on one of those tapes was a small demo called
"the model" based on the music from kraftwerk..
Its a copy as i remember it..(and while you run it ,
remember that was 20 years ago some psycho moving ;-)
Please read the script-header befor loading it!
//http://www.nodep.nl/downloads/newlisp/model.lsp
Norman.
Ah - the fun we had then!...? :)
Without the sound set up, I see the graphics move.
On MacOS X, the best way to play sound at the command line is probably to download qtplay //http://rainbowflight.googlepages.com/ by Sarah Childers.
And then it's:
(if (= ostype {OSX}) (set 'player "/Users/me/bin/qtplay"))
but then the graphics don't move and I hear the music instead. (Groovy baby!).
aha yes your right..that happens on windows too it seems,
so this only works on linux where a "exec" is spawned and starts the
other OSes do wait until finished...
There is also a 'gs:play-sound', but it did not work on that file 'themodel.wav' (but gs:play-sound works on most other .wav files I found on my system) perhaps it can get translated to a suitable format?
Quote
but then the graphics don't move and I hear the music instead.
You should be able to make that work by changing 'exec' into 'process':
(exec (string player " ./themodel.wav"))
; change into
(process (string player " ./themodel.wav"))
'exec' is blocking and waits for the task to finish, while 'process' will return right away.
Lutz
gs:play-sound does work here fine on linux and XP with themodel.wav.
But the problem with gs-play-sound is that its 'blocking' the rest of the
GS process..see my other posting...
Yes process is a good choice here indeed, forgot we had that ;-)
Norman.