Udda/meningslös programmering

Tjaa, vet inte riktigt om jag ska lägga tråden här eller i programmeringsdelen. Men eftersom det är tänkt att handla om lite udda maskiner så kanske den passar bra här.

Jag har just spenderat en timme med att programmera introt till Smoke on the Water på min Psion Organiser II LZ64. För er som inte känner till maskinen så är det en av PDA:ernas urfäder. Du har anteckningar, kalender, larm och inte mycket mer som standard. Men du har möjlighet att skriva program i OPL! En riktigt häftig maskin faktiskt, går att läsa mer om den här: http://en.wikipedia.org/wiki/Psion_Organiser och mer om OPL här: http://en.wikipedia.org/wiki/Organiser_Programming_Language

En liten bild:

Video (3gp, kass kvalité): http://cl3mens.no-ip.org/dump/2007.11.10-Psion/MOV00219.3GP

Nu efterlyser jag era knäppa äventyr med udda hårdvara! Om ni får in text i det så är det ju kul om swec står nämnt, vi har ju ett rykte att passa på!

Källkod kommer senare.

Tackar tackar!

Här kommer källkod:

AT 6,1 :PRINT "DEEP PURPLE"
AT 2,2 :PRINT "SMOKE ON THE WATER"
AT 6,3 :PRINT "IN OPL BY:"
AT 3,4 :PRINT "CL3MENS FOR SWEC"

BEEP 500,1400
BEEP 500,1200
BEEP 500,1050
PAUSE 5

BEEP 500,1400
BEEP 500,1200
BEEP 250,975
BEEP 500,1050
PAUSE 8

BEEP 500,1400
BEEP 500,1200
BEEP 500,1050
PAUSE 5
BEEP 550,1200
BEEP 600,1600
GET

Crash course i OPL:

at a,b = skriv ut följande på teckenplats (a) på rad (b)
beep a,b = pip. tid = a, ton = b
pause a = väntetid
get = vänta på tangenttryckning