45 lines
926 B
C++
45 lines
926 B
C++
//I recently added bitmaps based on scan codes
|
|
//and haven't made use of them, yet.
|
|
|
|
|
|
$SP,"<1>",1$
|
|
|
|
|
|
|
|
|
|
I64 x=0;
|
|
|
|
U0 DrawIt(CTask *,CDC *dc)
|
|
{
|
|
SpritePlot3(dc,x%100,100,0,$IB,"<1>",1$);
|
|
}
|
|
|
|
|
|
U0 KeyDownBitMapDemo()
|
|
{
|
|
//This conversion routine is slow.
|
|
I64 i_sc=A2ScanCode('i');
|
|
|
|
"Press and hold $$FG,GREEN$$'i'$$FG$$.\n";
|
|
while (!Bt(key_down_bitmap,i_sc))
|
|
Yield;
|
|
|
|
SettingsPush; //See $LK,"SettingsPush","MN:SettingsPush"$
|
|
Fs->draw_it=&DrawIt;
|
|
|
|
//$LK,"key_down_bitmap","MN:key_down_bitmap"$ is indexed with the
|
|
//merged scan code. (left shift and
|
|
//right shift combined for example.)
|
|
//$LK,"key_down_bitmap2","MN:key_down_bitmap2"$ is indexed with the
|
|
//distinct scan code. See $LK,"Char","HI:Char"$ and $LK,"Scan Codes","MN:SC_INS"$.
|
|
|
|
while (Bt(key_down_bitmap,i_sc)) {
|
|
x++;
|
|
Sleep(10);
|
|
}
|
|
SettingsPop;
|
|
FlushMsgs;
|
|
}
|
|
|
|
KeyDownBitMapDemo;
|
|
' ûÿÿÿ5 þÿÿÿ3 |