PHP Classes

File: rttl2mid.php

Recommend this page to a friend!
  Classes of Fluxus   MIDI Class   rttl2mid.php   Download  
File: rttl2mid.php
Role: Example script
Content type: text/plain
Description: demonstrates RTTL ringtone to binary MIDI file conversion
Class: MIDI Class
Read, write and manipulate MIDI files and data
Author: By
Last change:
Date: 18 years ago
Size: 1,876 bytes
 

Contents

Class file image Download
<?php
$p
=$_POST;$g=$_GET;

/****************************************************************************
RTTL CLASS
****************************************************************************/
require('rttl.class.php');

if (isset(
$g['download'])){
   
$file = $g['download'];
   
$filename = 'output.mid';
   
$midi = new Rttl();
   
$midi->downloadMidFile($file,$filename);
}

$test='Beethoven:d=4,o=5,b=250:e6,d#6,e6,d#6,e6,b,d6,c6,2a.,c,e,a,2b.,e,a,b,2c.6,e,e6,d#6,e6,d#6,e6,b,d6,c6,2a.,c,e,a,2b.,e,c6,b,1a';
$rttl = isset($p['rttl'])?$p['rttl']:$test;
$engine = isset($p['engine'])?$p['engine']:'qt';
?><html>
<head>
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
<title>Rttl2Midi</title>
<style>
body {font-family:Verdana;font-size:11px;margin:5px;}
input {font-family:Verdana;font-size:11px}
</style>
</head>
<body>
<form action="<?=$_SERVER['PHP_SELF']?>" method="post">
<textarea name="rttl" style="width:90%" rows="2"><?=$rttl?></textarea>
<br>
<input type="radio" name="engine" value="bk"<?=$engine=='bk'?' checked':''?>>Beatnik
<input type="radio" name="engine" value="qt"<?=$engine=='qt'?' checked':''?>>QuickTime
<input type="radio" name="engine" value="wm"<?=$engine=='wm'?' checked':''?>>Windows Media
<input type="radio" name="engine" value=""<?=$engine==''?' checked':''?>>other (default Player)<br><br>
<input type="submit" value=" send ">
</form>
<br>
<?php
$p
= $_POST;
if (isset(
$p['rttl'])){
   
$save_dir = 'tmp/';
   
srand((double)microtime()*1000000);
   
$file = $save_dir.rand().'.mid';

   
$midi = new Rttl();
   
$midi->importRttl($p['rttl']);
   
$midi->saveMidFile($file);
   
$midi->playMidFile($file,1,1,0,$engine);
?>
<br><br><input type="button" name="download" value="Save as SMF (*.mid)" onClick="self.location.href='<?=$_SERVER['PHP_SELF']?>?download=<?=urlencode($file)?>'">
<?
}
?>
</body>
</html>