Не стираемые значения - будут в регистрах PFW500..501
Код:
BOOL X, Y;
static BOOL XPrevios;
static float a = 0;
float QF1;
static BOOL Init;
// DEBUG only!
*(float*)(PSW+300) = a;
QF1 = *(float*)(PSW+256);
//Firs run
if (!Init) {
Read(HMI_LOCAL_MCH, 0, TYPE_PFW, 500, 0, TYPE_DWORD, &DWord_2_Float(a));
Init = TRUE;
}
// ALGORITM
X = GetPSBStatus(4);
Y = X & !XPrevios;
XPrevios = X;
if (Y) {
a = a + QF1/3600;
Write(HMI_LOCAL_MCH, 0, TYPE_PFW, 500, 0, TYPE_DWORD, Float_2_DWord(a));
}
ЗЫ
Сообщение от
arelavv
То что не имеют я понял, меня смутило слово Debug...ну это так для поддержания разговора...
Мои попытки как-то помочь в отладке макросов путем вывода диагностических сообщений на экран https://owen.ru/forum/showthread.php...l=1#post251022