Download and play a ProTracker module in R

ProTrackR02.01.r

# load the required packages
require(ProTrackR)

# set up a connection to 'cyberrid.mod':
con <- url("http://api.modarchive.org/downloads.php?moduleid=40293", "rb")

# download module:
mod <- read.module(con)
close(con)
rm(con)

# and play it:
mod.wave <- playMod(mod,
                    max.duration = 300,
                    target.rate = 22050)

# plot the waveform:
plot(mod.wave)