Upload & Download Files with Rgss

berka · Mar 22, 2009

Upload & Download Files with Rgss
Version: 2.1
By: Berka

Introduction
Now, your crazy project is able to download and upload files on ftp or http servers.

Features

No external files/libs, only Apis
Fast transfers
ProgressBars...
Ftp and http support

Screenshots

Demo
RMVX
RMXP

Script

The Net module:

Code:

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

#Â  Â Â  Â  Â  Â  Â  Â  Â  Â  Download & Upload Files with RGSS

# Â par berkaÂ  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  v 2.1Â Â  Â  Â  Â  Â  Â  Â  Â  Â rgss 2

#Â  Â Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  [url=http://www.rpgmakervx-fr.com&nbsp;&nbsp;]http://www.rpgmakervx-fr.com&nbsp;&nbsp;[/url] Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# thanks to: [url=http://www.66rpg.com]http://www.66rpg.com[/url] for documentation on wininet

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# ! do not use ftp which contains privates data

# ! this scripts need ftp account information !

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Ftp :

#Â  Â  Ã¢â€“Â¼ receive : 

#Â  Â Â  Â  Â  Â Net::Ftp.download("dir_on_ftp/file.zip","./Graphics")

#Â  Â  Ã¢â€“Â¼ send : 

#Â  Â Â  Â  Â  Â Net::Ftp.upload("./Graphics/file.zip","Ã‚Â§dir_on_ftp/file.zip")

#Â  Â  Ã¢â€“Â¼ make directory : 

#Â  Â Â  Â  Â  Â Net::Ftp.mkdir("/dir_on_ftp")

# Http :

#Â  Â  Ã¢â€“Â¼ receive : 

#Â  Â Â  Â  Â  Â Net::Http.download("url","./Graphics")

#Â  Â  Ã¢â€“Â¼ total octets downloaded : 

#Â  Â Â  Â  Â  Â Net::HTTP.dloaded

#Â  Â  Ã¢â€“Â¼ size of file : 

#Â  Â Â  Â  Â  Â Net::HTTP.size("test.zip")

#Â  Â  Ã¢â€“Â¼ % dl progress :

#Â  Â Â  Â  Â  Â Net::HTTP.progress("test.zip")

#Â  Â  Ã¢â€“Â¼ transfer time: 

#Â  Â Â  Â  Â  Â Net::HTTP.temps("test.zip")

#Â  Â  Ã¢â€“Â¼ list files : 

#Â  Â Â  Â  Â  Â Net::HTTP.transfers

#Â  Â  Ã¢â€“Â¼ file loaded? : 

#Â  Â Â  Â  Â  Â Net::HTTP.loaded?("test.zip")

#Â  Â  Ã¢â€“Â¼ octets transfered : 

#Â  Â Â  Â  Â  Â Net::HTTP.transfered

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

module Berka

Â  module NetError

Â  Â  ErrConIn="Unable to connect to Internet"

Â  Â  ErrConFtp="Unable to connect to Ftp"

Â  Â  ErrConHttp="Unable to connect to the Server"

Â  Â  ErrNoFFtpIn="The file to be download doesn't exist"

Â  Â  ErrNoFFtpEx="The file to be upload doesn't exist"

Â  Â  ErrTranHttp="Http Download is failed"

Â  Â  ErrDownFtp="Ftp Download is failed"

Â  Â  ErrUpFtp="Ftp Upload is failed"

Â  Â  ErrNoFile="No file to be download"

Â  Â  ErrMkdir="Unable to create a new directory"

Â  end

end

include Berka::NetError

module Net

Â  W='wininet'

Â  SPC=Win32API.new('kernel32','SetPriorityClass','pi','i').call(-1,128)

Â  IOA=Win32API.new(W,'InternetOpenA','plppl','l').call('',0,'','',0)

Â  IC=Win32API.new(W,'InternetConnectA','lplpplll','l')

Â  print(ErrConIn)if IOA==0

Â  module FTP

Â  Â  FSCD=Win32API.new(W,'FtpSetCurrentDirectoryA','lp','l')

Â  Â  FGF=Win32API.new(W,'FtpGetFileA','lppllll','l')

Â  Â  FPF=Win32API.new(W,'FtpPutFile','lppll','l')

Â  Â  FCD=Win32API.new(W,'FtpCreateDirectoryA','lp','l')

Â  Â  module_functionÂ 

Â  Â  def init

Â  Â  Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

Â  Â  Â  ftp="ftp.server.com"Â  Â  Â  Â  #

Â  Â  Â  port=21Â  Â Â  Â  Â  Â  Â  Â  Â  Â  Â  Â # Â Modify !

Â  Â  Â  identifiant="user"Â  Â  Â  Â  Â  Â  #

Â  Â  Â  motdepasse="password"Â Â  Â  Â #

Â  Â  Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

Â  Â  Â  @fb=IC.call(IOA,ftp,port,identifiant,motdepasse,1,0,0)

Â  Â  Â  ftp,port,identifiant,motdepasse=[nil]*4 # clear ftp ids !

Â  Â  Â  (print(ErrConFtp))if @fb==0

Â  Â  end

Â  Â  def download(ext,int='./')

Â  Â  Â  init if @fb.nil?Â  

Â  Â  Â  c=ext.split('/').pop

Â  Â  Â  if FSCD.call(@fb,ext.gsub(c,''))!=0

Â  Â  Â  Â  print(ErrDownFtp)if FGF.call(@fb,c,"#{int}/#{c}",0,32,2,0)==0

Â  Â  Â  else

Â  Â  Â  Â  print(ErrNoFFtpIn)

Â  Â  Â  end

Â  Â  end

Â  Â  def mkdir(rep)

Â  Â  Â  init if @fb.nil?

Â  Â  Â  print(ErrMkdir)if FCD.call(@fb,rep)==0

Â  Â  end

Â  Â  def upload(int,ext)

Â  Â  Â  init if @fb.nil?

Â  Â  Â  if FSCD.call(@fb,ext)&&File.exist?(int)

Â  Â  Â  Â  print(ErrUpFtp)if FPF.call(@fb,int,ext,2,0)==0

Â  Â  Â  else

Â  Â  Â  Â  print(ErrNoFFtpEx)

Â  Â  Â  end

Â  Â  end

Â  end

Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Â  module HTTP

Â  Â  IOU=Win32API.new(W,'InternetOpenUrl','lppllp','l')

Â  Â  IRF=Win32API.new(W,'InternetReadFile','lpip','l')

Â  Â  ICH=Win32API.new(W,'InternetCloseHandle','l','l')

Â  Â  HQI=Win32API.new(W,'HttpQueryInfo','llppp','i')

Â  Â  module_function

Â  Â  def sizeloaded(i=0);@read[i];end

Â  Â  def transfered;@dloaded;end

Â  Â  def transfers;@dls;end

Â  Â  def progress(i=0);(@read[i].to_f/@size[i]*100);end

Â  Â  def loaded?(i=0);@read[i]>=@size[i];end

Â  Â  def temps(i=0);@tps[i];end

Â  Â  def size(i=0);@size[i];end

Â  Â  def download(url,int='./')

Â  Â  Â  @dloaded||=0;@dls||={};@i||=-1;@size||={};@read||={};@tps={}

Â  Â  Â  a=url.split('/');serv,root,fich=a[2],a[3..a.size].join('/'),a[-1]

Â  Â  Â  print(ErrNoFile)if fich.nil?

Â  Â  Â  @dls[fich]=Thread.start(url,int){|url,int|txt='';t=Time.now

Â  Â  Â  ErrConHttp if(e=IC.call(IOA,serv,80,'','',3,1,0))==0 Â 

Â  Â  Â  f=IOU.call(IOA,url,nil,0,0,0)

Â  Â  Â  HQI.call(f,5,k="\0"*1024,[k.size-1].pack('l'),nil)

Â  Â  Â  @read[fich],@size[fich]=0,k.delete!("\0").to_i

Â  Â  Â  loop do

Â  Â  Â  Â  buf,n=' '*1024,0

Â  Â  Â  Â  r=IRF.call(f,buf,1024,o=[n].pack('i!'))

Â  Â  Â  Â  n=o.unpack('i!')[0]

Â  Â  Â  Â  break if r&&n==0

Â  Â  Â  Â  @read[fich]=(txt<<buf[0,n]).size

Â  Â  Â  end

Â  Â  Â  (File.open(int+fich,'wb')<<txt).close

Â  Â  Â  @dloaded+=@read[fich]

Â  Â  Â  ICH.call(f)

Â  Â  Â  @tps[fich]=Time.now-t

Â  Â  Â  sleep(0.001)}

Â  Â  end

Â  end

end

Â

Scene Example:

Code:

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Â Download & Upload Files with RGSS

# Â par berka Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â v 2.1 Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  rgss 2

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â www.rpgmakervx-fr.com Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â 

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Â  Â  Â  Â  Â  Â EXAMPLES !

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

class Window_Barre<Window_Base

Â  Col1=Color.new(255,0,0)

Â  Col2=Color.new(0,255,0)

Â  def initialize

Â  Â  super(100,50,344,316)

Â  Â  @dls=Net::HTTP.transfers

Â  Â  refresh

Â  end

Â  def refresh

Â  Â  i=0

Â  Â  self.contents.clear

Â  Â  self.contents.font.size=22

Â  Â  self.contents.draw_text(-16,0,self.width,WLH,"Http: Downloads",1)

Â  Â  self.contents.font.size=20

Â  Â  @dls.each_key{|file|

Â  Â  self.contents.draw_text(0,56*(i+=1),200,WLH,"--> #{file}")

Â  Â  self.contents.fill_rect(131,56*i+25,152,10,Color.new(0,0,0,150))

Â  Â  self.contents.font.size=14

Â  Â  rat="#{Net::HTTP.sizeloaded(file)/1024}/#{Net::HTTP.size(file)/1024} ko"

Â  Â  self.contents.draw_text(132,56*i+32,150,WLH,rat,1)

Â  Â  s=Net::HTTP.temps(file)

Â  Â  self.contents.draw_text(20,56*i+20,self.width,WLH,"OK:#{s} secs")if Net::HTTP.loaded?(file)

Â  Â  pr=Net::HTTP.progress(file)/100

Â  Â  self.contents.draw_text(272,56*i,self.width,WLH,"#{(pr*100).to_i}%")rescue nil

Â  Â  self.contents.gradient_fill_rect(132,56*i+26,pr*150,8,Col1,Col2)

Â  Â  self.contents.font.size=20}

Â  end

end

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

class Download<Scene_Base

Â  def start

Â  Â  super

Â  Â  @fond=Spriteset_Map.new

Â  Â  Net::HTTP.download('http://download59.mediafire.com/313lzxpdytpg/gyok0vgmm2m/hero+creator.zip')

Â  Â  Net::HTTP.download('http://www.google.fr/intl/fr_fr/images/logo.gif')

Â  Â  Net::HTTP.download('http://www.rpgrevolution.com/forums/banner3.gif')

Â  Â  Net::HTTP.download('http://i42.servimg.com/u/f42/12/32/03/86/bannie11.jpg')

Â  Â  @barre=Window_Barre.new

Â  end

Â  def terminate

Â  Â  super

Â  Â  @barre.dispose

Â  Â  @fond.dispose

Â  end

Â  def update

Â  Â  super

Â  Â  @barre.refresh

Â  end

end

Â 

def telecharger

Â  Net::HTTP.download('http://download59.mediafire.com/313lzxpdytpg/gyok0vgmm2m/hero+creator.zip')

Â  Net::HTTP.download('http://www.google.fr/intl/fr_fr/images/logo.gif')

Â  Net::HTTP.download('http://www.rpgrevolution.com/forums/banner3.gif')

Â  Net::HTTP.download('http://i42.servimg.com/u/f42/12/32/03/86/bannie11.jpg')

end

Â

The Net module

Code:

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Download & Upload Files with RGSS

# Â par berka Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â v 2.1 Â  Â  Â  Â  Â  Â  Â  Â  Â rgss 1

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  [url=http://www.rpgmakervx-fr.com&nbsp;&nbsp;]http://www.rpgmakervx-fr.com&nbsp;&nbsp;[/url] Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# thanks to: [url=http://www.66rpg.com]http://www.66rpg.com[/url] for documentation on wininet

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# ! do not use ftp which contains privates data

# ! this scripts need ftp account information !

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Ftp :

# Â  Â Ã¢â€“Â¼ receive : 

# Â  Â  Â  Â  Â Net::Ftp.download("dir_on_ftp/file.zip","./Graphics")

# Â  Â Ã¢â€“Â¼ send : 

# Â  Â  Â  Â  Â Net::Ftp.upload("./Graphics/file.zip","Ã‚Â§dir_on_ftp/file.zip")

# Â  Â Ã¢â€“Â¼ make directory : 

# Â  Â  Â  Â  Â Net::Ftp.mkdir("/dir_on_ftp")

# Http :

# Â  Â Ã¢â€“Â¼ receive : 

# Â  Â  Â  Â  Â Net::Http.download("url","./Graphics")

# Â  Â Ã¢â€“Â¼ total octets downloaded : 

# Â  Â  Â  Â  Â Net::HTTP.dloaded

# Â  Â Ã¢â€“Â¼ size of file : 

# Â  Â  Â  Â  Â Net::HTTP.size("test.zip")

# Â  Â Ã¢â€“Â¼ % dl progress :

# Â  Â  Â  Â  Â Net::HTTP.progress("test.zip")

# Â  Â Ã¢â€“Â¼ transfer time: 

# Â  Â  Â  Â  Â Net::HTTP.temps("test.zip")

# Â  Â Ã¢â€“Â¼ list files : 

# Â  Â  Â  Â  Â Net::HTTP.transfers

# Â  Â Ã¢â€“Â¼ file loaded? : 

# Â  Â  Â  Â  Â Net::HTTP.loaded?("test.zip")

# Â  Â Ã¢â€“Â¼ octets transfered : 

# Â  Â  Â  Â  Â Net::HTTP.transfered

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

module Berka

Â  module NetError

Â  Â  ErrConIn="Unable to connect to Internet"

Â  Â  ErrConFtp="Unable to connect to Ftp"

Â  Â  ErrConHttp="Unable to connect to the Server"

Â  Â  ErrNoFFtpIn="The file to be download doesn't exist"

Â  Â  ErrNoFFtpEx="The file to be upload doesn't exist"

Â  Â  ErrTranHttp="Http Download is failed"

Â  Â  ErrDownFtp="Ftp Download is failed"

Â  Â  ErrUpFtp="Ftp Upload is failed"

Â  Â  ErrNoFile="No file to be download"

Â  Â  ErrMkdir="Unable to create a new directory"

Â  end

end

module Net

Â  W='wininet'

Â  SPC=Win32API.new('kernel32','SetPriorityClass','pi','i').call(-1,128)

Â  IOA=Win32API.new(W,'InternetOpenA','plppl','l').call('',0,'','',0)

Â  IC=Win32API.new(W,'InternetConnectA','lplpplll','l')

Â  print(Berka::NetErrorErr::ConIn)if IOA==0

Â  module FTP

Â  Â  FSCD=Win32API.new(W,'FtpSetCurrentDirectoryA','lp','l')

Â  Â  FGF=Win32API.new(W,'FtpGetFileA','lppllll','l')

Â  Â  FPF=Win32API.new(W,'FtpPutFile','lppll','l')

Â  Â  FCD=Win32API.new(W,'FtpCreateDirectoryA','lp','l')

Â  Â  module_function Â  Â 

Â  Â  def init

Â  Â  Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

Â  Â  Â  ftp="ftp.server.com" Â  Â  Â  Â  Â #

Â  Â  Â  port=21 Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â # Â A modifier !

Â  Â  Â  identifiant="user" Â  Â  Â  Â  Â  Â #

Â  Â  Â  motdepasse="password" Â  Â  Â  Â #

Â  Â  Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-#

Â  Â  Â  @fb=IC.call(IOA,ftp,port,identifiant,motdepasse,1,0,0)

Â  Â  Â  ftp,port,identifiant,motdepasse=[nil]*4 # efface les ids par sÃ©curitÃ©

Â  Â  Â  (print(Berka::NetError::ErrConFtp))if @fb==0

Â  Â  end

Â  Â  def download(ext,int='./')

Â  Â  Â  init if @fb.nil? Â  Â 

Â  Â  Â  c=ext.split('/').pop

Â  Â  Â  if FSCD.call(@fb,ext.gsub(c,''))!=0

Â  Â  Â  Â  print(Berka::NetErrorErr::ErrDownFtp)if FGF.call(@fb,c,"#{int}/#{c}",0,32,2,0)==0

Â  Â  Â  else

Â  Â  Â  Â  print(Berka::NetErrorErr::ErrNoFFtpIn)

Â  Â  Â  end

Â  Â  end

Â  Â  def mkdir(rep)

Â  Â  Â  init if @fb.nil?

Â  Â  Â  print(Berka::NetErrorErr::ErrMkdir)if FCD.call(@fb,rep)==0

Â  Â  end

Â  Â  def upload(int,ext)

Â  Â  Â  init if @fb.nil?

Â  Â  Â  if FSCD.call(@fb,ext)&&File.exist?(int)

Â  Â  Â  Â  print(Berka::NetErrorErr::ErrUpFtp)if FPF.call(@fb,int,ext,2,0)==0

Â  Â  Â  else

Â  Â  Â  Â  print(Berka::NetErrorErr::ErrNoFFtpEx)

Â  Â  Â  end

Â  Â  end

Â  end

Â  #-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Â  module HTTP

Â  Â  IOU=Win32API.new(W,'InternetOpenUrl','lppllp','l')

Â  Â  IRF=Win32API.new(W,'InternetReadFile','lpip','l')

Â  Â  ICH=Win32API.new(W,'InternetCloseHandle','l','l')

Â  Â  HQI=Win32API.new(W,'HttpQueryInfo','llppp','i')

Â  Â  module_function

Â  Â  def sizeloaded(i='');@read[i];end

Â  Â  def transfered;@dloaded;end

Â  Â  def transfers;@dls;end

Â  Â  def progress(i='');(@read[i].to_f/@size[i]*100);end

Â  Â  def loaded?(i='');@read[i]>=@size[i]rescue nil;end

Â  Â  def temps(i='');@tps[i]if loaded?(i);end

Â  Â  def size(i='');@size[i];end

Â  Â  def download(url,int='./')

Â  Â  Â  @dloaded||=0;@dls||={};@i||=-1;@size||={};@read||={};@tps={}

Â  Â  Â  a=url.split('/');serv,root,fich=a[2],a[3..a.size].join('/'),a[-1]

Â  Â  Â  print(Berka::NetErrorErr::ErrNoFile)if fich.nil?

Â  Â  Â  @dls[fich]=Thread.start(url,int){|url,int|txt='';t=Time.now

Â  Â  Â  Berka::NetErrorErr::ErrConHttp if(e=IC.call(IOA,serv,80,'','',3,1,0))==0 Â 

Â  Â  Â  f=IOU.call(IOA,url,nil,0,0,0)

Â  Â  Â  HQI.call(f,5,k="\0"*1024,[k.size-1].pack('l'),nil)

Â  Â  Â  @read[fich],@size[fich]=0,k.delete!("\0").to_i

Â  Â  Â  loop do

Â  Â  Â  Â  buf,n=' '*1024,0

Â  Â  Â  Â  r=IRF.call(f,buf,1024,o=[n].pack('i!'))

Â  Â  Â  Â  n=o.unpack('i!')[0]

Â  Â  Â  Â  break if r&&n==0

Â  Â  Â  Â  txt << buf[0,n]

Â  Â  Â  Â  @read[fich]=txt.size

Â  Â  Â  end

Â  Â  Â  (File.open(int+fich,'wb')<<txt).close

Â  Â  Â  @dloaded+=@read[fich]

Â  Â  Â  ICH.call(f);sleep(0.01)

Â  Â  Â  @tps[fich]=Time.now-t}

Â  Â  end

Â  end

end

The Scene Example:

Code:

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Â TÃ©lÃ©chargement de fichiers en Rgss

# Â par berka Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â v 2.1 Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  rgss 1

# Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â www.rpgmakervx-fr.com Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â  Â 

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

# Â  Â  Â  Â  Â  Â EXEMPLES !

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

class Window_Barre<Window_Base

Â  def initialize

Â  Â  super(100,50,440,380)

Â  Â  self.contents=Bitmap.new(width-32,height-32)

Â  Â  self.contents.font.name=$fontface

Â  Â  self.contents.font.size=$fontsize

Â  Â  # on initialise un tableau de tÃ©lÃ©chargement

Â  Â  @dls=Net::HTTP.transfers

Â  Â  refresh

Â  end

Â  def refresh

Â  Â  i=0

Â  Â  self.contents.clear

Â  Â  self.contents.font.size=22

Â  Â  self.contents.draw_text(-16,0,self.width,24,"Http: Gestionnaire de tÃ©lÃ©chargement",1)

Â  Â  self.contents.font.size=20

Â  Â  # pour chaque tÃ©lÃ©chargement

Â  Â  @dls.each_key{|file|

Â  Â  self.contents.draw_text(0,56*(i+=1),200,24,"--> #{file}")

Â  Â  self.contents.fill_rect(131,56*i+25,202,10,Color.new(0,0,0,150))

Â  Â  self.contents.font.size=14

Â  Â  # on rÃ©cupere le pourcentage du tÃ©lÃ©chargement

Â  Â  pr=Net::HTTP.progress(file)/100

Â  Â  # on Ã©crit le rapport: octets tÃ©lÃ©chargÃ©s / taille totale

Â  Â  rat="#{Net::HTTP.sizeloaded(file)/1024}/#{Net::HTTP.size(file)/1024} ko"

Â  Â  self.contents.draw_text(132,56*i+32,150,24,rat,1)

Â  Â  # on rÃ©cupÃ¨re le temps de tÃ©lÃ©chargement du fichier

Â  Â  s=Net::HTTP.temps(file)

Â  Â  # on l'Ã©crit

Â  Â  self.contents.draw_text(20,56*i+20,self.width,24,"Fait en #{s} secs")

Â  Â  # on Ã©crit le pourcentage de progression

Â  Â  self.contents.draw_text(342,56*i+26,self.width,24,"#{(pr*100).to_i}%")rescue nil

Â  Â  # et on trace la barre

Â  Â  self.contents.fill_rect(132,56*i+26,pr*200,8,Color.new(0,255,0))

Â  Â  self.contents.font.size=20}

Â  end

end

#-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

class Scene_Download

Â  def main

Â  Â  @fond=Spriteset_Map.new

Â  Â  # chargement des fichiers

Â  Â  Net::HTTP.download('http://download59.mediafire.com/313lzxpdytpg/gyok0vgmm2m/hero+creator.zip')

Â  Â  Net::HTTP.download('http://www.google.fr/intl/fr_fr/images/logo.gif')

Â  Â  Net::HTTP.download('http://www.rpgrevolution.com/forums/banner3.gif')

Â  Â  Net::HTTP.download('http://i42.servimg.com/u/f42/12/32/03/86/bannie11.jpg')

Â  Â  #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Â  Â  @barre=Window_Barre.new

Â  Â  Graphics.transition

Â  Â  loop do

Â  Â  Â  Input.update

Â  Â  Â  Graphics.update

Â  Â  Â  update

Â  Â  Â  break if $scene != self

Â  Â  end

Â  Â  Graphics.freeze

Â  Â  @fond.dispose

Â  Â  @barre.dispose

Â  end

Â  def update

Â  Â  @barre.refresh

Â  Â  $scene=Scene_Map.new if Input.trigger?(Input::B)

Â  end

end

Â

Instructions

Ftp :
receive : Net::FTP.download("file_on_ftp","./Graphics")
send : Net::FTP.upload("file_in_project","dir_on_ftp")
Http :
receive : Net::HTTP.download("url","./Graphics")

The downloaded file has the same name of the original

FAQ
Paste this script above main

Compatibility
No Problem I think !

Credits and Thanks
Msdn, my best friend ^^
http://www.66rpg.com for parts of scripts !

Author's Notes
next feature:
evaluate the size of the file: done.
evaluate if the file exists: done.

Terms and Conditions
Free for using, but I need credits. Do not post this script anywhere without my permission !

enjoy,
berka

Ulqiorra · Mar 22, 2009

Will ther be an XP version? Or will it already work with XP?

nowayskill · Mar 23, 2009

amazing just freakin amazing@!

berka · Mar 23, 2009

Thanks !
I'll made a rmxp version !

berka

Ulqiorra · Mar 23, 2009

Thanks, I like this.

berka · Mar 26, 2009

New version !
only for rmvx but xp's coming soon !

berka

Fallen · Mar 26, 2009

One day we will be able to make games that weight just 1KB, all Info/Graphics will be downloaded from the web. that would be cool! the "Loading" Screen Era will come to RPG Maker

Ulqiorra · Mar 27, 2009

I get an error with #example.

script '#example' line 29 : FloatDomainError
Infinity

Xaixis · Mar 27, 2009

This is very cool, and would be definitely do-able with sites such as 110mb.com, this would be awesome for people who don't want to clog their system with large games

Ulqiorra · Mar 27, 2009

I have one more thing: How do I use the files I download with this?

Guest · Mar 27, 2009

woratana · Mar 27, 2009

Fallen":rl4mo8m3 said:
One day we will be able to make games that weight just 1KB, all Info/Graphics will be downloaded from the web. that would be cool! the "Loading" Screen Era will come to RPG Maker

I think this script would work better for patch system or something around that line. :D

acrox999 · Mar 27, 2009

Man, no for XP??? THIS IS AN AWESOME SCRIPT!!!!

berka · Mar 27, 2009

berka":41a5uxgw said:
only for rmvx but xp's coming soon !

thanks !

berka

Axules · Mar 27, 2009

Near":38tdhs92 said:
I get an error with #example.

script '#example' line 29 : FloatDomainError
Infinity

Same for me in the VX version.

berka · Mar 27, 2009

ok I'll fix it !
thanks
berka

Edit: I've posted all the scripts ! :wink:

Ulqiorra · Mar 27, 2009

berka":k6ogzgpg said:
ok I'll fix it !
thanks
berka

Edit: I've posted all the scripts ! :wink:

Now the game freezes when I talk to the guy.

berka · Mar 27, 2009

how long does it freeze ?
Does it crash ?
Which version are you using ?
I'll put rgss dll files into the rar

berka

Ulqiorra · Mar 27, 2009

It freezes until I close the game, and I'm using the original demo, with the new example scene script.

vgvgf · Mar 27, 2009

Really nice, and also it will come in handy for one of my projects which need to be updated.

Envision, Create, Share

Upload & Download Files with Rgss

berka

Ulqiorra

nowayskill

berka

Ulqiorra

berka

Fallen

Ulqiorra

Xaixis

Ulqiorra

Guest

Guest

woratana

acrox999

berka

Axules

berka

Ulqiorra

berka

Ulqiorra

vgvgf

Share this page

Thank you for viewing

Discord

RPG Maker

Content