Pariu/loterie betiv

Avatar utilizator
[ST]SSH
Membru Club

Membru Club
Mesaje: 1704
Membru din: 12 Apr 2016, 23:54
Server: Fost Eluria2
Regat: Jinno
Aprecieri: 132  
Mulţumiri: 245  
 Contact:
Medalii

Sa zicem ca-i un fel de loterie,platesti o anumita suma de yang si poti castiga sau pierde :
quest betiv begin
	state start begin
		when 20041.chat."Am ceva..." begin
			
			if pc.get_empty_inventory_count() <= 0 then
				syschat("Ai inventarul plin. Trebuie sa ai o casuta libera.")
				return
			end
			if pc.get_level() <= 79 then
				say_red("Nu ai level 80 pentru a putea juca!")
				return
			end
			if 3600 > get_global_time() - pc . getqf ( "loterie_timp" ) then
				say_red("Urmatoarea loterie este peste 1 ora!")
				return
			end
			if pc.gold <= 99999999 then
				say_red("Nu detii suma de 100.000.000 yang pentru a juca!")
				return
			end
				say_title("Betiv:")            
				say_verde("Eiii...Stai...aaa. Am ceva pentru tine.")
				say_verde("Aa..Vezi ce vreme minunata e afara?")
				say_verde("Hai sa jucam un joc pe bani..")
				wait()
				say_title("Betiv: ")
				say_verde("Te va costa doar 100.000.000 yang.")
				say_verde("Poti castiga obiecte foarte bune")
				say_verde("sau chiar nimic.")
				say_verde("Garantez ca iteme furate de mine sunt")
				say_verde("de cea mai inalta calitate.")
				say_verde("Nu o sa iti para rau !")
				say_rosu("Accepti?")
				local s = select("Bine.", "Nu acum.")
				if s == 2 then
				say_title("Betiv:")
				say_verde("Esti.. uun un las.")
				say_verde("Te voi astepta.")
				return
				end
			local items = {
				0, 30517, 71123, 0, 71129, 30265, 0, 39032, 0, 38055, 50418,
				80005, 0, 72003, 39001, 71136, 0, 85005, 38301, 0, 38302, 38303, 
				0, 38304, 79000, 0, 79003, 80005, 79006, 71148, 71149, 71123,
				0, 71129, 0, 18030, 71194, 71195, 0, 80005, 71196, 
				6960, 0, 6961, 6962, 6962, 0, 50512, 72320, 0, 80005, 50508, 
				80005, 0, 50510,  50511, 80005         
			}
			
			max_items = table.getn(items)         
			random_n = number(1, max_items)
			pc . changegold ( - 100000000 )
			
			if items[random_n] == 0 then
				say_title("Betiv: ")
				say_verde("Ai pierdut.")
				say_verde("Toate astea raman la mine..")
				say_reward("Ai pierdut 100.000.000 yang.")
				return
			end
			
			if random_n == max_items then
				random_n = number(1, 15)
				if random_n == 7 then
				item_vnum = items[max_items]
				size = number(1, 2)
				else
				item_vnum = items[number(1, max_items - 1)]
				end
			else
				item_vnum = items[random_n]
				size = number(1, 1)
			end
			
			for variable = 1, size, 1 do
				pc.give_item2(item_vnum)
			end
			
			say_title("Betiv:")
			say("La naiba. Cum sa pierd eu?")   
			string_f = string.format("%s x %s", item_name(item_vnum), size)
			say_item(string_f, item_vnum, "")
			say_reward("Ai pierdut 100.000.000 yang.")
			pc.setqf("loterie_timp" , get_global_time())
			return
		end
	end            
end
Pentru acest mesaj, [ST]SSH for the post:
alinjuve23
Avatar utilizator
DragonA7X
Nivel 3

Nivel 3
Mesaje: 434
Membru din: 06 Apr 2017, 10:41
Aprecieri: 100  
Mulţumiri: 3  
Medalii

Si daca vrei sa schimbi in loc de 1 bucata in mai multe, unde schimbi mai exact?
Răspunde
Răspunsuri
0
Vizualizări
209
Răspunsuri
3
Vizualizări
794
Răspunsuri
4
Vizualizări
487
Răspunsuri
2
Vizualizări
266

Înapoi la “Quest-uri”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 3 vizitatori