Author Topic: Связь кликеров в нескольких виртуальных машинах  (Read 6317 times)

0 Members and 4 Guests are viewing this topic.

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
В общем если кому понадобится вдруг...
Code: (clickermann) [Select]
//============================================= Запись в ини
SUB(INI_WRITE, $file, $identifikator, $znachenie, $razdel)
   TFCLEAR("working_ini.txt", 0)
   STRWRITELN ("working_ini.txt", "write")
   STRWRITELN ("working_ini.txt", $file)
   STRWRITELN ("working_ini.txt", $razdel)
   STRWRITELN ("working_ini.txt", $identifikator)
   STRWRITELN ("working_ini.txt", $znachenie)
   CALL ("working_ini.dll")
END_SUB
//============================================= Чтение из ини (ТОЛЬКО числовые значения)
SUB(INI_READ, $file, $identifikator, $razdel)
   TFCLEAR("working_ini.txt", 0)
   STRWRITELN ("working_ini.txt", "read")
   STRWRITELN ("working_ini.txt", $file)
   STRWRITELN ("working_ini.txt", $razdel)
   STRWRITELN ("working_ini.txt", $identifikator)
   CALL ("working_ini.dll")
END_SUB

//============================================= Запись в ини
INI_WRITE("C:\variables.ini", "identifikator", "1", "razdel")
//============================================= Чтение из ини (ТОЛЬКО числовые значения)
INI_READ("C:\variables.ini", "identifikator", "razdel")
LOGWRITE ($_return1)

HALT

dll-ку в папку со скриптом - https://yadi.sk/d/w_pOKkyzD-WHOQ
Если нужен $_return1 от какой-либо предыдущей процедуры, то сохраняйте его в какую-либо переменную, до использования INI_WRITE или INI_READ!
« Last Edit: March 07, 2019, 09:48:13 AM by Hito »
Я не ду... Потому и не бу...

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Забыл сказать... Ну, и естественно 32-битную версию кликера.
Я не ду... Потому и не бу...