Cerca nel Forum

Nome Script: Khas Script Core Versione: 1.0 Autore/i: Khas Informazioni: Il Khas Script Core è un insieme di classi, moduli, metodi, etc che verrà utilizzato su tutti gli altri script che creerà l'autore. Funzionerà più o meno un pò come l'SDK presente per XP... Istruzioni: Inserite lo script sotto Material... Script: #------------------------------------------------------------------------------- # * [RMVX] Khas Script Core #------------------------------------------------------------------------------- # * This script will activate and enhance compatibility of all Khas' Scripts # * Este script irá ativar a compatibilidade entre todos os scripts Khas #------------------------------------------------------------------------------- # * By Khas ([email protected]) # * Version: 1.0 # * Released on: 08/06/2010 # #------------------------------------------------------------------------------- # Terms of Use: #------------------------------------------------------------------------------- # * ENGLISH # All Khas' Scripts are licensed under a Creative Commons license # All Khas' Scripts are for non-commercial projects, if you need # them for a commercial game, please send a email to [email protected] # All Khas' Scripts are for personal use, you can edit them and use in your # own project, but you can't post any modified version without my permission # # * PORTUGUES # Todos os scripts Khas estão sob licença Creative Commons # Todos os scripts Khas são para projetos não comerciais, se você precisar em # seu projeto comercial, envie um email para [email protected] com o pedido # Todos os scripts Khas são para uso pessoal, você pode usar e editar para uso # no seu projeto, porém você não pode postar nenhuma versão modificada sem # a minha permissão # #------------------------------------------------------------------------------- # Installation: #------------------------------------------------------------------------------- # * ENGLISH # 1) This script should be placed after "Materials" and before any Khas' Scripts # 2) Setup this script in Setup Part below. # # *PORTUGUES # 1)Este script tem que ser colocado depois dos "Scripts Adicionais" e antes # de qualquer script Khas # 2) Configure o script na parte de configuração # #------------------------------------------------------------------------------- # Released Khas' Scripts: #------------------------------------------------------------------------------- # 13/06/2010 - Neo Light Effects 1.0 # 15/06/2010 - Khas Neo Title 1.0 # #------------------------------------------------------------------------------- # Setup Part #------------------------------------------------------------------------------- module Core # Khas scripts language | Lingua dos scripts Khas # 0 - English | 0 - Ingles # 1 - Portuguese | 1 - Portugues Language = 1 #------------------------------------------------------------------------------- # End of Setup Part #------------------------------------------------------------------------------- @scripts = {} def self.version return 1.0 end def self.register(script,version) @scripts[script] = version end def self.enabled?(script,version=1) en = @scripts.has_key?(script) ? true : false; return en unless en return (en and @scripts[script] >= version) end def self.load_matrix; $pixel_matrix = {} for x in 0..543 $pixel_matrix[x] = {} end for x in 0..543 for y in 0..415 $pixel_matrix[x][y] = (57.3*Math.atan2(272-x,208-y)).to_i end end end def self.require(script,from,version = 1.0) unless @scripts.has_key(script) if Language == 1 p "O script #{from} precisa do script #{script}" p "Por favor, instale o #{script} #{version}" else p "The script #{from} requires #{script}" p "Please install the #{script} #{version}" end exit else unless @scripts[script] >= version if Language == 1 p "#{script} #{version} é antigo" p "Por favor, instale o #{script} #{version}" else p "#{script} #{version} is obsolete" p "Please install the #{script} #{version}" end exit end end end def self.enter_fs $showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ' ' $showm.call(18,0,0,0) $showm.call(13,0,0,0) $showm.call(13,0,2,0) $showm.call(18,0,2,0) end end $enabled_core = Core.version module Cache def self.particle(filename) load_bitmap("Graphics/Particles/", filename) end def self.title(filename) load_bitmap("Graphics/Title/", filename) end end module Bitcore @cached_bitmaps = {} def self.add(bitmap,key) if @cached_bitmaps.has_key?(key) p "Bitcore error!"; p "Cached bitmap: #{key}" else @cached_bitmaps[key] = bitmap end end def self::[](key) return @cached_bitmaps[key] end def self.delete(key) unless @cached_bitmaps.has_key?(key) p "Bitcore error!"; p "Uncached bitmap: #{key}" else @cached_bitmaps[key].dispose @cached_bitmaps.delete(key) end end def self.reset @cached_bitmaps.keys.each { |i| @cached_bitmaps[i].dispose } @cached_bitmaps.clear end def self.cached_bitmaps return @cached_bitmaps.keys end def self.cached_value return @cached_bitmaps.size end end class Neo_Effect attr_accessor :picture_name attr_accessor :opacity attr_accessor :color attr_accessor :blend_mode attr_accessor :angle attr_accessor :opacity_oscillation attr_accessor :ax attr_accessor :ay attr_accessor :hue_oscillation def initialize(picture, opacity, color=Tone.new(0,0,0), blend_mode=1, ax=0, ay=0, angle=0, op_os=0, hue=0) @picture_name = picture @opacity = opacity @color = color @blend_mode = blend_mode @angle = angle @opacity_oscillation = op_os @ax = ax @[member=ayrnvqrnsmij] = ay @hue_oscillation = (hue == 0 ? false : hue) end end class Title_Effect attr_accessor :picture_name attr_accessor :opacity attr_accessor :position attr_accessor :blend_mode attr_accessor :angle attr_accessor :ax attr_accessor :ay attr_accessor :z def initialize(picture, plane=false, z=1, op=255, pos=[0,0,0], blend=1, angle=0, ax=0, ay=0) @picture_name = picture @opacity = op @position = pos @blend_mode = blend @angle = angle @ax = ax @[member=ayrnvqrnsmij] = ay @z = z @plane = plane end def plane? return @plane end end