5567 5: PlaySound(sndPiano5, false, false, true); |
5567 5: PlaySound(sndPiano5, false, false, true); |
5568 6: PlaySound(sndPiano6, false, false, true); |
5568 6: PlaySound(sndPiano6, false, false, true); |
5569 7: PlaySound(sndPiano7, false, false, true); |
5569 7: PlaySound(sndPiano7, false, false, true); |
5570 8: PlaySound(sndPiano8, false, false, true); |
5570 8: PlaySound(sndPiano8, false, false, true); |
5571 end; |
5571 end; |
5572 AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtNote); |
5572 if CurrentHedgehog^.Gear^.MsgParam <= 8 then |
|
5573 AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtNote); |
5573 CurrentHedgehog^.Gear^.MsgParam := 0; |
5574 CurrentHedgehog^.Gear^.MsgParam := 0; |
5574 CurrentHedgehog^.Gear^.Message := CurrentHedgehog^.Gear^.Message and (not gmSlot); |
5575 CurrentHedgehog^.Gear^.Message := CurrentHedgehog^.Gear^.Message and (not gmSlot); |
5575 end; |
5576 end; |
5576 |
5577 |
5577 if (Gear^.Pos = 5) then |
5578 if (Gear^.Pos = 5) then |