Holy87

Ace Web Title Command

Aug 13th, 2013
261
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. $imported = {} if $imported == nil
  2. $imported["H87_Titleweb"] = true
  3. #==============================================================================
  4. # APRIRE PAGINA WEB DALLA SCHERMATA DEL TITOLO    v1.0
  5. # * Creato da Holy87
  6. # * Difficoltà utente: ★
  7. #==============================================================================
  8. # * DESCRIZIONE *
  9. #==============================================================================
  10. # Questo script fa comparire il comando "Web" per far aprire il browser sul
  11. # PC in una pagina web prefissata, come la pagina Facebook del gioco, il
  12. # sito ecc...
  13. #==============================================================================
  14. # * ISTRUZIONI *
  15. #==============================================================================
  16. # Incollare lo script sotto Materiali e prima del Main, e sotto lo script del
  17. # Menu Titolo Animato, se c'è.
  18. # Necessita del "Modulo di supporto" che puoi trovare a questo indirizzo:
  19. # http://pastebin.com/tNLD0STv
  20. # Configura la pagina web più in basso.
  21. #==============================================================================
  22. # * COMPATIBILITA' *
  23. #==============================================================================
  24. # Compatibile con lo script "Menu Titolo Animato"
  25. #==============================================================================
  26.  
  27.  
  28. #==============================================================================
  29. # * CONFIGURAZIONE *
  30. #==============================================================================
  31. module H87WEB
  32.   #Attivare gli web dall'inizio?
  33.   Url = "www.holy87.it" #il collegamento dove aprire il browser
  34.  
  35.   #La scritta che comparirà nella schermata del titolo:
  36.   String = "Home Page"
  37.  
  38.   #Solo se hai importato lo script del Menu Titolo Personalizzato:
  39.   Icon = "T_Web" #immagine del pulsante web
  40.   Blnn = "B_Web" #immagine del fumetto
  41.  
  42. end # FINE CONFIGURAZIONE
  43.  
  44. #==============================================================================
  45. # ATTENZIONE: NON MODIFICARE LO SCRIPT DA QUESTO PUNTO IN POI SE NON SEI ESPERTO
  46. #==============================================================================
  47.  
  48.  
  49.  
  50.  
  51. #==============================================================================
  52. # ** Scene_Title
  53. #------------------------------------------------------------------------------
  54. #  Aggiunta del comando per web
  55. #==============================================================================
  56. class Scene_Title < Scene_Base
  57.  
  58.   if $imported["H87_TitleMenu"]
  59.   #--------------------------------------------------------------------------
  60.   # * alias del metodo crea_contenuti_personalizzati
  61.   #--------------------------------------------------------------------------
  62.   alias h87_web_ccp crea_contenuti_personalizzati unless $@
  63.   def crea_contenuti_personalizzati
  64.     h87_web_ccp
  65.     add_cursor(:web,"command_website",H87WEB::Icon,H87WEB::Blnn)
  66.   end;else
  67.   #--------------------------------------------------------------------------
  68.   # * alias del metodo create_command_window
  69.   #--------------------------------------------------------------------------
  70.   alias h87_web_ccw create_command_window unless $@
  71.   def create_command_window
  72.     h87_web_ccw
  73.     @command_window.set_handler(:web, method(:command_website))
  74.   end;end
  75.  
  76.   #--------------------------------------------------------------------------
  77.   # * Apre la pagina web
  78.   #--------------------------------------------------------------------------
  79.   def command_website
  80.     Sound.play_ok if $imported["H87_TitleMenu"]
  81.     Browser.open(H87WEB::Url)
  82.   end
  83.  
  84. end #scene_title
  85.  
  86. unless $imported["H87_TitleMenu"]
  87. #==============================================================================
  88. # ** Window_titleCommand
  89. #==============================================================================
  90. class Window_TitleCommand < Window_Command
  91.   alias h87_web_mcl make_command_list unless $@
  92.   def make_command_list
  93.     h87_web_mcl
  94.     add_command(H87WEB::String, :web)
  95.   end
  96. end;end
RAW Paste Data