Name: Anonymous 2009-03-29 12:20
Lisp in Audacity.
#!/usr/bin/perl
while (1) {
$t="fsdgggg";
for($i=0; $i<1000; $i++) { print "$t" }
$t="fsdggggg";
for($i=0; $i<500; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdgggg";
for($i=0; $i<600; $i++) { print "$t" }
$t="fsdgggg";
for($i=0; $i<1000; $i++) { print "$t" . ($i%2==0?"g":"") }
$t="fsdggggggg";
for($i=0; $i<700; $i++) { print "$t" . ($i%1==0?"g":"") }
$t="fsdgggg";
for($i=0; $i<250; $i++) { print "$t" }
$t="fsdgggg";
for($i=0; $i<240; $i++) { print "$t" . ($i%2==0?"g":"") }
$t="fsdggggg";
for($i=0; $i<230; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdgggggg";
for($i=0; $i<230; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdggggg";
for($i=0; $i<500; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdg";
for($i=0; $i<700; $i++) { print "$t" .($i%2==0?"ggg":"") }
$t="fsdgggg";
for($i=0; $i<1000; $i++) { print "$t" . ($i%2==0?"g":"") }
$t="fsdggggggg";
for($i=0; $i<700; $i++) { print "$t" . ($i%1==0?"g":"") }
$a = 2;
while($a--) {
$t="fsdggggg";
for($i=0; $i<450; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdgggggg";
for($i=0; $i<220; $i++) { print "$t".($i%4==0?"g":"") }
$t="fsdgggggg";
for($i=0; $i<210; $i++) { print "$t".($i%2==0?"ggg":"") }
$t="fsdgggggg";
for($i=0; $i<160; $i++) { print "$t".($i%2==0?"gggg":"") }
$t="fsdgggggg";
for($i=0; $i<150; $i++) { print "$t".($i%4==0?"gggggggg":"") }
$t="fsdgggggg";
for($i=0; $i<170; $i++) { print "$t".($i%2==0?"gggg":"") }
$t="fsdgggggg";
for($i=0; $i<200; $i++) { print "$t".($i%2==0?"ggg":"") }
$t="fsdgggggg";
for($i=0; $i<270; $i++) { print "$t".($i%2==0?"gggg":"") }
last unless $a;
$t="fsdgggg";
for($i=0; $i<500; $i++) { print "$t" .($i%2==0?"g":"")}
$t="fsdgggggg";
for($i=0; $i<400; $i++) { print "$t"; }
$t="fsdgggggg";
for($i=0; $i<400; $i++) { print "$t".($i%2==0?"gggg":"") }
}
$t="fsdgggg";
for($i=0; $i<1300; $i++) { print "$t" .($i%2==0?"g":"")}
}
#include <unistd.h>
#include <sys/ioctl.h>
#include <sys/kd.h>
int main(void) {
ioctl(0, KDMKTONE, 28576712); usleep(436000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 38080432); usleep(581000);
usleep(290000);
ioctl(0, KDMKTONE, 19008456); usleep(290000);
ioctl(0, KDMKTONE, 9505736); usleep(145000);
ioctl(0, KDMKTONE, 9505406); usleep(145000);
ioctl(0, KDMKTONE, 9505112); usleep(145000);
ioctl(0, KDMKTONE, 9504975); usleep(145000);
ioctl(0, KDMKTONE, 76220376); usleep(1163000);
usleep(290000);
ioctl(0, KDMKTONE, 19007448); usleep(290000);
ioctl(0, KDMKTONE, 12650456); usleep(193000);
ioctl(0, KDMKTONE, 12650344); usleep(193000);
ioctl(0, KDMKTONE, 12650137); usleep(193000);
ioctl(0, KDMKTONE, 76219873); usleep(1163000);
usleep(290000);
ioctl(0, KDMKTONE, 19006945); usleep(290000);
ioctl(0, KDMKTONE, 12649953); usleep(193000);
ioctl(0, KDMKTONE, 12650137); usleep(193000);
ioctl(0, KDMKTONE, 12650344); usleep(193000);
ioctl(0, KDMKTONE, 19007129); usleep(290000);
ioctl(0, KDMKTONE, 9504409); usleep(145000);
ioctl(0, KDMKTONE, 9504616); usleep(145000);
ioctl(0, KDMKTONE, 57149400); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078424); usleep(581000);
ioctl(0, KDMKTONE, 19007695); usleep(290000);
ioctl(0, KDMKTONE, 9504975); usleep(145000);
ioctl(0, KDMKTONE, 9504728); usleep(145000);
ioctl(0, KDMKTONE, 57149288); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 19007448); usleep(290000);
ioctl(0, KDMKTONE, 19007695); usleep(290000);
ioctl(0, KDMKTONE, 19007971); usleep(290000);
ioctl(0, KDMKTONE, 9505251); usleep(145000);
ioctl(0, KDMKTONE, 9504975); usleep(145000);
ioctl(0, KDMKTONE, 57149400); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 19007695); usleep(290000);
ioctl(0, KDMKTONE, 19007971); usleep(290000);
ioctl(0, KDMKTONE, 19008126); usleep(290000);
ioctl(0, KDMKTONE, 9505406); usleep(145000);
ioctl(0, KDMKTONE, 9505112); usleep(145000);
ioctl(0, KDMKTONE, 57149519); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078205); usleep(581000);
ioctl(0, KDMKTONE, 19007448); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 19009456); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 19009456); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
ioctl(0, KDMKTONE, 28576712); usleep(436000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 38080432); usleep(581000);
usleep(290000);
ioctl(0, KDMKTONE, 19008456); usleep(290000);
ioctl(0, KDMKTONE, 9505736); usleep(145000);
ioctl(0, KDMKTONE, 9505406); usleep(145000);
ioctl(0, KDMKTONE, 9505112); usleep(145000);
ioctl(0, KDMKTONE, 9504975); usleep(145000);
ioctl(0, KDMKTONE, 76220376); usleep(1163000);
usleep(290000);
ioctl(0, KDMKTONE, 19007448); usleep(290000);
ioctl(0, KDMKTONE, 12650456); usleep(193000);
ioctl(0, KDMKTONE, 12650344); usleep(193000);
ioctl(0, KDMKTONE, 12650137); usleep(193000);
ioctl(0, KDMKTONE, 76219873); usleep(1163000);
usleep(581000);
ioctl(0, KDMKTONE, 38077681); usleep(581000);
ioctl(0, KDMKTONE, 19006781); usleep(290000);
usleep(290000);
ioctl(0, KDMKTONE, 57148988); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078424); usleep(581000);
ioctl(0, KDMKTONE, 114362216); usleep(1745000);
ioctl(0, KDMKTONE, 38077921); usleep(581000);
ioctl(0, KDMKTONE, 38078012); usleep(581000);
ioctl(0, KDMKTONE, 57149400); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078424); usleep(581000);
ioctl(0, KDMKTONE, 114362216); usleep(1745000);
ioctl(0, KDMKTONE, 38077921); usleep(581000);
ioctl(0, KDMKTONE, 38078012); usleep(581000);
ioctl(0, KDMKTONE, 57149400); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078808); usleep(581000);
ioctl(0, KDMKTONE, 114362575); usleep(1745000);
ioctl(0, KDMKTONE, 38078312); usleep(581000);
ioctl(0, KDMKTONE, 38078424); usleep(581000);
ioctl(0, KDMKTONE, 57149923); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38079432); usleep(581000);
ioctl(0, KDMKTONE, 19008126); usleep(290000);
ioctl(0, KDMKTONE, 9505406); usleep(145000);
ioctl(0, KDMKTONE, 9505112); usleep(145000);
ioctl(0, KDMKTONE, 57149519); usleep(872000);
usleep(290000);
ioctl(0, KDMKTONE, 38078205); usleep(581000);
ioctl(0, KDMKTONE, 19007448); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 19009456); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 19009456); usleep(290000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 9506736); usleep(145000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
ioctl(0, KDMKTONE, 12652464); usleep(193000);
return 0;
}