m๒ } —Cc@s˜dZdkZdkZdkZdkZdkZdkZdkZdkTdk TdkTyOei i ei i eieiƒƒdddgƒƒdklZlZWnnXy#dklZeidd ƒZWn6dZd GHyd klZWqed ‚qXnXeZd „Zdfd„ƒYZdefd„ƒYZde fd„ƒYZ!de"fd„ƒYZ#e$djoe#i%e#ƒƒndS(s7 pyano.py - funky keyboard to help write lilypond source Copyright (C) 2004 John Comeau This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. N(t*itlibtpython(sgpls jclicense(spymidis /dev/miditwbs;pymidi module is preferred, fetch from http://jcomeau.com/.(sbeeps5Must have either pymidi (preferred) or beep installedcCsto |GHndS(N(tdebugtstring(R((tpyano.pytdbgprint.stkeymapc#BsฮtZdZhddddddddd d d d d gdf <dd;<ddddd d!d"d#d$d%d&d'd(d)gf <d*d+d,d-d.d/d0d1d2d3d4d5d6gd7d8gf Create and pack buttons according to selected keyboard scheme.it1t2t3t4t5t6t7t8t9t0t-tminust=itQtWtEtRtTtYtUtItOtPt[t]itAtStDtFtGtHtJtKtLt;t'uโ—„tReturnitZtXtCtVtBtNtMt,t.t/uโ†‘tUpuโ–ฒtShift_RtqwertycCsง||_|djoxŠtddƒD]u}xltddƒD][}|i||}|d|}t |||ƒ|i |<|i |i hdd<ƒq<Wq&WndS(NR:iii tsidetleft( tmastertselftparenttmappingtrangetrowtkeyR:ttexttvaluetpyanokeytbuttontpack(R>R=R@RDRERCRB((Rt__init__Fs  ( RRRRRRRRRRR R!(#R R R R R RRR"R2R0R$RR%R&R'RR(R)R*R4R3RRRRR#RRR1RR/RR.R5R6(t__name__t __module__t__doc__R:talphabetRI(((RR4s ฎ RFcBs2tZdZeZed„Zd„Zd„ZRS(sJCreate a button capable of playing a note. Also binds the corresponding key to the same note in the root window, which is assumed to be the parent widget's parent. NOTE that clicking in this window will cause all remaining keyboard hits to echo the key's character in addition to the lilypond note representation.c Csd} d dddg}ti||ƒ||_|i} t|dƒ|d}}| ||||_ d|_ |djot|tƒo&|\}}td|d|ƒn||}}||d<|djo:| id|d|iƒ| id|d|iƒnt|ƒdjoY||iƒjoF| id|iƒd|iƒ| id|iƒd|iƒq‘n|i |ds s<1>( RNRORPRQRRRSRTRURVRWRXRY( t lilynotest lilymarkuptButtonRIR>R=R?troottintREtoctavetnotetlilynotetcountRCtNonet isinstancetlistRDtX11keyRtbindtplaytstopplaytlentlowerttypetmidiouttNoneTypetbeeptnotesttone( R>R=RERCRDR]RbRaRhR\R_((RRIZs4        &!) cCsฌttƒtj o titd|idgƒn|iotdt |ƒƒnTt |_tdt |ƒƒ|i i }|i iƒ|ii|ƒ|i iƒdS(sQueue a note to start playing.ii@salready playing: splay: N(RnRoRptpymiditwriteR>RstisactiveRtreprtTrueR?R_tplaylocktacquiretnotelisttappendtrelease(R>teventR_((RRj|s     cCsŠtdt|ƒƒttƒtj o titd|idgƒnt |_ |i i }|i iƒ|ii|ƒ|i iƒdS(s)Remove this button's note from the queue.s stopplay: i€i@N(RRwR>RnRoRpRtRuRstFalseRvR?R_RyRzR{tremoveR}(R>R~R_((RRkŠs    ( RJRKRLRRvReRIRjRk(((RRFPs  " t pyanokeyboardcBstZdZd„ZRS(s>A frame to hold the graphical representation of the pyano keyscCs6ti||ƒ||_tƒ|_t|dƒdS(NR:(tFrameRIR>R=R?tdictRGR(R>R=((RRI—s  (RJRKRLRI(((RR•s tpyanocBsvtZdZeZgZeZdZeodZ dZ n dZ dZ e Z ed„Z d„Zd„Zd „ZRS( sRoot window of the applicationif0.10000000000000001if0.050000000000000003icCsXti||ƒt|hdt<ƒ|_t|ƒ|_|ii ƒ|ii ƒdS(sPut everything togethertundoN( tTkRIR>R=t ScrolledTextRxttextboxRtkeyboardRH(R>R=((RRIฌs  cCsG|}|idƒ|id|iƒti|ifƒ|iƒdS(s Get everything running. Binding 'Destroy' to the 'pleasestop' method solved the problem of the application being difficult to shut down; clicking the big red button just left it churning away, and WinXT had to force it to shut down.tPyanos N( R>tappttitleRit pleasestoptthreadtstart_new_threadt pyanoplayertmainloop(R>R‹((Rtmainดs  cCst|_tidƒdS(s?Just set a boolean variable that child threads need to monitor.iN(RxR>tstoppedtsystexit(R>treason((RRมs cCs|yGtiƒ|_x$|iptdt|iƒƒtdt|iƒƒtdt |i ƒƒ|ii ƒt |iƒdjoว|i|idjoœ|idjo?|i |ijotdƒ|iiƒqํ|iiƒn|id|_d|_ |ii|iidƒ|ididfƒqฏ|i d|_ nb|idjoQd|_|i |ijotd ƒ|iiƒn|iiƒd|_ n|iiƒttƒtjoK|idjo;td |iiƒti|ii|iƒtd ƒqtd ƒti|iƒqWtidƒWn.td tt i!ƒƒƒt idƒnXdS(sแWatch the note queue, play music and update textbox. This is the main workhorse of the program, and it is really crappy. It would be much better to find a way to access the standard MIDI function of the sound card, and send MIDI 'on' and 'off' messages to it. For the Windows 'Beep' service to work you have to know in advance the duration of the beep, which procludes a real-time response except for a kludge like this one.s notelist: s activenote: s duration: isdeleting before new notetendt isdeleting, no new notesplaying note: sdone playing notes!nothing to play, sleeping insteadsexception receivedN("RŽt allocate_lockR>RyR“RRwR{t activenotetstrtdurationRzRlRet thresholdRˆt edit_undot edit_resettinserttindexRcR}RnRoRpRqRstintervalttimetsleeptsystemR•R”texc_info(R>((RRฦsN          # (RJRKRLReRyR{RšRœRRขRRR“RIR’RR(((RR„s    t__main__(&t CopyrightR”RฃRŽtosttypestretpwdtTkinterR‡tpathR|tseptjointgetpwuidtgeteuidt com.jcomeautgplt jclicensetcom.jcomeau.midiRttopenRoReRqt ExceptionRRRRR^RFR‚RR†R„RJR’(RtRจRRFRดRoRqRซRตR„R”RฌRชRRŽRRฃRRฉ((Rt?s8?8  E_