Unmantained Guida [TWO-RELEASE]Evento Calze(diverso) e Banca Ri-Migliorata

Kayle · 15 Dicembre 2010

Banca:
Dato che in molte banche c'è il fatto del massimo 1.999.999.999 yang e tutti sbagliano e alla fine perdono gli yang, ho deciso di fare questa banca sia con INPUT, sia con bug FIXATO (Autoban) sia che ti avvisa se ti bugghi yang o no.
Aggiunto anche il codice di sicurezza (idea non mia ma di XXX, ditemi il nome che lo metto).
Il codice di sicurezza vi serve se avete dimenticato il PIN, sbagliate il PIN e potrete recuperarlo.
ESEMPIO: Uno prova ad usare il Bug, e viene bannato

Codice:

function t ( )
say_title ( "New_Bank_by_S4LV0DM:" )
end
t ( )
if pc . getqf ( "new_bank_pin" ) == 0 then
say ( "Non hai ancora settato il tuo PIN." )
say ( "Inserisci un PIN." )
local pin = tonumber(input())
t ( )
if pin == nil then
say ( "Inserisci un PIN" )
return
end
say ( "Inserisci il Codice di Sicurezza" )
local security = tonumber(input())
t ( )
if security == nil then
say ( "Inserisci il codice di sicurezza!" )
return
end
say ( "PIN e codice di sicurezza SETTATI!" )
pc . setqf ( "new_bank_pin" , pin )
pc . setqf ( "new_bank_security" , security )
wait ( )
end
say ( "Ciao!" )
say ( "Benvenuto nella banca" )
say ( "Inserisci il PIN" )
local pin = tonumber(input())
t ( )
if pin ~= pc . getqf ( "new_bank_pin" ) then
say ( "PIN non corretto." )
say ( "Hai dimenticato il PIN?" )
local siono = select ( "Si","No" )
if siono == 2 then
return
elseif siono == 1 then
t ( )
say ( "Inserisci il codice di sicurezza" )
local security = tonumber(input())
if security ~= pc . getqf ( "new_bank_security" ) then
say ( "Codice di sicurezza errato" )
return
end
say ( "Il tuo PIN era " .. pc . getqf ( "new_bank_pin" ) )
say ( "Vuoi resettarlo in 12345?" )
siono = select ( "Si","No" )
if siono == 2 then
return
elseif siono == 1 then
t ( )
pc . setqf ( "new_bank_pin" , 12345 )
say ( "PIN Resettato" )
return
end
end
end
say ( "Cosa vuoi fare?" )
local scegli = select ( "Deposita","Ritira","Modifica PIN" )
if scegli == 3 then
t ( )
say ( "Inserisci il vecchio PIN." )
local pinv = tonumber(input())
t ( )
if pinv == nil then
say ( "Inserisci un PIN!" )
return
end
if pinv ~= pc . getqf ( "new_bank_pin" ) then
say ( "PIN errato!" )
return 
end
say ( "Inserisci il nuovo PIN!" )
local pinn = tonumber(input())
if pinn == nil then
say ( "Inserisci un PIN!" )
return
end
say ( "PIN Settato in " .. pinn )
pc . setqf ( "new_bank_pin" , pinn )
return
elseif scegli == 1 then
t ( )
say ( "In quale SLOT vuoi depositare?" )
scegli = select ( "Slot 1","Slot 2","Slot 3" )
if scegli == 1 then
t ( )
local depositati = pc . getqf ( "new_bank_s1" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s1" , depositati + sd )
pc . changegold ( -sd )
return
elseif scegli == 2 then
t ( )
local depositati = pc . getqf ( "new_bank_s2" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s2" , depositati + sd )
pc . changegold ( -sd )
return
elseif scegli == 3 then
t ( )
local depositati = pc . getqf ( "new_bank_s3" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s3" , depositati + sd )
pc . changegold ( -sd )
return
end
elseif scegli == 2 then
t ( )
say ( "In quale SLOT vuoi ritirare?" )
scegli = select ( "Slot 1","Slot 2","Slot 3" )
if scegli == 1 then
t ( )
local depositati = pc . getqf ( "new_bank_s1" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s1" , depositati - yang )
elseif scegli == 2 then
t ( )
local depositati = pc . getqf ( "new_bank_s2" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s2" , depositati - yang )
elseif scegli == 3 then
t ( )
local depositati = pc . getqf ( "new_bank_s3" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s3" , depositati - yang )
end
end

PS: Per il BAN, è necessario il MIO bantool.

Calze:
So che è già stata postata ed etc, ma questa è diversa:
Le calze si droppano da tutti i mob.

Codice:

quest eventocalze begin
 state start begin
  when letter with game . get_event_flag ( "christmas_event" ) == 1 begin
   send_letter ( "Evento Calze ATTIVO" ) 
  end
  when letter with game . get_event_flag ( "christmas_event" ) == 0 and game . get_event_flag ( "mostra" ) == 1 begin
   send_letter ( "EVENTO CALZE DISATTIVATO" )
  end
  when button or info with game . get_event_flag ( "christmas_event" ) == 1 begin
   say_title ( "Evento:" )
   say ( "Ciao!" )
   say ( "Adesso puoi droppare le calze dai mob!" )
   say ( "Buon drop ;)" )
  end
  when kill with npc . is_pc ~= true and game . get_event_flag ( "christmas_event" ) == 1 begin
   local r = math.random(100)
   if r == 1 then
   chat ( "Hai trovato la calza!" )
   pc . setqf ( "trovate" , pc . getqf ( "trovate" ) + 1 )
   pc . give_item2 ( "valuecalza" )
   end
  end
  when button or info with game . get_event_flag ( "christmas_event" ) == 0 and game . get_event_flag ( "mostra" ) == 1 begin
   say_title ( "Evento:" )
   say ( "L'evento calze e' stato disattivato!" )
   say ( "Hai trovato " .. pc . getqf ( "trovate" ) .. " calze!" )
   say ( "Ciao!" )
  end
 end
end

(Quest calze non testata).
Spero vi sia utile. Bye

Rubbino · 15 Dicembre 2010

S4LV0 l'evento calze è diverso da quello di pricess?
cmq ottimo

Kayle · 15 Dicembre 2010

Rubbino ha detto:
S4LV0 l'evento calze è diverso da quello di pricess?
cmq ottimo

Sì, è diverso, qui si droppa da tutti i mob

ScarpeSciolte · 15 Dicembre 2010

Bella salvo +1

Kayle · 15 Dicembre 2010

Grazie

LacrimaNera · 15 Dicembre 2010

ottimo

Sl3ven · 15 Dicembre 2010

S4LV0DM ha detto:
Banca:

ESEMPIO: Uno prova ad usare il Bug, e viene bannato

PS: Per il BAN, è necessario il MIO bantool.

1- dove lo troviamo il bantool?
2- nello script non mi sembra di aver visto stringhe riguardo al ban se mi sbaglio incollamele

Kayle · 15 Dicembre 2010

Domineco ha detto:
1- dove lo troviamo il bantool?
2- nello script non mi sembra di aver visto stringhe riguardo al ban se mi sbaglio incollamele

Lo trovi nel mio post "TUTTE LE MIE RELEASE - Aggiornata".

Abio© · 15 Dicembre 2010

Domineco ha detto:
1- dove lo troviamo il bantool?
2- nello script non mi sembra di aver visto stringhe riguardo al ban se mi sbaglio incollamele

1-lo trovi nelle sue release
2-

say ( "Il bug e' stato fixato " )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )

ripetuto circa 3 volte come nn lo hai visto u.u

ShamyXx03 · 15 Dicembre 2010

bravo.
se nn vogliamo che ki usa il bug venga bannato basta solo togliere tutti i
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )

giusto?

Sl3ven · 15 Dicembre 2010

meox ha detto:
1-lo trovi nelle sue release
2-
ripetuto circa 3 volte come nn lo hai visto u.u

me lo devi ripetere? ho capito

luzzi · 15 Dicembre 2010

when kill with npc . is_pc ~= true and game . get_rvent_flag ( "christmas_event" ) == 1 begin

Salvo sbaglio o qui dovrebbe essere get_event_flag ?

Kayle · 15 Dicembre 2010

errore mio, correggo <.<

giovannixx03 ha detto:
bravo.
se nn vogliamo che ki usa il bug venga bannato basta solo togliere tutti i
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )

giusto?

esatto

Superisi · 15 Dicembre 2010

bravo

Kayle · 15 Dicembre 2010

Superisi ha detto:
bravo

Grazie

Homer_Jay · 15 Dicembre 2010

Ottimo come sempre

SkipperS · 15 Dicembre 2010

ma allora se io scrivo in game con poteri gm il seguente comando:
/event christmas mi attiva il drop delle calze?

Kayle · 15 Dicembre 2010

/e christmas_event 1

PianoPlayer · 15 Dicembre 2010

Very good

iToKi RuleZ · 15 Dicembre 2010

Grande salvo

bigietto · 15 Dicembre 2010

S4LV0DM ha detto:

Banca:
Dato che in molte banche c'è il fatto del massimo 1.999.999.999 yang e tutti sbagliano e alla fine perdono gli yang, ho deciso di fare questa banca sia con INPUT, sia con bug FIXATO (Autoban) sia che ti avvisa se ti bugghi yang o no.
Aggiunto anche il codice di sicurezza (idea non mia ma di XXX, ditemi il nome che lo metto).
Il codice di sicurezza vi serve se avete dimenticato il PIN, sbagliate il PIN e potrete recuperarlo.
ESEMPIO: Uno prova ad usare il Bug, e viene bannato

Codice:

function t ( )
say_title ( "New_Bank_by_S4LV0DM:" )
end
t ( )
if pc . getqf ( "new_bank_pin" ) == 0 then
say ( "Non hai ancora settato il tuo PIN." )
say ( "Inserisci un PIN." )
local pin = tonumber(input())
t ( )
if pin == nil then
say ( "Inserisci un PIN" )
return
end
say ( "Inserisci il Codice di Sicurezza" )
local security = tonumber(input())
t ( )
if security == nil then
say ( "Inserisci il codice di sicurezza!" )
return
end
say ( "PIN e codice di sicurezza SETTATI!" )
pc . setqf ( "new_bank_pin" , pin )
pc . setqf ( "new_bank_security" , security )
wait ( )
end
say ( "Ciao!" )
say ( "Benvenuto nella banca" )
say ( "Inserisci il PIN" )
local pin = tonumber(input())
t ( )
if pin ~= pc . getqf ( "new_bank_pin" ) then
say ( "PIN non corretto." )
say ( "Hai dimenticato il PIN?" )
local siono = select ( "Si","No" )
if siono == 2 then
return
elseif siono == 1 then
t ( )
say ( "Inserisci il codice di sicurezza" )
local security = tonumber(input())
if security ~= pc . getqf ( "new_bank_security" ) then
say ( "Codice di sicurezza errato" )
return
end
say ( "Il tuo PIN era " .. pc . getqf ( "new_bank_pin" ) )
say ( "Vuoi resettarlo in 12345?" )
siono = select ( "Si","No" )
if siono == 2 then
return
elseif siono == 1 then
t ( )
pc . setqf ( "new_bank_pin" , 12345 )
say ( "PIN Resettato" )
return
end
end
end
say ( "Cosa vuoi fare?" )
local scegli = select ( "Deposita","Ritira","Modifica PIN" )
if scegli == 3 then
t ( )
say ( "Inserisci il vecchio PIN." )
local pinv = tonumber(input())
t ( )
if pinv == nil then
say ( "Inserisci un PIN!" )
return
end
if pinv ~= pc . getqf ( "new_bank_pin" ) then
say ( "PIN errato!" )
return 
end
say ( "Inserisci il nuovo PIN!" )
local pinn = tonumber(input())
if pinn == nil then
say ( "Inserisci un PIN!" )
return
end
say ( "PIN Settato in " .. pinn )
pc . setqf ( "new_bank_pin" , pinn )
return
elseif scegli == 1 then
t ( )
say ( "In quale SLOT vuoi depositare?" )
scegli = select ( "Slot 1","Slot 2","Slot 3" )
if scegli == 1 then
t ( )
local depositati = pc . getqf ( "new_bank_s1" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s1" , depositati + sd )
pc . changegold ( -sd )
return
elseif scegli == 2 then
t ( )
local depositati = pc . getqf ( "new_bank_s2" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s2" , depositati + sd )
pc . changegold ( -sd )
return
elseif scegli == 3 then
t ( )
local depositati = pc . getqf ( "new_bank_s3" )
say ( "Attualmente sono depositati " .. depositati .. " yang." )
say ( "Quanti yang vuoi depositare?" )
local sd = tonumber(input())
t ( )
local att = sd + depositati
if sd == nil then
say ( "Inserisci un numero" )
return
end
if att > 1999999999 then
say ( "Il numero cosi' sara' troppo alto!" )
return
end
if sd < 1 then
say ( "Il bug e' stato fixato ;)" )
game . set_event_flag ( "banned_" .. pc . get_name ( ) , 1 )
return
end
if pc . get_gold ( ) < sd then
say ( "Non hai abbastanza yang" )
return
end
say ( "I soldi sono stati depositati" )
pc . setqf ( "new_bank_s3" , depositati + sd )
pc . changegold ( -sd )
return
end
elseif scegli == 2 then
t ( )
say ( "In quale SLOT vuoi ritirare?" )
scegli = select ( "Slot 1","Slot 2","Slot 3" )
if scegli == 1 then
t ( )
local depositati = pc . getqf ( "new_bank_s1" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s1" , depositati - yang )
elseif scegli == 2 then
t ( )
local depositati = pc . getqf ( "new_bank_s2" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s2" , depositati - yang )
elseif scegli == 3 then
t ( )
local depositati = pc . getqf ( "new_bank_s3" )
say ( "Attualmente sono depositati " .. depositati .. " yang" )
say ( "Quanti yang vuoi ritirare?" )
local yang = tonumber(input())
local somma = yang + pc . get_gold ( )
t ( )
if yang == nil then
say ( "Inserisci un numero!" )
return
end
if yang < 1 then
say ( "Il bug e' stato fixato ;)" )
return
end
if somma > 1999999999 then
say ( "Somma troppo alta" )
return
end
if depositati < yang then
say ( "Tutti questi yang non sono disponibili" )
return
end
pc . changegold ( yang )
pc . setqf ( "new_bank_s3" , depositati - yang )
end
end

PS: Per il BAN, è necessario il MIO bantool.

Calze:
So che è già stata postata ed etc, ma questa è diversa:
Le calze si droppano da tutti i mob.

Codice:

quest eventocalze begin
 state start begin
  when letter with game . get_event_flag ( "christmas_event" ) == 1 begin
   send_letter ( "Evento Calze ATTIVO" ) 
  end
  when letter with game . get_event_flag ( "christmas_event" ) == 0 and game . get_event_flag ( "mostra" ) == 1 begin
   send_letter ( "EVENTO CALZE DISATTIVATO" )
  end
  when button or info with game . get_event_flag ( "christmas_event" ) == 1 begin
   say_title ( "Evento:" )
   say ( "Ciao!" )
   say ( "Adesso puoi droppare le calze dai mob!" )
   say ( "Buon drop ;)" )
  end
  when kill with npc . is_pc ~= true and game . get_event_flag ( "christmas_event" ) == 1 begin
   local r = math.random(100)
   if r == 1 then
   chat ( "Hai trovato la calza!" )
   pc . setqf ( "trovate" , pc . getqf ( "trovate" ) + 1 )
   pc . give_item2 ( "valuecalza" )
   end
  end
  when button or info with game . get_event_flag ( "christmas_event" ) == 0 and game . get_event_flag ( "mostra" ) == 1 begin
   say_title ( "Evento:" )
   say ( "L'evento calze e' stato disattivato!" )
   say ( "Hai trovato " .. pc . getqf ( "trovate" ) .. " calze!" )
   say ( "Ciao!" )
  end
 end
end

(Quest calze non testata).
Spero vi sia utile. Bye

Non Funziona ... la quest delle calze, non si apre nulla appena vado sull'npc..
Come devo chiamare il file .start?

Kayle · 16 Dicembre 2010

bigietto ha detto:
Non Funziona ... la quest delle calze, non si apre nulla appena vado sull'npc..
Come devo chiamare il file .start?

Ma nella quest delle calze non si va da un npc.
devi fare /e christmas_event 1
e poi /e mostra 1.

La banca è funzionante, l'ho testata.

Mando2 · 19 Dicembre 2010

a me non funziona lo stesso o_O

non mi appare la quest XD cm risolvo?

Kayle · 19 Dicembre 2010

ma hai fatto /e christmas_event 1...

Mando2 · 19 Dicembre 2010

si e anche /e mostra 1