UltimaForum

Skrypty [VX] - Auto backup

Domilos - Sro 21 Mar, 2012 14:06
Temat postu: Auto backup
~ Auto backup ~


Krótki opis:
Skrypt tworzy kopie zapasowe plików z folderu data, przy każdym teście gry. Działa na XP i VX.

Autor:
Woratana [woratana@hotmail.com]

Tłumaczenie:
Domilos

Skrypt:
Spoiler:

Kod:
#===============================================================
#  [XP/VX] Auto Backup
#--------------------------------------------------------------
# by Woratana [woratana@hotmail.com]
# Thaiware RPG Maker Community
# Released on: 07/12/2008
# Version: 1.0
#--------------------------------------------------------------
#  Features:
# - Automatically backup your rx/rvdata files when you run the game.
#--------------------------------------------------------------
#  How to use:
# - Setup the script below,
# - You may want to run your game now to backup data files the first time.
#--------------------------------------------------------------

module WData_Backup
 
  BACKUP_WHEN_TEST = true # (true/false) True - tworzy kopie przy każdym teście
  # gry.
  BACKUP_REPORT = true # (true/false) True - pokazuje okno z zakończeniem
  # tworzenia kopii.
  DIRNAME = 'Backup_Data' # Nazwa folderu, w którym będą pliki kopii zapasowej.
  # Skrypt sam go tworzy .

SCRIPT = <<_SCRIPT_
    if (BACKUP_WHEN_TEST && #{defined?(Graphics.wait) ? '$TEST' : '$DEBUG'}) ||
    !BACKUP_WHEN_TEST
      time = Time.now
      Dir.mkdir(DIRNAME) unless File.directory?(DIRNAME)
      ftype = "#{defined?(Graphics.wait) ? 'rvdata' : 'rxdata'}"
      flist = Dir.glob('./Data/*.{' + ftype + '}')
      flist.each_index do |i|
        flist[i] = flist[i].split('/').last
        save_data(load_data('Data/' + flist[i]), DIRNAME + '/' + flist[i])
      end
      p('Backup Finished!: ' + (Time.now - time).to_s + ' sec') if BACKUP_REPORT
    end
_SCRIPT_

  eval(SCRIPT) unless $@
end


Dodatkowe informacje:
Skrypt wklejamy nad Main.

Finwe - Sro 21 Mar, 2012 14:28

A pracowałoby pod Ace'a?
Bo mam komputer który często się
"buntuje" i by się przydało.

Domilos - Sro 21 Mar, 2012 14:42

Nie wiem, bo go nie mam. Prawdopodobnie nie.
Melvin - Sro 21 Mar, 2012 23:27

Finwe, zamień "rvdata" na "rvdata2" w skrypcie i będzie działać.
leszekp321 - Czw 22 Mar, 2012 15:09

wyświetla mi sie coś takiego
?????'backup' ? 42 ??? SyntaxError ????????

Melvin - Czw 22 Mar, 2012 15:17

Coś musiałeś źle wkleić xD Działa dobrze.
@BTW: Wersja 2.0: http://www.ultimateam.pl/viewtopic.php?p=73515


Powered by phpBB modified by Przemo © 2003 phpBB Group