Написал программу для некоторой игры, смысл которой заклюался в том, что она будет проверять наличие конкретных файлов в папке и при их удалении копировать из сторонней папки.
и вроде бы всё получилось.
Filedelete при этом не обязателен. (просто для стабильности)
Далее мне потребовалась возможность копировать любые файлы, а не конкретно XRay-Mod-All-Versions.jar и Inventory-Tweaks.jar
я попытался сделать это с помощью FileOpenDialog
ну я думаю вы понимаете в чем проблема: $var - это путь к файлу который нужно скопировать, а как тогда связать это с If FileExists(@AppDataDir & "\.exclient\rpg\mods\" ??
если вы не поняли, о чем я, то проще говоря мне нужна программа, которая будет при запуске спрашивать файлы, которые в последующем будет копировать в папку игры, далее циклично проверять их наличие, после того как они удаляться скопирует их еще раз туда.
Надеюсь вы мне поможете.
ps^ знаю что нафиговертил в коде,но я новичок, наверное мне простительно :whistle:
и вроде бы всё получилось.
Код:
;FileDelete(@AppDataDir & "\.exclient\rpg\mods\Inventory-Tweaks.jar")
;FileDelete(@AppDataDir & "\.exclient\rpg\mods\XRay-Mod-All-Versions.jar")
FileCopy(@AppDataDir & "\excalibur-cheats\Inventory-Tweaks.jar", @AppDataDir & "\.exclient\rpg\mods")
FileCopy(@AppDataDir & "\excalibur-cheats\XRay-Mod-All-Versions.jar", @AppDataDir & "\.exclient\rpg\mods")
run(@AppDataDir & "\excalibur-cheats\Excalibur.exe")
Sleep (2000)
While 1
If FileExists(@AppDataDir & "\.exclient\rpg\mods\Inventory-Tweaks.jar") then
FileExists(@AppDataDir & "\.exclient\rpg\mods\XRay-Mod-All-Versions.jar")
Else
Sleep (4000)
FileCopy(@AppDataDir & "\excalibur-cheats\Inventory-Tweaks.jar", @AppDataDir & "\.exclient\rpg\mods")
FileCopy(@AppDataDir & "\excalibur-cheats\XRay-Mod-All-Versions.jar", @AppDataDir & "\.exclient\rpg\mods")
msgbox(0,"","Читы успешно запущены")
exit
EndIf
WEnd
Filedelete при этом не обязателен. (просто для стабильности)
Далее мне потребовалась возможность копировать любые файлы, а не конкретно XRay-Mod-All-Versions.jar и Inventory-Tweaks.jar
я попытался сделать это с помощью FileOpenDialog
Код:
$message = "Выберите оидн или несколько модов"
$var = FileOpenDialog($message, @AppDataDir & "\excalibur-cheats", "jar (*.jar)", 1 + 4)
If @error Then
exit
Else
$var = StringReplace($var, "|", @CRLF)
MsgBox(4096, "", "" & $var)
EndIf
FileCopy($var, @AppDataDir & "\.exclient\rpg\mods")
run(@AppDataDir & "\excalibur-cheats\Excalibur.exe")
Sleep (2000)
While 1
If FileExists(@AppDataDir & "\.exclient\rpg\mods\" & $var) then
sleep(1)
Else
Sleep (4000)
FileCopy($var, @AppDataDir & "\.exclient\rpg\mods")
msgbox(0,"","Читы успешно запущены")
exit
EndIf
WEnd
ну я думаю вы понимаете в чем проблема: $var - это путь к файлу который нужно скопировать, а как тогда связать это с If FileExists(@AppDataDir & "\.exclient\rpg\mods\" ??
если вы не поняли, о чем я, то проще говоря мне нужна программа, которая будет при запуске спрашивать файлы, которые в последующем будет копировать в папку игры, далее циклично проверять их наличие, после того как они удаляться скопирует их еще раз туда.
Надеюсь вы мне поможете.
ps^ знаю что нафиговертил в коде,но я новичок, наверное мне простительно :whistle: