cd player haha version 0.2 lol

[icemaster]

haha yup i made a really small cd player just put your cd player in the drive then run this code

code:

%cd player version 0.2! lol %made By Isaac Emesowum import GUI var Stop, Play, Pause, FForward, Rewind, load, Quit : int View.Set ("graphics:200;50, title:CD PLAYER, position:center, center,buttonbar") process music (track : string)     var track2 : string := "cd:" + track     Music.PlayFile (track2) end music proc track_get     var track := Window.Open ("buttonbar,graphics:100;100, title:Pick Track Number, position:center, center")     var track_string : string     loop         put "Enter Track Number"         get track_string         if strintok (track_string) = true                 then             exit         end if         cls     end loop     Window.Close (track)     fork music (track_string) end track_get proc play_p     GUI.Hide (Play)     GUI.Show (Stop)     track_get end play_p proc stop_p     GUI.Hide (Stop)     Music.PlayFileStop     GUI.Show (Play) end stop_p proc main     Play := GUI.CreateButton (0, 0, 0, "Play", play_p)     Stop := GUI.CreateButton (61, 0, 0, "Stop", stop_p)     Quit := GUI.CreateButton (122, 0, 0, "Quit", GUI.Quit) end main main loop     exit when GUI.ProcessEvent end loop assert false

ha well i was bored and i came up with this in a couple min

[sport]

It is a Useful Programs.

[shorthair]

good considering its turing implemented , but alot of these programs will be obselete now that turing 5 is out , becuae you can pause songs now and there is no need ot fork them

[icemaster]

well i liek the sound of pausing sounds.. it was a pain to only be able to stop and play

as for forking... don't u mean u don't need to because turing automatically plays them in the background, thus it's kind of forking

EDIT~
uh i check the turing update site... it said that turing 4.04c was the latest version

waht are you talkin about? is it available for dl somewhere else?