Article View: comp.sys.mac.apps
Article #1381Re: Good program to learn piano?
From: Steve Franklin
Date: Tue, 07 Apr 1992 19:50
Date: Tue, 07 Apr 1992 19:50
39 lines
1727 bytes
1727 bytes
Yup... I think this is a pretty good example of getting carried away
with your computer. Ya can't beat the real thing. I've toyed with MIDI
and the likes, but you just CAN"T beat a real piano without starting
to sound like Vanilla Ice (ugh).
Let's keep our Macs as tools and not get too carried away now shall
we?
incedentally, if I could modify your program, as it seemed to be a little
vague.
***************************
var
quality = integer
const
Maxsound = 99999
begin piano
1 quality =0
2 get a piano
3 find a teacher
4 practice
5 quality = quality + 1
6 If quality = maxsound
then goto 8
else goto 7
7 goto 3
8 get a better piano
9 goto 3
end.
***************************
Now, if your Mac can compile that, than maybe it is smart enough to
teach you to play the piano...heh
steve
--
aasdSteveFranklin-Subliminal Psychology Major.ks;dlasBlueJaysRULEkasdfeahsdbfl
sd;lfaswoq[eBuyMeAQuadra!!!mbnZMXCNdfsba;KdSPAMiuroqiyetIBMSuxiweuryth'ewr;mxn
qpuepriuPartyOneqtuj;,n.,xnc,kjasFlameMeNot!;lkj;lkgkjd;askElvisLivesjhfquweru
zx.cfranklin@ug.cs.dal.ca,sk;t;lrut[Superboy@ac.dal.cav.zx,Physics!eq3rwkh;oHA
Technical Details
Message-ID:
<1992Apr7.195013.7244@cs.dal.ca>Path:
arc1-ca.pugleaf.net!sparky!uunet!bonnie.concordia.ca!nstn.ns.ca!cs.dal.ca!ug.cs.dal.ca!franklinReferences:
<31363@sdcc12.ucsd.edu> <MTANNER.92Apr7122616@gmuvax2.gmu.edu>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!bonnie.concordia.ca!nstn.ns.ca!cs.dal.ca!ug.cs.dal.ca!franklin From: franklin@ug.cs.dal.ca (Steve Franklin) Newsgroups: comp.sys.mac.apps Subject: Re: Good program to learn piano? Message-ID: <1992Apr7.195013.7244@cs.dal.ca> Date: 7 Apr 92 19:50:13 GMT References: <31363@sdcc12.ucsd.edu> <MTANNER.92Apr7122616@gmuvax2.gmu.edu> Sender: usenet@cs.dal.ca (USENET News) Distribution: na Organization: Math, Stats & CS, Dalhousie University, Halifax, NS, Canada Lines: 39 Nntp-Posting-Host: ug.cs.dal.ca