SunRed/SpaceCadetPinball
1
0
Fork 0
mirror of https://github.com/k4zmu2a/SpaceCadetPinball.git synced 2026-10-18 00:10:10 +02:00
Code Issues Releases Activity

TLight, TTimer, TSound, TComponentGroup ready.

Browse source
This commit is contained in:
oz 2021-01-01 16:14:11 +03:00
commit 230c981144
11 changed files with 514 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

35
SpaceCadetPinball/TTimer.cpp
View file

@ -1,2 +1,37 @@
#include "pch.h"
#include "TTimer.h"
#include "control.h"
#include "timer.h"
TTimer::TTimer(TPinballTable* table, int groupIndex) : TPinballComponent(table, groupIndex, true)
{
Timer = 0;
}
int TTimer::Message(int code, float value)
{
if (code == 59)
{
if (Timer)
timer::kill(Timer);
Timer = timer::set(value, this, TimerExpired);
}
else if (code == 1011 || code == 1022 || code == 1024)
{
if (Timer)
{
timer::kill(Timer);
Timer = 0;
}
}
return 0;
}
void TTimer::TimerExpired(int timerId, void* caller)
{
auto timer = static_cast<TTimer*>(caller);
timer->Timer = 0;
control::handler(60, timer);
}