I decided to prepare this system, on the recommendation of a friend. I hope you enjoy, and you used. First, I do not think any bugs in the system. I tried to avoid any kind of bug that could, at least as far as I checked. If you encounter any bugs please let. The fix in a short time I publish a new one. In addition, the coding system for getting a bit of a hurry I could have done inexperience. Using the function, but was going to do it that way because I'm rushing. And it does not seem to have any problems in handy again.
What is the Offline Shopping System to do?
Players not in the game is a system that can even sell items.
How the system works?
Players throw on goods they want to sell NPC. Then, against the price, how long the information will remain on the sales and revenues which category you want to add. After making the selection of necessary attachments to exchange goods. Players may withdraw the goods and wills can update the prices of goods. It expires if the player's belongings after he blocked the sale of expired goods and goods sent to the player's safe entry and exit in the event of any game and is deleted from the shopping list. If a player of goods sold, Shopping Box of money is saved. If all merchandise sold money is kept there and wished you could take the money players.
If I'd let me share a detailed video on how the system works:
MySQL file "players" are adding to the database. You do not need to take any action. (After making the additions you do not need to take REBOOT)
Now we need to do another operation. "Player" table below, right click the "Design Table" call.
Then, "we alisveris_para" We are adding to our database column name.
IMPORTANT NOTE: The default value of 0 must do! Very important.
BETWEEN THE AMOUNT OF MONEY. (DOT) DO place:
Now between the amount of money. (Period) we came to put function. You also have to add this function. If you do not include this function the system work. According to him, it was coded. Now add to that function will show:
"questlib.lu" file, we are opening and closing, add the following code at the bottom. No need to reboot to take. No need to take any further action. "questlib.lu to" the bottom of the Simply add the code I have given below.
PHP Code:
function genel_veri(gelen_miktar) gelen2 = tostring(gelen_miktar) local gelen = gelen_miktar local sayac = 10 local basamak = 1 local ilkhal = basamak while true do if gelen / sayac >= 1 then basamak = basamak + 1 sayac = sayac * 10 else break end end t = {} sonucText = "" for i=1, string.len(gelen2) do t[i]= (string.sub(gelen2,i,i)) end for k , v in pairs(t) do--1324 if (basamak == 9 or basamak == 6 or basamak == 3) and sonucText != "" then sonucText = sonucText.."." sonucText = sonucText..v else sonucText = sonucText..v end basamak = basamak - 1 end return sonucText end
After this process the bit "quest_functions" file and opens to the bottom "genel_ver" function, we are adding. We're done with this place.
LUA swipe file:
1) usr / game / share / locale / turkey / quests section "alisveris_sistemi.lu to" We put the file. Later;
2) We come to putty.
cd / usr / game / share / locale / turkey / quests are enterliy wrote. Then we write the following command.
./qc alisveris_sistemi.lua
We are done with putty.
3) We're going to the game and with a GM character "/ reload q" is suffering.
4) Then you can start using the Offline Shopping System.
You don't have the right questlib to execute the mysql_query10 command, so the quest is trying to use it as a global variable.
Add this to your questlib:
Code:
mysql_query10 = function(query)
if not pre then
local rt = io.open('CONFIG','r'):read('*all')
pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+) %s(%S+).+','-h%1 -u%2 -p%3 -D%4')
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2 ^10),{},{}
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- für MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- für MySQL55
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,b)
out[i-1] = out[i-1] or {}
out[i-1][a] = tostring(b) or b or 'NULL'
out[t[1][a]] = out[t[1][a]] or {}
out[t[1][a]][i-1] = tostring(b) or b or 'NULL'
end) end
return out
end
You don't have the right questlib to execute the mysql_query10 command, so the quest is trying to use it as a global variable.
Add this to your questlib:
Code:
mysql_query10 = function(query)
if not pre then
local rt = io.open('CONFIG','r'):read('*all')
pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+) %s(%S+).+','-h%1 -u%2 -p%3 -D%4')
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2 ^10),{},{}
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- für MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- für MySQL55
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,b)
out[i-1] = out[i-1] or {}
out[i-1][a] = tostring(b) or b or 'NULL'
out[t[1][a]] = out[t[1][a]] or {}
out[t[1][a]][i-1] = tostring(b) or b or 'NULL'
end) end
return out
end
Inserted, but the problem hasn't changed. I enclose my questlib maybe I was wrong
q.set_clock = function(name, value) q.set_clock_name(name) q.set_clock_value(value) end
q.set_counter = function(name, value) q.set_counter_name(name) q.set_counter_value(value) end
c_item_name = function(vnum) return ("[ITEM value;"..vnum.."]") end
c_mob_name = function(vnum) return ("[MOB value;"..vnum.."]") end
-- d.set_folder = function (path) raw_script("[SET_PATH path;"..path.."]") end
-- d.set_folder = function (path) path.show_cinematic("[SET_PATH path;"..path.."]") end
-- party.run_cinematic = function (path) party.show_cinematic("[RUN_CINEMATIC value;"..path.."]") end
newline = "[ENTER]"
function color256(r, g, b) return "[COLOR r;"..(r/255.0).."|g;"..(g/255.0).."|b;"..(b/255.0).."]" end
function color(r,g,b) return "[COLOR r;"..r.."|g;"..g.."|b;"..b.."]" end
function delay(v) return "[DELAY value;"..v.."]" end
function setcolor(r,g,b) raw_script(color(r,g,b)) end
function setdelay(v) raw_script(delay(v)) end
function resetcolor(r,g,b) raw_script("[/COLOR]") end
function resetdelay(v) raw_script("[/DELAY]") end
-- trim a string
function trim(s) return (string.gsub(s, "^%s*(.-)%s*$", "%1")) end
-- minimap에 동그라미 표시
function addmapsignal(x,y) raw_script("[ADDMAPSIGNAL x;"..x.."|y;"..y.."]") end
-- minimap 동그라미들 모두 클리어
function clearmapsignal() raw_script("[CLEARMAPSIGNAL]") end
-- 클라이언트에서 보여줄 대화창 배경 그림을 정한다.
function setbgimage(src) raw_script("[BGIMAGE src;") raw_script(src) raw_script("]") end
-- 대화창에 이미지를 보여준다.
function addimage(x,y,src) raw_script("[IMAGE x;"..x.."|y;"..y) raw_script("|src;") raw_script(src) raw_script("]") end
-- generate when a linebreak in the functions: d.notice,notice,notice_all
function notice_multiline( str , func )
local p = 0
local i = 0
while true do
i = string.find( str, "%[ENTER%]", i+1 )
if i == nil then
if string.len(str) > p then
func( string.sub( str, p, string.len(str) ) )
end
break
end
func( string.sub( str, p, i-1 ) )
p = i + 7
end
end
function makequestbutton(name)
raw_script("[QUESTBUTTON idx;")
raw_script(""..q.getcurrentquestindex())
raw_script("|name;")
raw_script(name) raw_script("]")
end
function make_quest_button_ex(name, icon_type, icon_name)
test_chat(icon_type)
test_chat(icon_name)
raw_script("[QUESTBUTTON idx;")
raw_script(""..q.getcurrentquestindex())
raw_script("|name;")
raw_script(name)
raw_script("|icon_type;")
raw_script(icon_type)
raw_script("|icon_name;")
raw_script(icon_name)
raw_script("]")
end
function make_quest_button(name) makequestbutton(name) end
function send_letter_ex(name, icon_type, icon_name) make_quest_button_ex(name, icon_type, icon_name) set_skin(NOWINDOW) q.set_title(name) q.start() end
function send_letter(name) makequestbutton(name) set_skin(NOWINDOW) q.set_title(name) q.start() end
function clear_letter() q.done() end
function say_title(name) say(color256(255, 230, 186)..name..color256(196, 196, 196)) end
function say_reward(name) say(color256(255, 200, 200)..name..color256(196, 196, 196)) end
function say_pc_name() say(pc.get_name()..":") end
function say_size(width, height) say("[WINDOW_SIZE width;"..width.."|height;"..height.."]") end
function setmapcenterposition(x,y)
raw_script("[SETCMAPPOS x;")
raw_script(x.."|y;")
raw_script(y.."]")
end
function say_item(name, vnum, desc)
say("[INSERT_IMAGE image_type;item|idx;"..vnum.."|title;"..name.."|de sc;"..desc.."|index;".. 0 .."|total;".. 1 .."]")
end
function say_show_item(vnum)
say("[INSERT_IMAGE image_type;item|idx;"..vnum.."|index;".. 0 .."|total;".. 1 .."]")
end
function say_item_vnum(vnum)
say_item(item_name(vnum), vnum, "")
end
function say_item_vnum_inline(vnum,index,total)
if index >= total then
return
end
if total > 3 then
return
end
raw_script("[INSERT_IMAGE image_type;item|idx;"..vnum.."|title;"..item_name( vnum).."|desc;".."".."|index;"..index.."|total;".. total.."]")
end
function pc_is_novice()
if pc.get_skill_group()==0 then
return true
else
return false
end
end
function pc_get_exp_bonus(exp, text)
say_reward(text)
pc.give_exp2(exp)
set_quest_state("levelup", "run")
end
function pc_get_village_map_index(index)
return village_map[pc.get_empire()][index]
end
function pc_has_even_id()
return math.mod(pc.get_player_id(),2) == 0
end
function pc_get_account_id()
return math.mod(pc.get_account_id(), 2) !=0
end
village_map = {
{1, 3},
{21, 23},
{41, 43},
}
function npc_is_same_empire()
if pc.get_empire()==npc.empire then
return true
else
return false
end
end
function npc_get_skill_teacher_race(pc_empire, pc_job, sub_job)
if sub_job == 1 then
if pc_job == 0 then
return WARRIOR1_NPC_LIST[pc_empire]
elseif pc_job == 1 then
return ASSASSIN1_NPC_LIST[pc_empire]
elseif pc_job == 2 then
return SURA1_NPC_LIST[pc_empire]
elseif pc_job == 3 then
return SHAMAN1_NPC_LIST[pc_empire]
elseif pc_job == 4 then
return WOLFMAN1_NPC_LIST[pc_empire]
end
elseif sub_job == 2 then
if pc_job == 0 then
return WARRIOR2_NPC_LIST[pc_empire]
elseif pc_job == 1 then
return ASSASSIN2_NPC_LIST[pc_empire]
elseif pc_job == 2 then
return SURA2_NPC_LIST[pc_empire]
elseif pc_job == 3 then
return SHAMAN2_NPC_LIST[pc_empire]
elseif pc_job == 4 then
return WOLFMAN2_NPC_LIST[pc_empire]
end
end
return 0
end
function pc_find_square_guard_vid()
if pc.get_empire()==1 then
return find_npc_by_vnum(11000)
elseif pc.get_empire()==2 then
return find_npc_by_vnum(11002)
elseif pc.get_empire()==3 then
return find_npc_by_vnum(11004)
end
return 0
end
function pc_find_skill_teacher_vid(sub_job)
local vnum=npc_get_skill_teacher_race(pc.get_empire(), pc.get_job(), sub_job)
return find_npc_by_vnum(vnum)
end
function pc_find_square_guard_vid()
local pc_empire=pc.get_empire()
if pc_empire==1 then
return find_npc_by_vnum(11000)
elseif pc_empire==2 then
return find_npc_by_vnum(11002)
elseif pc_empire==3 then
return find_npc_by_vnum(11004)
end
end
function npc_is_same_job()
local pc_job = pc.get_job()
local npc_vnum = npc.get_race()
if pc_job == 0 then
if table_is_in(WARRIOR1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(WARRIOR2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 1 then
if table_is_in(ASSASSIN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(ASSASSIN2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 2 then
if table_is_in(SURA1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(SURA2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 3 then
if table_is_in(SHAMAN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(SHAMAN2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 4 then
if table_is_in(WOLFMAN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(WOLFMAN2_NPC_LIST, npc_vnum) then
return true
end
end
return false
end
function npc_get_job()
local npc_vnum = npc.get_race()
if table_is_in(WARRIOR1_NPC_LIST, npc_vnum) then
return COND_WARRIOR_1
end
if table_is_in(WARRIOR2_NPC_LIST, npc_vnum) then
return COND_WARRIOR_2
end
if table_is_in(ASSASSIN1_NPC_LIST, npc_vnum) then
return COND_ASSASSIN_1
end
if table_is_in(ASSASSIN2_NPC_LIST, npc_vnum) then
return COND_ASSASSIN_2
end
if table_is_in(SURA1_NPC_LIST, npc_vnum) then
return COND_SURA_1
end
if table_is_in(SURA2_NPC_LIST, npc_vnum) then
return COND_SURA_2
end
if table_is_in(SHAMAN1_NPC_LIST, npc_vnum) then
return COND_SHAMAN_1
end
if table_is_in(SHAMAN2_NPC_LIST, npc_vnum) then
return COND_SHAMAN_2
end
if table_is_in(WOLFMAN1_NPC_LIST, npc_vnum) then
return COND_WOLFMAN_1
end
if table_is_in(WOLFMAN2_NPC_LIST, npc_vnum) then
return COND_WOLFMAN_2
end
return 0
end
function time_min_to_sec(value)
return 60*value
end
function time_hour_to_sec(value)
return 3600*value
end
function next_time_set(value, test_value)
local nextTime=get_time()+value
if is_test_server() then
nextTime=get_time()+test_value
end
pc.setqf("__NEXT_TIME__", nextTime)
end
function next_time_is_now(value)
if get_time()>=pc.getqf("__NEXT_TIME__") then
return true
else
return false
end
end
function table_get_random_item(self)
return self[number(1, table.getn(self))]
end
function table_is_in(self, test)
for i = 1, table.getn(self) do
if self[i]==test then
return true
end
end
return false
end
function giveup_quest_menu(title)
local s=select("진행한다", "포기한다")
if 2==s then
say(title.." 퀘스트를 정말로")
say("포기하시겠습니까?")
local s=select("네, 그렇습니다", "아닙니다")
if 1==s then
say(title.."퀘스트를 포기했습니다")
restart_quest()
end
end
end
function restart_quest()
set_state("start")
q.done()
end
function complete_quest()
set_state("__COMPLETE__")
q.done()
end
function giveup_quest()
set_state("__GIVEUP__")
q.done()
end
function complete_quest_state(state_name)
set_state(state_name)
q.done()
end
function test_chat(log)
if is_test_server() then
chat(log)
end
end
function bool_to_str(is)
if is then
return "true"
else
return "false"
end
end
function skill_group_dialog(e, j, g) -- e = 제국, j = 직업, g = 그룹
e = 1 -- XXX 메시지가 나라별로 있다가 하나로 통합되었음
-- 다른 직업이거나 다른 제국일 경우
if pc.job != j then
say(locale.skill_group.dialog[e][pc.job][3])
elseif pc.get_skill_group() == 0 then
if pc.level < 5 then
say(locale.skill_group.dialog[e][j][g][1])
return
end
say(locale.skill_group.dialog[e][j][g][2])
local answer = select(locale.yes, locale.no)
if answer == 1 then
--say(locale.skill_group.dialog[e][j][g][2])
pc.set_skill_group(g)
else
--say(locale.skill_group.dialog[e][j][g][3])
end
--elseif pc.get_skill_group() == g then
--say(locale.skill_group.dialog[e][j][g][4])
--else
--say(locale.skill_group.dialog[e][j][g][5])
end
end
function show_horse_menu()
if horse.is_mine() then
say(locale.horse_menu.menu)
local s = 0
if horse.is_dead() then
s = select(locale.horse_menu.revive, locale.horse_menu.ride, locale.horse_menu.unsummon, locale.horse_menu.close)
else
s = select(locale.horse_menu.feed, locale.horse_menu.ride, locale.horse_menu.unsummon, locale.horse_menu.close)
end
if s==1 then
if horse.is_dead() then
horse.revive()
else
local food = horse.get_grade() + 50054 - 1
if pc.countitem(food) > 0 then
pc.removeitem(food, 1)
horse.feed()
else
say(locale.need_item_prefix..item_name(food)..loca le.need_item_postfix);
end
end
elseif s==2 then
horse.ride()
elseif s==3 then
horse.unsummon()
elseif s==4 then
-- do nothing
end
end
end
--BEGIN EDIT created for Heavens cave pre event, Arne 23Sept09
-- Table for storing character names,
char_name_list = {}
char_name_list[1] = {}
char_name_list[2] = {}
char_name_list[3] = {}
char_name_list[4] = {}
char_name_list[5] = {}
char_name_list[6] = {}
char_name_list[7] = {}
char_name_list[8] = {}
char_name_list[9] = {}
char_name_list[10] = {}
--no return, just used for storing a name into the list
function store_charname_by_id(id, charname, charid)
char_name_list[id]["name"] = charname
char_name_list[id]["eid"] = charid
return nil
end
-- returns the name of a given list item, id is the highscore slot
function return_charname_by_id(charid)
local counter = 11
repeat
counter = counter -1
until char_name_list[counter]["eid"] == charid
return char_name_list[counter]["name"]
end
POINT_POISON_PCT = 37 --독 확률
POINT_STUN_PCT = 38 --기절 확률
POINT_SLOW_PCT = 39 --슬로우 확률
POINT_CRITICAL_PCT = 40 --크리티컬 확률
POINT_PENETRATE_PCT = 41 --관통타격 확률
POINT_CURSE_PCT = 42 --저주 확률
-- DEFEND_BONUS_ATTRIBUTES
POINT_SKILL_DEFEND_BONUS = 123 --스킬 방어 데미지
POINT_NORMAL_HIT_DEFEND_BONUS = 124 --평타 방어 데미지
-- END_OF_DEFEND_BONUS_ATTRIBUTES
-- PC_BANG_ITEM_ADD
POINT_PC_BANG_EXP_BONUS = 125 --PC방 전용 경험치 보너스
POINT_PC_BANG_DROP_BONUS = 126 --PC방 전용 드롭률 보너스
POINT_ATTBONUS_WOLFMAN = 127
POINT_RESIST_WOLFMAN = 128
POINT_RESIST_CLAW = 129
-- END_PC_BANG_ITEM_ADD
-- POINT_MAX_NUM = 128 common/length.h
-- point type start
function input_number (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil then
break
end
say ("input number")
end
return n
end
ITEM_NONE = 0
ITEM_WEAPON = 1
ITEM_ARMOR = 2
function get_today_count(questname, flag_name)
local today = math.floor(get_global_time() / 86400)
local today_flag = flag_name.."_today"
local today_count_flag = flag_name.."_today_count"
local last_day = pc.getf(questname, today_flag)
if last_day == today then
return pc.getf(questname, today_count_flag)
else
return 0
end
end
-- "$flag_name"_today unix_timestamp % 86400
-- "$flag_name"_count count
function inc_today_count(questname, flag_name, count)
local today = math.floor(get_global_time() / 86400)
local today_flag = flag_name.."_today"
local today_count_flag = flag_name.."_today_count"
local last_day = pc.getqf(questname, today_flag)
if last_day == today then
pc.setf(questname, today_count_flag, pc.getf(questname, today_count_flag) + 1)
else
pc.setf(questname, today_flag, today)
pc.setf(questname, today_count_flag, 1)
end
end
function LIB_duration(ipe)
-- if have == nil then
-- seconds = ipe - get_global_time()
-- chat("nil")
-- else
-- seconds = (get_global_time() + ipe) - get_global_time()
-- chat("no nil")
-- end
if ipe >= get_global_time() then
seconds = ipe - get_global_time()
--chat("nil")
else
seconds = (get_global_time() + ipe) - get_global_time()
--chat("no nil")
end
local days = 0
local hours = math.floor(seconds / 3600)
local mins = math.floor((seconds - (hours*3600)) / 60)
local secs = math.floor(seconds - hours*3600 - mins*60 )
local t = ""
if tonumber(hours) >= 24 then
days = math.floor(hours / 24)
hours = math.floor(hours - (days*24))
end
if tonumber(days) == 1 then
t = t..days.." Tag "
elseif tonumber(days) >= 1 then
t = t..days.." Tage "
end
if tonumber(hours) == 1 then
t = t..hours.." Stunde "
elseif tonumber(hours) >= 1 then
t = t..hours.." Stunden "
end
if tonumber(mins) == 1 then
t = t..mins.." Minute "
elseif tonumber(mins) >= 1 then
t = t..mins.." Minuten "
end
if tonumber(secs) == 1 then
t = t..secs.." Sekunde "
elseif tonumber(secs) >= 1 then
t = t..secs.." Sekunden "
end
if t == "" then
return "(Keine Zeit Vorhanden!)"
end
return t
end
function say_npc()
say_title(""..mob_name(npc.get_race()).."")
end
-- This function will return true always in window os,
-- but not in freebsd.
-- (In window os, RAND_MAX = 0x7FFF = 32767.)
function drop_gamble_with_flag(drop_flag)
local dp, range = pc.get_killee_drop_pct()
dp = 40000 * dp / game.get_event_flag(drop_flag)
if dp < 0 or range < 0 then
return false
end
return dp >= number(1, range)
end
function tablo_kontrol ( e, t )
for _,v in pairs(t) do
if (v==e) then
return true
end
end
return false
end
function genel_veri(gelen_miktar)
gelen2 = tostring(gelen_miktar)
local gelen = gelen_miktar
local sayac = 10
local basamak = 1
local ilkhal = basamak
while true do
if gelen / sayac >= 1 then
basamak = basamak + 1
sayac = sayac * 10
else
break
end
end
t = {}
sonucText = ""
for i=1, string.len(gelen2) do
t[i]= (string.sub(gelen2,i,i))
end
for k , v in pairs(t) do--1324
if (basamak == 9 or basamak == 6 or basamak == 3) and sonucText != "" then
sonucText = sonucText.."."
sonucText = sonucText..v
else
sonucText = sonucText..v
end
basamak = basamak - 1
end
return sonucText
end
mysql_query10 = function(query)
if not pre then
local rt = io.open('CONFIG','r'):read('*all')
pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+) %s(%S+).+','-h%1 -u%2 -p%3 -D%4')
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2 ^10),{},{}
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- f? MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- f? MySQL55
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,b)
out[i-1] = out[i-1] or {}
out[i-1][a] = tostring(b) or b or 'NULL'
out[t[1][a]] = out[t[1][a]] or {}
out[t[1][a]][i-1] = tostring(b) or b or 'NULL'
end) end
return out
end
SYSERR: Jun 7 18:31:44 :: RunState: LUA_ERROR: [string "alisveris"]:37: attempt to index field `locale_name' (a nil value)
SYSERR: Jun 7 18:31:44 :: WriteRunningStateToSyserr: LUA_ERROR: quest alisveris.start click
SYSERR: Jun 7 18:32:02 :: RunState: LUA_ERROR: [string "alisveris"]:37: attempt to index field `locale_name' (a nil value)
SYSERR: Jun 7 18:32:02 :: WriteRunningStateToSyserr: LUA_ERROR: quest alisveris.start click
q.set_clock = function(name, value) q.set_clock_name(name) q.set_clock_value(value) end
q.set_counter = function(name, value) q.set_counter_name(name) q.set_counter_value(value) end
c_item_name = function(vnum) return ("[ITEM value;"..vnum.."]") end
c_mob_name = function(vnum) return ("[MOB value;"..vnum.."]") end
-- d.set_folder = function (path) raw_script("[SET_PATH path;"..path.."]") end
-- d.set_folder = function (path) path.show_cinematic("[SET_PATH path;"..path.."]") end
-- party.run_cinematic = function (path) party.show_cinematic("[RUN_CINEMATIC value;"..path.."]") end
newline = "[ENTER]"
function color256(r, g, b) return "[COLOR r;"..(r/255.0).."|g;"..(g/255.0).."|b;"..(b/255.0).."]" end
function color(r,g,b) return "[COLOR r;"..r.."|g;"..g.."|b;"..b.."]" end
function delay(v) return "[DELAY value;"..v.."]" end
function setcolor(r,g,b) raw_script(color(r,g,b)) end
function setdelay(v) raw_script(delay(v)) end
function resetcolor(r,g,b) raw_script("[/COLOR]") end
function resetdelay(v) raw_script("[/DELAY]") end
-- trim a string
function trim(s) return (string.gsub(s, "^%s*(.-)%s*$", "%1")) end
-- minimap에 동그라미 표시
function addmapsignal(x,y) raw_script("[ADDMAPSIGNAL x;"..x.."|y;"..y.."]") end
-- minimap 동그라미들 모두 클리어
function clearmapsignal() raw_script("[CLEARMAPSIGNAL]") end
-- 클라이언트에서 보여줄 대화창 배경 그림을 정한다.
function setbgimage(src) raw_script("[BGIMAGE src;") raw_script(src) raw_script("]") end
-- 대화창에 이미지를 보여준다.
function addimage(x,y,src) raw_script("[IMAGE x;"..x.."|y;"..y) raw_script("|src;") raw_script(src) raw_script("]") end
-- generate when a linebreak in the functions: d.notice,notice,notice_all
function notice_multiline( str , func )
local p = 0
local i = 0
while true do
i = string.find( str, "%[ENTER%]", i+1 )
if i == nil then
if string.len(str) > p then
func( string.sub( str, p, string.len(str) ) )
end
break
end
func( string.sub( str, p, i-1 ) )
p = i + 7
end
end
function makequestbutton(name)
raw_script("[QUESTBUTTON idx;")
raw_script(""..q.getcurrentquestindex())
raw_script("|name;")
raw_script(name) raw_script("]")
end
function make_quest_button_ex(name, icon_type, icon_name)
test_chat(icon_type)
test_chat(icon_name)
raw_script("[QUESTBUTTON idx;")
raw_script(""..q.getcurrentquestindex())
raw_script("|name;")
raw_script(name)
raw_script("|icon_type;")
raw_script(icon_type)
raw_script("|icon_name;")
raw_script(icon_name)
raw_script("]")
end
function make_quest_button(name) makequestbutton(name) end
function send_letter_ex(name, icon_type, icon_name) make_quest_button_ex(name, icon_type, icon_name) set_skin(NOWINDOW) q.set_title(name) q.start() end
function send_letter(name) makequestbutton(name) set_skin(NOWINDOW) q.set_title(name) q.start() end
function clear_letter() q.done() end
function say_title(name) say(color256(255, 230, 186)..name..color256(196, 196, 196)) end
function say_reward(name) say(color256(255, 200, 200)..name..color256(196, 196, 196)) end
function say_pc_name() say(pc.get_name()..":") end
function say_size(width, height) say("[WINDOW_SIZE width;"..width.."|height;"..height.."]") end
function setmapcenterposition(x,y)
raw_script("[SETCMAPPOS x;")
raw_script(x.."|y;")
raw_script(y.."]")
end
function say_item(name, vnum, desc)
say("[INSERT_IMAGE image_type;item|idx;"..vnum.."|title;"..name.."|de sc;"..desc.."|index;".. 0 .."|total;".. 1 .."]")
end
function say_show_item(vnum)
say("[INSERT_IMAGE image_type;item|idx;"..vnum.."|index;".. 0 .."|total;".. 1 .."]")
end
function say_item_vnum(vnum)
say_item(item_name(vnum), vnum, "")
end
function say_item_vnum_inline(vnum,index,total)
if index >= total then
return
end
if total > 3 then
return
end
raw_script("[INSERT_IMAGE image_type;item|idx;"..vnum.."|title;"..item_name( vnum).."|desc;".."".."|index;"..index.."|total;".. total.."]")
end
function pc_is_novice()
if pc.get_skill_group()==0 then
return true
else
return false
end
end
function pc_get_exp_bonus(exp, text)
say_reward(text)
pc.give_exp2(exp)
set_quest_state("levelup", "run")
end
function pc_get_village_map_index(index)
return village_map[pc.get_empire()][index]
end
function pc_has_even_id()
return math.mod(pc.get_player_id(),2) == 0
end
function pc_get_account_id()
return math.mod(pc.get_account_id(), 2) !=0
end
village_map = {
{1, 3},
{21, 23},
{41, 43},
}
function npc_is_same_empire()
if pc.get_empire()==npc.empire then
return true
else
return false
end
end
function npc_get_skill_teacher_race(pc_empire, pc_job, sub_job)
if sub_job == 1 then
if pc_job == 0 then
return WARRIOR1_NPC_LIST[pc_empire]
elseif pc_job == 1 then
return ASSASSIN1_NPC_LIST[pc_empire]
elseif pc_job == 2 then
return SURA1_NPC_LIST[pc_empire]
elseif pc_job == 3 then
return SHAMAN1_NPC_LIST[pc_empire]
elseif pc_job == 4 then
return WOLFMAN1_NPC_LIST[pc_empire]
end
elseif sub_job == 2 then
if pc_job == 0 then
return WARRIOR2_NPC_LIST[pc_empire]
elseif pc_job == 1 then
return ASSASSIN2_NPC_LIST[pc_empire]
elseif pc_job == 2 then
return SURA2_NPC_LIST[pc_empire]
elseif pc_job == 3 then
return SHAMAN2_NPC_LIST[pc_empire]
elseif pc_job == 4 then
return WOLFMAN2_NPC_LIST[pc_empire]
end
end
return 0
end
function pc_find_square_guard_vid()
if pc.get_empire()==1 then
return find_npc_by_vnum(11000)
elseif pc.get_empire()==2 then
return find_npc_by_vnum(11002)
elseif pc.get_empire()==3 then
return find_npc_by_vnum(11004)
end
return 0
end
function pc_find_skill_teacher_vid(sub_job)
local vnum=npc_get_skill_teacher_race(pc.get_empire(), pc.get_job(), sub_job)
return find_npc_by_vnum(vnum)
end
function pc_find_square_guard_vid()
local pc_empire=pc.get_empire()
if pc_empire==1 then
return find_npc_by_vnum(11000)
elseif pc_empire==2 then
return find_npc_by_vnum(11002)
elseif pc_empire==3 then
return find_npc_by_vnum(11004)
end
end
function npc_is_same_job()
local pc_job = pc.get_job()
local npc_vnum = npc.get_race()
if pc_job == 0 then
if table_is_in(WARRIOR1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(WARRIOR2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 1 then
if table_is_in(ASSASSIN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(ASSASSIN2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 2 then
if table_is_in(SURA1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(SURA2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 3 then
if table_is_in(SHAMAN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(SHAMAN2_NPC_LIST, npc_vnum) then
return true
end
elseif pc_job == 4 then
if table_is_in(WOLFMAN1_NPC_LIST, npc_vnum) then
return true
end
if table_is_in(WOLFMAN2_NPC_LIST, npc_vnum) then
return true
end
end
return false
end
function npc_get_job()
local npc_vnum = npc.get_race()
if table_is_in(WARRIOR1_NPC_LIST, npc_vnum) then
return COND_WARRIOR_1
end
if table_is_in(WARRIOR2_NPC_LIST, npc_vnum) then
return COND_WARRIOR_2
end
if table_is_in(ASSASSIN1_NPC_LIST, npc_vnum) then
return COND_ASSASSIN_1
end
if table_is_in(ASSASSIN2_NPC_LIST, npc_vnum) then
return COND_ASSASSIN_2
end
if table_is_in(SURA1_NPC_LIST, npc_vnum) then
return COND_SURA_1
end
if table_is_in(SURA2_NPC_LIST, npc_vnum) then
return COND_SURA_2
end
if table_is_in(SHAMAN1_NPC_LIST, npc_vnum) then
return COND_SHAMAN_1
end
if table_is_in(SHAMAN2_NPC_LIST, npc_vnum) then
return COND_SHAMAN_2
end
if table_is_in(WOLFMAN1_NPC_LIST, npc_vnum) then
return COND_WOLFMAN_1
end
if table_is_in(WOLFMAN2_NPC_LIST, npc_vnum) then
return COND_WOLFMAN_2
end
return 0
end
function time_min_to_sec(value)
return 60*value
end
function time_hour_to_sec(value)
return 3600*value
end
function next_time_set(value, test_value)
local nextTime=get_time()+value
if is_test_server() then
nextTime=get_time()+test_value
end
pc.setqf("__NEXT_TIME__", nextTime)
end
function next_time_is_now(value)
if get_time()>=pc.getqf("__NEXT_TIME__") then
return true
else
return false
end
end
function table_get_random_item(self)
return self[number(1, table.getn(self))]
end
function table_is_in(self, test)
for i = 1, table.getn(self) do
if self[i]==test then
return true
end
end
return false
end
function giveup_quest_menu(title)
local s=select("진행한다", "포기한다")
if 2==s then
say(title.." 퀘스트를 정말로")
say("포기하시겠습니까?")
local s=select("네, 그렇습니다", "아닙니다")
if 1==s then
say(title.."퀘스트를 포기했습니다")
restart_quest()
end
end
end
function restart_quest()
set_state("start")
q.done()
end
function complete_quest()
set_state("__COMPLETE__")
q.done()
end
function giveup_quest()
set_state("__GIVEUP__")
q.done()
end
function complete_quest_state(state_name)
set_state(state_name)
q.done()
end
function test_chat(log)
if is_test_server() then
chat(log)
end
end
function bool_to_str(is)
if is then
return "true"
else
return "false"
end
end
function skill_group_dialog(e, j, g) -- e = 제국, j = 직업, g = 그룹
e = 1 -- XXX 메시지가 나라별로 있다가 하나로 통합되었음
-- 다른 직업이거나 다른 제국일 경우
if pc.job != j then
say(locale.skill_group.dialog[e][pc.job][3])
elseif pc.get_skill_group() == 0 then
if pc.level < 5 then
say(locale.skill_group.dialog[e][j][g][1])
return
end
say(locale.skill_group.dialog[e][j][g][2])
local answer = select(locale.yes, locale.no)
if answer == 1 then
--say(locale.skill_group.dialog[e][j][g][2])
pc.set_skill_group(g)
else
--say(locale.skill_group.dialog[e][j][g][3])
end
--elseif pc.get_skill_group() == g then
--say(locale.skill_group.dialog[e][j][g][4])
--else
--say(locale.skill_group.dialog[e][j][g][5])
end
end
function show_horse_menu()
if horse.is_mine() then
say(locale.horse_menu.menu)
local s = 0
if horse.is_dead() then
s = select(locale.horse_menu.revive, locale.horse_menu.ride, locale.horse_menu.unsummon, locale.horse_menu.close)
else
s = select(locale.horse_menu.feed, locale.horse_menu.ride, locale.horse_menu.unsummon, locale.horse_menu.close)
end
if s==1 then
if horse.is_dead() then
horse.revive()
else
local food = horse.get_grade() + 50054 - 1
if pc.countitem(food) > 0 then
pc.removeitem(food, 1)
horse.feed()
else
say(locale.need_item_prefix..item_name(food)..loca le.need_item_postfix);
end
end
elseif s==2 then
horse.ride()
elseif s==3 then
horse.unsummon()
elseif s==4 then
-- do nothing
end
end
end
--BEGIN EDIT created for Heavens cave pre event, Arne 23Sept09
-- Table for storing character names,
char_name_list = {}
char_name_list[1] = {}
char_name_list[2] = {}
char_name_list[3] = {}
char_name_list[4] = {}
char_name_list[5] = {}
char_name_list[6] = {}
char_name_list[7] = {}
char_name_list[8] = {}
char_name_list[9] = {}
char_name_list[10] = {}
--no return, just used for storing a name into the list
function store_charname_by_id(id, charname, charid)
char_name_list[id]["name"] = charname
char_name_list[id]["eid"] = charid
return nil
end
-- returns the name of a given list item, id is the highscore slot
function return_charname_by_id(charid)
local counter = 11
repeat
counter = counter -1
until char_name_list[counter]["eid"] == charid
return char_name_list[counter]["name"]
end
POINT_POISON_PCT = 37 --독 확률
POINT_STUN_PCT = 38 --기절 확률
POINT_SLOW_PCT = 39 --슬로우 확률
POINT_CRITICAL_PCT = 40 --크리티컬 확률
POINT_PENETRATE_PCT = 41 --관통타격 확률
POINT_CURSE_PCT = 42 --저주 확률
-- DEFEND_BONUS_ATTRIBUTES
POINT_SKILL_DEFEND_BONUS = 123 --스킬 방어 데미지
POINT_NORMAL_HIT_DEFEND_BONUS = 124 --평타 방어 데미지
-- END_OF_DEFEND_BONUS_ATTRIBUTES
-- PC_BANG_ITEM_ADD
POINT_PC_BANG_EXP_BONUS = 125 --PC방 전용 경험치 보너스
POINT_PC_BANG_DROP_BONUS = 126 --PC방 전용 드롭률 보너스
POINT_ATTBONUS_WOLFMAN = 127
POINT_RESIST_WOLFMAN = 128
POINT_RESIST_CLAW = 129
-- END_PC_BANG_ITEM_ADD
-- POINT_MAX_NUM = 128 common/length.h
-- point type start
function input_number (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil then
break
end
say ("input number")
end
return n
end
ITEM_NONE = 0
ITEM_WEAPON = 1
ITEM_ARMOR = 2
function get_today_count(questname, flag_name)
local today = math.floor(get_global_time() / 86400)
local today_flag = flag_name.."_today"
local today_count_flag = flag_name.."_today_count"
local last_day = pc.getf(questname, today_flag)
if last_day == today then
return pc.getf(questname, today_count_flag)
else
return 0
end
end
-- "$flag_name"_today unix_timestamp % 86400
-- "$flag_name"_count count
function inc_today_count(questname, flag_name, count)
local today = math.floor(get_global_time() / 86400)
local today_flag = flag_name.."_today"
local today_count_flag = flag_name.."_today_count"
local last_day = pc.getqf(questname, today_flag)
if last_day == today then
pc.setf(questname, today_count_flag, pc.getf(questname, today_count_flag) + 1)
else
pc.setf(questname, today_flag, today)
pc.setf(questname, today_count_flag, 1)
end
end
function LIB_duration(ipe)
-- if have == nil then
-- seconds = ipe - get_global_time()
-- chat("nil")
-- else
-- seconds = (get_global_time() + ipe) - get_global_time()
-- chat("no nil")
-- end
if ipe >= get_global_time() then
seconds = ipe - get_global_time()
--chat("nil")
else
seconds = (get_global_time() + ipe) - get_global_time()
--chat("no nil")
end
local days = 0
local hours = math.floor(seconds / 3600)
local mins = math.floor((seconds - (hours*3600)) / 60)
local secs = math.floor(seconds - hours*3600 - mins*60 )
local t = ""
if tonumber(hours) >= 24 then
days = math.floor(hours / 24)
hours = math.floor(hours - (days*24))
end
if tonumber(days) == 1 then
t = t..days.." Tag "
elseif tonumber(days) >= 1 then
t = t..days.." Tage "
end
if tonumber(hours) == 1 then
t = t..hours.." Stunde "
elseif tonumber(hours) >= 1 then
t = t..hours.." Stunden "
end
if tonumber(mins) == 1 then
t = t..mins.." Minute "
elseif tonumber(mins) >= 1 then
t = t..mins.." Minuten "
end
if tonumber(secs) == 1 then
t = t..secs.." Sekunde "
elseif tonumber(secs) >= 1 then
t = t..secs.." Sekunden "
end
if t == "" then
return "(Keine Zeit Vorhanden!)"
end
return t
end
function say_npc()
say_title(""..mob_name(npc.get_race()).."")
end
-- This function will return true always in window os,
-- but not in freebsd.
-- (In window os, RAND_MAX = 0x7FFF = 32767.)
function drop_gamble_with_flag(drop_flag)
local dp, range = pc.get_killee_drop_pct()
dp = 40000 * dp / game.get_event_flag(drop_flag)
if dp < 0 or range < 0 then
return false
end
return dp >= number(1, range)
end
function tablo_kontrol ( e, t )
for _,v in pairs(t) do
if (v==e) then
return true
end
end
return false
end
function genel_veri(gelen_miktar)
gelen2 = tostring(gelen_miktar)
local gelen = gelen_miktar
local sayac = 10
local basamak = 1
local ilkhal = basamak
while true do
if gelen / sayac >= 1 then
basamak = basamak + 1
sayac = sayac * 10
else
break
end
end
t = {}
sonucText = ""
for i=1, string.len(gelen2) do
t[i]= (string.sub(gelen2,i,i))
end
for k , v in pairs(t) do--1324
if (basamak == 9 or basamak == 6 or basamak == 3) and sonucText != "" then
sonucText = sonucText.."."
sonucText = sonucText..v
else
sonucText = sonucText..v
end
basamak = basamak - 1
end
return sonucText
end
mysql_query10 = function(query)
if not pre then
local rt = io.open('CONFIG','r'):read('*all')
pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+) %s(%S+).+','-h%1 -u%2 -p%3 -D%4')
end
math.randomseed(os.time())
local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2 ^10),{},{}
--os.execute('mysql '..pre..' --e='..string.format('%q',query)..' > '..fi) -- f? MySQL51
os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- f? MySQL55
for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi);
for i = 2, table.getn(t) do table.foreach(t[i],function(a,b)
out[i-1] = out[i-1] or {}
out[i-1][a] = tostring(b) or b or 'NULL'
out[t[1][a]] = out[t[1][a]] or {}
out[t[1][a]][i-1] = tostring(b) or b or 'NULL'
end) end
return out
end
SYSERR: Jun 7 18:31:44 :: RunState: LUA_ERROR: [string "alisveris"]:37: attempt to index field `locale_name' (a nil value)
SYSERR: Jun 7 18:31:44 :: WriteRunningStateToSyserr: LUA_ERROR: quest alisveris.start click
SYSERR: Jun 7 18:32:02 :: RunState: LUA_ERROR: [string "alisveris"]:37: attempt to index field `locale_name' (a nil value)
SYSERR: Jun 7 18:32:02 :: WriteRunningStateToSyserr: LUA_ERROR: quest alisveris.start click
quest alisveris begin
state start begin
when login begin
karakter_id = tonumber(pc.get_player_id())
hesap_id = tonumber(pc.get_account_id())
karakter_isim = tostring(pc.get_name())
esyaSureNeDurumdaKontrol = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' ")
esyaSureDurumSay = tonumber(table.getn(esyaSureNeDurumdaKontrol))
if esyaSureDurumSay > 0 then
for i=1,esyaSureDurumSay,1 do
esyaid = tonumber(esyaSureNeDurumdaKontrol.esya_id[i])
esyaKodu = tonumber(esyaSureNeDurumdaKontrol.esya_kodu[i])
esyaAdet = tonumber(esyaSureNeDurumdaKontrol.esya_adet[i])
esyaGenel_id = tonumber(esyaSureNeDurumdaKontrol.id[i])
esyaSureDurumSure = tonumber(esyaSureNeDurumdaKontrol.esya_sure[i])
if esyaSureDurumSure - get_time() < 0 then
tas1 = esyaSureNeDurumdaKontrol.tas1[1]
tas2 = esyaSureNeDurumdaKontrol.tas2[1]
tas3 = esyaSureNeDurumdaKontrol.tas3[1]
efsun1 = esyaSureNeDurumdaKontrol.efsun1[1]
efsun2 = esyaSureNeDurumdaKontrol.efsun2[1]
efsun3 = esyaSureNeDurumdaKontrol.efsun3[1]
efsun4 = esyaSureNeDurumdaKontrol.efsun4[1]
efsun5 = esyaSureNeDurumdaKontrol.efsun5[1]
efsun1deger = esyaSureNeDurumdaKontrol.efsun1deger[1]
efsun2deger = esyaSureNeDurumdaKontrol.efsun2deger[1]
efsun3deger = esyaSureNeDurumdaKontrol.efsun3deger[1]
efsun4deger = esyaSureNeDurumdaKontrol.efsun4deger[1]
efsun5deger = esyaSureNeDurumdaKontrol.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..hesap_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyamiGeriAl = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..hesap_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' and id='"..esyaGenel_id.."' ")
if esyamiGeriAl and esyayiSil then
syschat("Das Item wurde aus dem Markt entfernt. Hole es aus deinem IS-Lager ab.")
end
end
end
end
end
when 20092.take with item.get_id() begin
if game.get_event_flag("alisverisSistemi") == 0 then
say_title("Warnung:")
say("")
say_reward("Zurzeit ist das Aktionshaus geschlossen. Bitte versuche es später noch einmal.")
say("")
return
end
local karakter_isim = tostring(pc.get_name())
local karakter_id = tonumber(pc.get_player_id())
local surem
local esyaAdet=1
local esyaKodu = tonumber(item.get_vnum())
say_item_vnum(item.get_vnum())
engelliEsyalar = {
50187,
50188,
50189,
50190,
50191,
50192,
50193,
50194,
50195,
50196,
40004
}
engelliEsyalarSay = tonumber(table.getn(engelliEsyalar))
for i=1,engelliEsyalarSay,1 do
if item.get_vnum() == engelliEsyalar[i] then
say_reward("Das Item wurde verändert und kann nicht zum Markt hinzugefügt werden.")
say("")
return
end
end
esyaTablo = mysql_query10("select * from player.item where id ='"..item.get_id().."' ")
local esyaAdSorgula = mysql_query10("select * from player.item_proto where vnum='"..item.get_vnum().."' ")
local esyaAd = tostring(esyaAdSorgula.locale_name[1])
if tonumber(table.getn(esyaTablo)) == 0 then --- if baþlangýç 101
say_reward("Weil Ihr Item noch neu ist, kann es nicht in den Markt aufgenommen werden!")
say("")
return
else
say_reward("[WINDOW_SIZE width;350|height;450]Boni-Liste")
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end --- for bitiþ 401
say("")
say_reward("TAÞLAR")
for i=7,9,1 do --- for baþlangýç 401
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Was moechtest du tun?")
say("")
say("")
say("")
say("")
local esyaSecim = select("Inserieren","Schliessen")
if esyaSecim == 1 then
if item.get_count() > 1 then
say_title("Info:")
say("")
say("Insgesamt "..item.get_count().." Items gefunden.")
say(Schreiben Sie die Anzahl der Stücke in das folgende Kästchen.")
say("")
say_reward("Wieviele möchten Sie hinzufügen?")
kacAdetEklenecek = alisveris.esyaAdet_input()
if kacAdetEklenecek == 0 or kacAdetEklenecek < 0 or kacAdetEklenecek == 1 then
say_title("Warnung:")
say("")
say_reward("Überprüfe deine Eingabe.")
say("")
return
elseif kacAdetEklenecek > item.get_count() then
say_title("Warnung:")
say("")
say_reward("Davon hast du nicht so viele.")
say("")
return
else
esyaAdet = kacAdetEklenecek
end
end
say_title("Info:")
say("")
say_reward("Bitte den Preis eintippen: ")
local esyaFiyati = alisveris.input_number()
if esyaFiyati < 0 then
say_title("Warnung:")
say("")
say_reward("Bitte überprüfe deine Eingabe!")
say("")
return
end
esyaSureDizi = {
"1 Stunde",
"6 Stunden",
"12 Stunden",
"1 Tag",
"3 Tage"
}
esyaSureDiziSay = tonumber(table.getn(esyaSureDizi))
esyaSureDizi[esyaSureDiziSay + 1] = "Kapat"
esyaSureSec = select_table(esyaSureDizi)
for i=1,esyaSureDiziSay,1 do
if esyaSureSec == esyaSureDiziSay + 1 then
return
end
if esyaSureSec == i then
if i == 1 then
surem = get_time() + 3600
elseif i == 2 then
surem = get_time() + 21600
elseif i == 3 then
surem = get_time() + 43200
elseif i == 4 then
surem = get_time() + 86400
elseif i == 5 then
surem = get_time() + 259200
end
end
end
say_title("[WINDOW_SIZE width;350|height;350]Info:")
say("")
say_reward("Wählen Sie eine Kategorie aus:")
say("")
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges""
}
esyaEfsunDizi = {}
esyaTasDizi = {}
esyaEfsunDeger = {}
local k = 1
local m = 1
local esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDizi[esyaKategoriSecDiziSay + 1 ] = "Schließen"
local esyaKategoriSec = select_table(esyaKategoriSecDizi)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
esyaEfsunDizi[k] = tonumber(esyaTablo[1][i])
esyaEfsunDeger[k] = tostring(esyaTablo[1][i+1])
k = k + 1
end
end --- for bitiþ 401
for i=7,9,1 do --- for baþlangýç 401
esyaTasDizi[m] = tonumber(esyaTablo[1][i])
m = m + 1
end
local yenidizi = {}
local esyaEfsunDiziSay = tonumber(table.getn(esyaEfsunDizi))
if esyaEfsunDiziSay == 0 then
esyaEfsunDizi[1] = 0
esyaEfsunDizi[2] = 0
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[1] = 0
esyaEfsunDeger[2] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 1 then
esyaEfsunDizi[2] = 0
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[2] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 2 then
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 3 then
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 4 then
esyaEfsunDizi[5] = 0
esyaEfsunDeger[5] = 0
end
esyaTas1 = esyaTasDizi[1]
esyaTas2 = esyaTasDizi[2]
esyaTas3 = esyaTasDizi[3]
esyaEfsun1 = esyaEfsunDizi[1]
esyaEfsun2 = esyaEfsunDizi[2]
esyaEfsun3 = esyaEfsunDizi[3]
esyaEfsun4 = esyaEfsunDizi[4]
esyaEfsun5 = esyaEfsunDizi[5]
esyaEfsunD1 = esyaEfsunDeger[1]
esyaEfsunD2 = esyaEfsunDeger[2]
esyaEfsunD3 = esyaEfsunDeger[3]
esyaEfsunD4 = esyaEfsunDeger[4]
esyaEfsunD5 = esyaEfsunDeger[5]
esyaEkle = mysql_query10("insert into alisveris(esya_id,esya_kodu,esya_adi,karakter_id,karakter_isim,esya_fiyati,esya_kategori,esya_adet,tas1,tas2,tas3,efsun1,efsun1deger,efsun2,efsun2deger,efsun3,efsun3deger,efsun4,efsun4deger,efsun5,efsun5deger,esya_sure)values('"..item.get_id().."','"..item.get_vnum().."','"..esyaAd.."','"..karakter_id.."','"..karakter_isim.."','"..esyaFiyati.."','"..i.."','"..esyaAdet.."','"..esyaTas1.."','"..esyaTas2.."','"..esyaTas3.."','"..esyaEfsun1.."','"..esyaEfsunD1.."','"..esyaEfsun2.."','"..esyaEfsunD2.."','"..esyaEfsun3.."','"..esyaEfsunD3.."','"..esyaEfsun4.."','"..esyaEfsunD4.."','"..esyaEfsun5.."','"..esyaEfsunD5.."','"..surem.."')")
if esyaEkle then
pc.remove_item(esyaKodu,esyaAdet)
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich inseriert!")
say("")
end
end
end
elseif esyaSecim == 2 then
return
end
end --- if bitiþ 101
end
when 20092.chat."Meine Items" with game.get_event_flag("alisverisSistemi") == 1 begin
local karakter_id = tonumber(pc.get_player_id())
local hesap_id = tonumber(pc.get_account_id())
local karakter_isim = tostring(pc.get_name())
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local esyalarim = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_kategori='"..i.."' ")
local esyalarimSay = tonumber(table.getn(esyalarim))
if esyalarimSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie hinzufügen wollten, existiert nicht (mehr).")
say("")
else
local esyalarimDizi = {}
for i = 1, esyalarimSay , 1 do
esyalarimDizi[i] = esyalarim.esya_adi[i]
end
esyalarimDizi[esyalarimSay + 1 ] = "Schließen""
local esyalarimiListele = select_table(esyalarimDizi)
for i = 1, esyalarimSay, 1 do
if esyalarimiListele == esyalarimSay + 1 then
return
end
if esyalarimiListele == i then
local esyaKodu = tonumber(esyalarim.esya_kodu[i])
local esyaid = tonumber(esyalarim.esya_id[i])
esyaGenel_id = tonumber(esyalarim.id[i])
esyaSure = tonumber(esyalarim.esya_sure[i])
esyaAdet = tonumber(esyalarim.esya_adet[i])
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaid.."' ")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item was sie zurückhaben wollen wurde bereits verkauft.")
say("")
return
end
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;475]Boni-Liste")
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end --- for bitiþ 401
say("")
say_reward("Steine")
for i=10,12,1 do --- for baþlangýç 401
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say_reward("Anzahl Items: "..esyaAdet)
say("")
say("")
say("")
say("")
local esyamiNeYapayim = select("Zurücknehmen","Preis ändern","Schließen")
if esyamiNeYapayim == 1 then
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie wiederhaben möchten wurde bereits verkauft.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..hesap_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyamiGeriAl = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..hesap_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' and id='"..esyaGenel_id.."' ")
if esyamiGeriAl and esyayiSil then
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich zum Markt hinzugefügt! Bitte kontrollieren Sie nach.")
say("")
end
elseif esyamiNeYapayim == 2 then
say_title("Info:")
say("")
say_reward("Geben Sie einen neuen Preis ein: ")
esyaYeniFiyat = alisveris.input_number()
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay =tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item, dessen Preis Sie ändern möchten, wurde bereits verkauft.")
say("")
return
end
esyaFiyatGuncelle = mysql_query10("update player.alisveris set esya_fiyati = '"..esyaYeniFiyat.."' where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
if esyaFiyatGuncelle then
say_title("Info:")
say("")
say("Der neue Preis des Items beträgt nun "..genel_veri(esyaYeniFiyat).. " [ENTER] - Erfolgreich -")
say("")
end
end
end
end
end
end
end
end
when 20092.chat."Den Markt öffnen" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_account_id())
karakter_isim = tonumber(pc.get_name())
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local tumEsyalar = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ORDER BY id DESC")
local tumEsyalarSay = tonumber(table.getn(tumEsyalar))
if tumEsyalarSay < 1 then
say_title("Warnung:")
say("")
say_reward("Zurzeit sind keine Items auf dem Markt.")
say("")
return
end
say_title("[WINDOW_SIZE width;350|height;350]Alle Items:")
say("")
tumEsyalarDizi = {}
for i=1,tumEsyalarSay,1 do
tumEsyalarDizi[i] = tumEsyalar.esya_adi[i].."("..tostring(tumEsyalar.karakter_isim[i])..")"
end
tumEsyalarDizi[tumEsyalarSay + 1 ] = "Schließen"
tumEsyalariGoster = select_table(tumEsyalarDizi)
for i=1,tumEsyalarSay,1 do
if tumEsyalariGoster == tumEsyalarSay + 1 then
return
end
if tumEsyalariGoster == i then
satanKisiKimlik = tonumber(tumEsyalar.karakter_id[i])
satanKisiAd = tostring(tumEsyalar.karakter_isim[i])
esyaFiyati = tonumber(tumEsyalar.esya_fiyati[i])
esyaKodu = tonumber(tumEsyalar.esya_kodu[i])
esyaKimlik = tonumber(tumEsyalar.esya_id[i])
esyaSure = tonumber(tumEsyalar.esya_sure[i])
esyaAdet = tonumber(tumEsyalar.esya_adet[i])
esyaGenel_id = tonumber(tumEsyalar.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Name des Verkäufers: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
local kalan = alisveris.sure_hesapla(esyaSure - get_time())
say_reward(kalan)
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC ")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
if esyayiNeYapacaksin == 1 then
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis hat sich geändert, bitte kaufen Sie das Item erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Sie haben nicht genügend Geld um das Item zu kaufen.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Das Item ist bereits abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich hinzugefügt! Kontrollieren Sie nochmals nach zur Sicherheit.")
say("Ihnen wurde(n) "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Übrig gebliebendes Geld: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Das Item konnte nicht gekauft werden!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
end
end
end
when 20092.chat."Itemsuche" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_account_id())
karakter_isim = tostring(pc.get_name())
esyaAra = select("Item nach Code suchen","Nach Usernamen suchen","Ordne nach Preis","Kapat")
if esyaAra == 1 then
say_title("Info:")
say("")
say_reward("Bitte gib den Item-Code ein:")
esyaAramaKod = tonumber(input())
esyaAramaKodKontrol = mysql_query10("select * from player.alisveris where esya_kodu='"..esyaAramaKod.."' ORDER BY id DESC")
esyaAramaKodKontrolSay = tonumber(table.getn(esyaAramaKodKontrol))
if esyaAramaKodKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Mit dem Code wurde kein inseriertes Item gefunden!")
say("")
return
elseif esyaAramaKod == "" or esyaAramaKod == nil then
say_title("Warnung:")
say("")
say_reward("Bitte geben Sie einen Wert ein.")
say("")
return
elseif esyaAramaKod == 0 then
say_title("Warnung:")
say("")
say_reward("Falsche Eingabe.")
say("")
return
end
esyaAramaKodDizi = {}
for i=1,esyaAramaKodKontrolSay,1 do
esyaAramaKodDizi[i] = tostring(esyaAramaKodKontrol.esya_adi[i]).."("..tostring(esyaAramaKodKontrol.karakter_isim[i])..")"
end
esyaAramaKodDizi[esyaAramaKodKontrolSay + 1] = "Schließen"
esyaAramaKodSec = select_table(esyaAramaKodDizi)
for i=1,esyaAramaKodKontrolSay,1 do
if esyaAramaKodSec == esyaAramaKodKontrolSay + 1 then
return
end
if esyaAramaKodSec == i then
satanKisiKimlik = tonumber(esyaAramaKodKontrol.karakter_id[i])
satanKisiAd = tostring(esyaAramaKodKontrol.karakter_isim[i])
esyaFiyati = tonumber(esyaAramaKodKontrol.esya_fiyati[i])
esyaKodu = tonumber(esyaAramaKodKontrol.esya_kodu[i])
esyaKimlik = tonumber(esyaAramaKodKontrol.esya_id[i])
esyaSure = tonumber(esyaAramaKodKontrol.esya_sure[i])
esyaAdet = tonumber(esyaAramaKodKontrol.esya_adet[i])
esyaGenel_id = tonumber(esyaAramaKodKontrol.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item wurde entweder verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("Steine")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Name des Verkäufers: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis des Items wurde geändert. Bitte versuchen Sie es erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Die Zeit des Items, das sie kaufen möchten ist leider abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich gekauft!")
say("Von Ihrem Konto wurde "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Restkontostand: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Item konnte nicht gekauft werden!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
elseif esyaAra == 2 then
say_title("Info:")
say("")
say_reward("Geben Sie den Namen des gewünschten Verkäufers ein:")
esyaSahipAdi = tostring(input())
if esyaSahipAdi == "" or esyaSahipAdi == nil then
say_title("Warnung:")
say("")
say_reward("Bitte einen Namen eingeben!")
say("")
return
elseif esyaSahipAdi == karakter_isim then
say_title("Warnung:")
say("")
say_reward("Ihr Name ist nicht möglich!")
say("")
return
end
esyaKarakterAdiAra = mysql_query10("select * from player.alisveris where karakter_isim='"..esyaSahipAdi.."' ORDER BY id DESC ")
esyaKarakterAdiAraSay = tonumber(table.getn(esyaKarakterAdiAra))
if esyaKarakterAdiAraSay < 1 then
say_title("Warnung:")
say("")
say_reward("Kein Item wurde gefunden, das von diesem Verkäufer inseriert wurde.")
say("")
else
esyaKarakterDizi = {}
for i=1,esyaKarakterAdiAraSay,1 do
esyaKarakterDizi[i] = esyaKarakterAdiAra.esya_adi[i].."("..tostring(esyaKarakterAdiAra.karakter_isim[i])..")"
end
esyaKarakterDizi[esyaKarakterAdiAraSay + 1 ] = "Schließen"
esyaKarakterSec = select_table(esyaKarakterDizi)
for i=1,esyaKarakterAdiAraSay,1 do
if esyaKarakterSec == esyaKarakterAdiAraSay + 1 then
return
end
if esyaKarakterSec == i then
satanKisiKimlik = tonumber(esyaKarakterAdiAra.karakter_id[i])
satanKisiAd = tostring(esyaKarakterAdiAra.karakter_isim[i])
esyaFiyati = tonumber(esyaKarakterAdiAra.esya_fiyati[i])
esyaKodu = tonumber(esyaKarakterAdiAra.esya_kodu[i])
esyaKimlik = tonumber(esyaKarakterAdiAra.esya_id[i])
esyaSure = tonumber(esyaKarakterAdiAra.esya_sure[i])
esyaAdet = tonumber(esyaKarakterAdiAra.esya_adet[i])
esyaGenel_id = tonumber(esyaKarakterAdiAra.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Verkäufer: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis wurde geändert. Versuchen Sie es erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Die Zeit des Items ist abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich gekauft.")
say("Von Ihrem Konto wurde "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Verbleibender Kontostand: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Das Item ist nicht gekauft worden.")
end
end
end
end
end
elseif esyaAra == 3 then
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i=1,esyaKategoriSecDiziSay,1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local tumEsyalar = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ORDER BY esya_fiyati DESC ")
local tumEsyalarSay = tonumber(table.getn(tumEsyalar))
if tumEsyalarSay < 1 then
say_title("Warnung:")
say("")
say_reward("Zurzeit keine Items vorhanden.")
say("")
return
end
say_title("[WINDOW_SIZE width;350|height;350]Alle Items:")
say("")
tumEsyalarDizi = {}
for i=1,tumEsyalarSay,1 do
tumEsyalarDizi[i] = tumEsyalar.esya_adi[i].."("..tostring(tumEsyalar.karakter_isim[i])..")"
end
tumEsyalarDizi[tumEsyalarSay + 1 ] = "Schließen"
tumEsyalariGoster = select_table(tumEsyalarDizi)
for i=1,tumEsyalarSay,1 do
if tumEsyalariGoster == tumEsyalarSay + 1 then
return
end
if tumEsyalariGoster == i then
satanKisiKimlik = tonumber(tumEsyalar.karakter_id[i])
satanKisiAd = tostring(tumEsyalar.karakter_isim[i])
esyaFiyati = tonumber(tumEsyalar.esya_fiyati[i])
esyaKodu = tonumber(tumEsyalar.esya_kodu[i])
esyaKimlik = tonumber(tumEsyalar.esya_id[i])
esyaSure = tonumber(tumEsyalar.esya_sure[i])
esyaAdet = tonumber(tumEsyalar.esya_adet[i])
esyaGenel_id = tonumber(tumEsyalar.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Verkäufer: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis hat sich geändert. Bitte nochmal kaufen.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie kaufen wollen, ist abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich aufgenommen.")
say("Es wurden "..genel_veri(esyaFiyati).." Yang von ihrem Konto abgehoben.")
say("")
say_reward("Verbleibendes Geld: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Item nicht aufgenommen!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
end-- kategori seçiminin endi
end-- kategori forunun endi
end
end
when 20092.chat."Mein Konto" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_player_id())
karakter_isim = tostring(pc.get_name())
alisverisParamKontrol = mysql_query10("select * from player.player where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
alisverisParam = tonumber(alisverisParamKontrol.alisveris_param[1])
say_title("Info:")
say("")
say("Herzlich willkommen "..karakter_isim)
say("Von hier können Sie das Geld abheben das sie verdient haben.")
say("")
say_reward("Ihr Kontostand beträgt: "..genel_veri(alisverisParam))
say("")
say_reward("Was möchten Sie tun?")
say("")
alisverisParamiNeYapayim = select("Geld abheben","Schließen")
if alisverisParamiNeYapayim == 1 then
say_title("Info:")
say("")
say_reward("Geben Sie die Anzahl an Yang ein, die Sie abheben möchten:")
cekilecekParaMiktari = alisveris.input_number()
if alisverisParam == 0 then
say_title("Warnung:")
say("")
say_reward("Sie haben nicht so viel Yang.")
say("")
return
elseif cekilecekParaMiktari > alisverisParam or cekilecekParaMiktari == 0 or cekilecekParaMiktari < 0 then
say_title("Warnung:")
say("")
say_reward("Überprüfen Sie bitte die Anzahl.")
say("")
return
end
alisverisParamiCektim = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param - '"..cekilecekParaMiktari.."' where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
if alisverisParamiCektim then
pc.change_money(cekilecekParaMiktari)
say_title("Info:")
say("")
say("Von Ihrem Konto wurde(n) "..genel_veri(cekilecekParaMiktari).." Yang eingezogen.")
say("")
alisverisParamKontrol = mysql_query10("select * from player.player where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
alisverisParam = tonumber(alisverisParamKontrol.alisveris_param[1])
say_reward("Yang: "..genel_veri(alisverisParam))
say("")
end
elseif alisverisParamiNeYapayim == 2 then
return
end
end
when 20092.chat."(GM) - Verwaltung des Marktes" with pc.is_gm() begin
yoneticiAd = tostring(pc.get_name())
say_title("Info:")
say("")
say("Hallo, "..yoneticiAd)
say("Hier können Sie den Markt öffnen oder schließen.")
say("")
say_reward("Aktueller Status des Marktes: "..game.get_event_flag("alisverisSistemi"))
say("")
say_reward("Was möchtest du machen?")
say("")
yoneticiSecim = select("Markt öffnen","Markt schließen","Zurück")
if yoneticiSecim == 1 then
say_title("Info:")
say("")
game.set_event_flag("alisverisSistemi",1)
say("Der Markt wurde wieder geöffnet.")
say("")
elseif yoneticiSecim == 2 then
say_title("Info:")
say("")
game.set_event_flag("alisverisSistemi",0)
say("Der Markt wurde geschlossen.")
say("")
elseif yoneticiSecim == 3 then
return
end
end
when 20092.click with game.get_event_flag("alisverisSistemi") == 0 begin
say_title("Warnung:")
say("")
say_reward("Der Markt wurde leider geschlossen. Kommen Sie später noch einmal wieder.")
say("")
end
--------- FONKSÝYON
function sure_hesapla(gelen_sure)
local kalan = gelen_sure
local saat = 0
local dakika = 0
while kalan > 3600 do
saat = saat+1
kalan= kalan - 3600
end
while kalan > 60 do
dakika = dakika+1
kalan= kalan - 60
end
if kalan < 0 then
kalan = 0
end
--say_reward())
gelen_sure = tostring("Verbl. Zeit: "..saat.." Stunde(n) "..dakika.." Minute(n) "..kalan.." Sekunde(n)")
return gelen_sure
end
function input_number (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil and n <= 2000000000 then
break
end
say_reward("Bitte den Preis auf unter 2KKK reduzieren!")
n = nil
end
return n
end
function esyaAdet_input (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil and n <= 200 then
break
end
say_reward("Nicht mehr als 200 Stück!")
n = nil
end
return n
end
function tas(vnum)
local tas =
{
[0] = {"Bu Nesneye Taþ Eklenemez "},
[1] = {"Taþ eklenmemiþ "},
[28430] = {"Durchbruch +4"},
[28431] = {"Todesstoß +4"},
[28432] = {"Wiederkehr +4"},
[28433] = {"Krieger +4"},
[28434] = {"Ninja +4"},
[28435] = {"Sura +4"},
[28436] = {"Schamane +4"},
[28437] = {"Monster +4"},
[28438] = {"Ausweichen +4"},
[28439] = {"Ducken +4"},
[28440] = {"Magie +4"},
[28441] = {"Vitalität +4"},
[28442] = {"Schutz +4"},
[28443] = {"Hast +4"},
[28330] = {"Durchbruch +3"},
[28331] = {"Todesstoß +3"},
[28332] = {"Wiederkehr +3"},
[28333] = {"Krieger +3"},
[28334] = {"Ninja +3"},
[28335] = {"Sura +3"},
[28336] = {"Schamane +3"},
[28337] = {"Monster +3"},
[28338] = {"Ausweichen +3"},
[28339] = {"Ducken +3"},
[28340] = {"Magie +3"},
[28341] = {"Vitalität +3"},
[28342] = {"Schutz +3"},
[28343] = {"Hast +3"},
[28230] = {"Durchbruch +2"},
[28231] = {"Todesstoß +2"},
[28232] = {"Wiederkehr +2"},
[28233] = {"Krieger +2"},
[28234] = {"Ninja +2"},
[28235] = {"Sura +2"},
[28236] = {"Schamane +2"},
[28237] = {"Monster +2"},
[28238] = {"Ausweichen +2"},
[28239] = {"Ducken +2"},
[28240] = {"Magie +2"},
[28241] = {"Vitalität +2"},
[28242] = {"Schutz +2"},
[28243] = {"Hast +2"},
[28130] = {"Durchbruch +1"},
[28131] = {"Todesstoß +1"},
[28132] = {"Wiederkehr +1"},
[28133] = {"Krieger +1"},
[28134] = {"Ninja +1"},
[28135] = {"Sura +1"},
[28136] = {"Schamane +1"},
[28137] = {"Monster +1"},
[28138] = {"Ausweichen +1"},
[28139] = {"Ducken +1"},
[28140] = {"Magie +1"},
[28141] = {"Vitalität +1"},
[28142] = {"Schutz +1"},
[28143] = {"Hast +1"},
[28030] = {"Durchbruch +0"},
[28031] = {"Todesstoß +0"},
[28032] = {"Wiederkehr +0"},
[28033] = {"Krieger +0"},
[28034] = {"Ninja +0"},
[28035] = {"Sura +0"},
[28036] = {"Schamane +0"},
[28037] = {"Monster +0"},
[28038] = {"Ausweichen +0"},
[28039] = {"Ducken +0"},
[28040] = {"Magie +0"},
[28041] = {"Vitalität +0"},
[28042] = {"Schutz +0"},
[28043] = {"Hast +0"},
[28960] = {"Steinsplitter "},
}
return tas[vnum][1]
end
function efsun(vnum)
local efsun =
{
[0] = {"Keine Boni vorhanden "},
[1] = {"Max TP +"},
[2] = {"Max MP +"},
[3] = {"VIT +"},
[4] = {"INT +"},
[5] = {"STR +"},
[6] = {"DEX +"},
[7] = {"Angriffsgeschwindigkeit +"},
[8] = {"Bewegungsgeschwindigkeit +"},
[9] = {"Zaubergeschwindigkeit +"},
[10] = {"TP-Regeneration %"},
[11] = {"MP-Regeneration %"},
[12] = {"Vergiftungschance %"},
[13] = {"Ohnmachtschance %"},
[14] = {"Verlangsamungschance %"},
[15] = {"Chance auf Krit %"},
[16] = {"Chance auf DB %"},
[17] = {"Stark gegen Halbmenschen %"},
[18] = {"Stark gegen Tiere %"},
[19] = {"Stark gegen Orks %"},
[20] = {"Stark gegen Esoterische %"},
[21] = {"Stark gegen Untote %"},
[22] = {"Stark gegen Teufel %"},
[23] = {"Schaden wird von TP absorbiert %"},
[24] = {"Schaden wird von MP absorbiert %"},
[25] = {"Chance TP des Gegners zu übernehmen %"},
[26] = {"Chance MP bei Treffer zurückzuerhalten %"},
[27] = {"Chance körperlichen Angriff abzublocken %"},
[28] = {"Chance Pfeilangriff auszuweichen %"},
[29] = {"Schwertverteidigung %"},
[30] = {"Zweihandverteidigung %"},
[31] = {"Dolchverteidigung %"},
[32] = {"Glockenverteidigung %"},
[33] = {"Fächerverteidigung %"},
[34] = {"Pfeilwiederstand %"},
[35] = {"Feuerwiderstand %"},
[36] = {"Blitzwiderstand %"},
[37] = {"Magiewiderstand %"},
[38] = {"Windwiderstand %"},
[39] = {"Chance körperlichen Angriff zu reflektieren %"},
[40] = {"Chance Fluch zu reflektieren %"},
[41] = {"Giftwiderstand %"},
[42] = {"Chance MP wiederherzustellen %"},
[43] = {"Chance auf EXP Bonus %"},
[44] = {"Chance auf doppeltes Yang %"},
[45] = {"Chance doppelte Menge Gegenstände fallenzulassen %"},
[46] = {"Trank effekt zuwachs %"},
[47] = {"Chance TP wiederherzustellen %"},
[48] = {"Abwehr gegen Ohnmacht"},
[49] = {"Abwehr gegen Verlangsamen"},
[50] = {"Imun gegen Stürzen "},
[51] = {" "},
[52] = {"Bogenreichweite +"},
[53] = {"Angriffswert +"},
[54] = {"Verteidigung +"},
[55] = {"Magischer Angriffswert +"},
[56] = {"Magischer Verteidigungswert +"},
[57] = {" "},
[58] = {"Max. Ausdauer +"},
[59] = {"Stark gegen Krieger %"},
[60] = {"Stark gegen Ninja %"},
[61] = {"Stark gegen Sura %"},
[62] = {"Stark gegen Schamanen %"},
[63] = {"Stark gegen Monster %"},
[64] = {"Angriffswert +"},
[65] = {"Verteidigung +"},
[66] = {"EXP +?%"},
[67] = {"Dropchance [Gegenstände] "},
[68] = {"Dropchance [Gold] "},
[69] = {" "},
[70] = {" "},
[71] = {"Fertigkeitschaden %"},
[72] = {"Durchschnittschaden %"},
[73] = {"Widerstand gegen Fertigkeitsschaden "},
[74] = {"durchschn. Schadenswiderstand "},
[75] = {" "},
[76] = {"iCafe exp-bonus "},
[77] = {"iCafe Chance auf erbeuten von gegenständen "},
[78] = {"Abwehrchance gegen Kriegerangriffe %"},
[79] = {"Abwehrchance gegen Ninjaangriffe %"},
[80] = {"Abwehrchance gegen Suraangriffe %"},
[81] = {"Abwehrchance gegen Schamanenangriffe %"},
}
return efsun[vnum][1]
end
end -- state endi
end -- quest endi
Habe auch noch die +0, +1, +2 und +3 Steine hinzugefügt. Auf dem Server wo es +5 oder höhere Steine gibt, sollten diese noch reineditiert werden.
quest alisveris begin
state start begin
when login begin
karakter_id = tonumber(pc.get_player_id())
hesap_id = tonumber(pc.get_account_id())
karakter_isim = tostring(pc.get_name())
esyaSureNeDurumdaKontrol = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' ")
esyaSureDurumSay = tonumber(table.getn(esyaSureNeDurumdaKontrol))
if esyaSureDurumSay > 0 then
for i=1,esyaSureDurumSay,1 do
esyaid = tonumber(esyaSureNeDurumdaKontrol.esya_id[i])
esyaKodu = tonumber(esyaSureNeDurumdaKontrol.esya_kodu[i])
esyaAdet = tonumber(esyaSureNeDurumdaKontrol.esya_adet[i])
esyaGenel_id = tonumber(esyaSureNeDurumdaKontrol.id[i])
esyaSureDurumSure = tonumber(esyaSureNeDurumdaKontrol.esya_sure[i])
if esyaSureDurumSure - get_time() < 0 then
tas1 = esyaSureNeDurumdaKontrol.tas1[1]
tas2 = esyaSureNeDurumdaKontrol.tas2[1]
tas3 = esyaSureNeDurumdaKontrol.tas3[1]
efsun1 = esyaSureNeDurumdaKontrol.efsun1[1]
efsun2 = esyaSureNeDurumdaKontrol.efsun2[1]
efsun3 = esyaSureNeDurumdaKontrol.efsun3[1]
efsun4 = esyaSureNeDurumdaKontrol.efsun4[1]
efsun5 = esyaSureNeDurumdaKontrol.efsun5[1]
efsun1deger = esyaSureNeDurumdaKontrol.efsun1deger[1]
efsun2deger = esyaSureNeDurumdaKontrol.efsun2deger[1]
efsun3deger = esyaSureNeDurumdaKontrol.efsun3deger[1]
efsun4deger = esyaSureNeDurumdaKontrol.efsun4deger[1]
efsun5deger = esyaSureNeDurumdaKontrol.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..hesap_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyamiGeriAl = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..hesap_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' and id='"..esyaGenel_id.."' ")
if esyamiGeriAl and esyayiSil then
syschat("Das Item wurde aus dem Markt entfernt. Hole es aus deinem IS-Lager ab.")
end
end
end
end
end
when 20092.take with item.get_id() begin
if game.get_event_flag("alisverisSistemi") == 0 then
say_title("Warnung:")
say("")
say_reward("Zurzeit ist das Aktionshaus geschlossen. Bitte versuche es später noch einmal.")
say("")
return
end
local karakter_isim = tostring(pc.get_name())
local karakter_id = tonumber(pc.get_player_id())
local surem
local esyaAdet=1
local esyaKodu = tonumber(item.get_vnum())
say_item_vnum(item.get_vnum())
engelliEsyalar = {
50187,
50188,
50189,
50190,
50191,
50192,
50193,
50194,
50195,
50196,
40004
}
engelliEsyalarSay = tonumber(table.getn(engelliEsyalar))
for i=1,engelliEsyalarSay,1 do
if item.get_vnum() == engelliEsyalar[i] then
say_reward("Bu eþya engellenmiþtir. Alýþveriþe konulamaz.")
say("")
return
end
end
esyaTablo = mysql_query10("select * from player.item where id ='"..item.get_id().."' ")
local esyaAdSorgula = mysql_query10("select * from player.item_proto where vnum='"..item.get_vnum().."' ")
local esyaAd = tostring(esyaAdSorgula.locale_name[1])
if tonumber(table.getn(esyaTablo)) == 0 then --- if baþlangýç 101
say_reward("Eþyanýz yeni olduðu için alýþveriþde kullanamazsýnýz!")
say("")
return
else
say_reward("[WINDOW_SIZE width;350|height;450]Boni-Liste")
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end --- for bitiþ 401
say("")
say_reward("TAÞLAR")
for i=7,9,1 do --- for baþlangýç 401
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Was moechtest du tun?")
say("")
say("")
say("")
say("")
local esyaSecim = select("Inserieren","Schliessen")
if esyaSecim == 1 then
if item.get_count() > 1 then
say_title("Info:")
say("")
say("Insgesamt "..item.get_count().." Items gefunden.")
say(Schreiben Sie die Anzahl der Stücke in das folgende Kästchen.")
say("")
say_reward("Wieviele möchten Sie hinzufügen?")
kacAdetEklenecek = alisveris.esyaAdet_input()
if kacAdetEklenecek == 0 or kacAdetEklenecek < 0 or kacAdetEklenecek == 1 then
say_title("Warnung:")
say("")
say_reward("Überprüfe deine Eingabe.")
say("")
return
elseif kacAdetEklenecek > item.get_count() then
say_title("Warnung:")
say("")
say_reward("Davon hast du nicht so viele.")
say("")
return
else
esyaAdet = kacAdetEklenecek
end
end
say_title("Info:")
say("")
say_reward("Bitte den Preis eintippen: ")
local esyaFiyati = alisveris.input_number()
if esyaFiyati < 0 then
say_title("Warnung:")
say("")
say_reward("Bitte überprüfe deine Eingabe!")
say("")
return
end
esyaSureDizi = {
"1 Stunde",
"6 Stunden",
"12 Stunden",
"1 Tag",
"3 Tage"
}
esyaSureDiziSay = tonumber(table.getn(esyaSureDizi))
esyaSureDizi[esyaSureDiziSay + 1] = "Kapat"
esyaSureSec = select_table(esyaSureDizi)
for i=1,esyaSureDiziSay,1 do
if esyaSureSec == esyaSureDiziSay + 1 then
return
end
if esyaSureSec == i then
if i == 1 then
surem = get_time() + 3600
elseif i == 2 then
surem = get_time() + 21600
elseif i == 3 then
surem = get_time() + 43200
elseif i == 4 then
surem = get_time() + 86400
elseif i == 5 then
surem = get_time() + 259200
end
end
end
say_title("[WINDOW_SIZE width;350|height;350]Info:")
say("")
say_reward("Wählen Sie eine Kategorie aus:")
say("")
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges""
}
esyaEfsunDizi = {}
esyaTasDizi = {}
esyaEfsunDeger = {}
local k = 1
local m = 1
local esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDizi[esyaKategoriSecDiziSay + 1 ] = "Kapat"
local esyaKategoriSec = select_table(esyaKategoriSecDizi)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
esyaEfsunDizi[k] = tonumber(esyaTablo[1][i])
esyaEfsunDeger[k] = tostring(esyaTablo[1][i+1])
k = k + 1
end
end --- for bitiþ 401
for i=7,9,1 do --- for baþlangýç 401
esyaTasDizi[m] = tonumber(esyaTablo[1][i])
m = m + 1
end
local yenidizi = {}
local esyaEfsunDiziSay = tonumber(table.getn(esyaEfsunDizi))
if esyaEfsunDiziSay == 0 then
esyaEfsunDizi[1] = 0
esyaEfsunDizi[2] = 0
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[1] = 0
esyaEfsunDeger[2] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 1 then
esyaEfsunDizi[2] = 0
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[2] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 2 then
esyaEfsunDizi[3] = 0
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[3] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 3 then
esyaEfsunDizi[4] = 0
esyaEfsunDizi[5] = 0
esyaEfsunDeger[4] = 0
esyaEfsunDeger[5] = 0
elseif esyaEfsunDiziSay == 4 then
esyaEfsunDizi[5] = 0
esyaEfsunDeger[5] = 0
end
esyaTas1 = esyaTasDizi[1]
esyaTas2 = esyaTasDizi[2]
esyaTas3 = esyaTasDizi[3]
esyaEfsun1 = esyaEfsunDizi[1]
esyaEfsun2 = esyaEfsunDizi[2]
esyaEfsun3 = esyaEfsunDizi[3]
esyaEfsun4 = esyaEfsunDizi[4]
esyaEfsun5 = esyaEfsunDizi[5]
esyaEfsunD1 = esyaEfsunDeger[1]
esyaEfsunD2 = esyaEfsunDeger[2]
esyaEfsunD3 = esyaEfsunDeger[3]
esyaEfsunD4 = esyaEfsunDeger[4]
esyaEfsunD5 = esyaEfsunDeger[5]
esyaEkle = mysql_query10("insert into alisveris(esya_id,esya_kodu,esya_adi,karakter_id,karakter_isim,esya_fiyati,esya_kategori,esya_adet,tas1,tas2,tas3,efsun1,efsun1deger,efsun2,efsun2deger,efsun3,efsun3deger,efsun4,efsun4deger,efsun5,efsun5deger,esya_sure)values('"..item.get_id().."','"..item.get_vnum().."','"..esyaAd.."','"..karakter_id.."','"..karakter_isim.."','"..esyaFiyati.."','"..i.."','"..esyaAdet.."','"..esyaTas1.."','"..esyaTas2.."','"..esyaTas3.."','"..esyaEfsun1.."','"..esyaEfsunD1.."','"..esyaEfsun2.."','"..esyaEfsunD2.."','"..esyaEfsun3.."','"..esyaEfsunD3.."','"..esyaEfsun4.."','"..esyaEfsunD4.."','"..esyaEfsun5.."','"..esyaEfsunD5.."','"..surem.."')")
if esyaEkle then
pc.remove_item(esyaKodu,esyaAdet)
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich inseriert!")
say("")
end
end
end
elseif esyaSecim == 2 then
return
end
end --- if bitiþ 101
end
when 20092.chat."Meine Items" with game.get_event_flag("alisverisSistemi") == 1 begin
local karakter_id = tonumber(pc.get_player_id())
local hesap_id = tonumber(pc.get_account_id())
local karakter_isim = tostring(pc.get_name())
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local esyalarim = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_kategori='"..i.."' ")
local esyalarimSay = tonumber(table.getn(esyalarim))
if esyalarimSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie hinzufügen wollten, existiert nicht (mehr).")
say("")
else
local esyalarimDizi = {}
for i = 1, esyalarimSay , 1 do
esyalarimDizi[i] = esyalarim.esya_adi[i]
end
esyalarimDizi[esyalarimSay + 1 ] = "Schließen""
local esyalarimiListele = select_table(esyalarimDizi)
for i = 1, esyalarimSay, 1 do
if esyalarimiListele == esyalarimSay + 1 then
return
end
if esyalarimiListele == i then
local esyaKodu = tonumber(esyalarim.esya_kodu[i])
local esyaid = tonumber(esyalarim.esya_id[i])
esyaGenel_id = tonumber(esyalarim.id[i])
esyaSure = tonumber(esyalarim.esya_sure[i])
esyaAdet = tonumber(esyalarim.esya_adet[i])
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaid.."' ")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item was sie zurückhaben wollen wurde bereits verkauft.")
say("")
return
end
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;475]Boni-Liste")
for i=13,21,2 do --- for baþlangýç 401
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end --- for bitiþ 401
say("")
say_reward("Steine")
for i=10,12,1 do --- for baþlangýç 401
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say_reward("Anzahl Items: "..esyaAdet)
say("")
say("")
say("")
say("")
local esyamiNeYapayim = select("Zurücknehmen","Preis ändern","Schließen")
if esyamiNeYapayim == 1 then
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie wiederhaben möchten wurde bereits verkauft.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..hesap_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyamiGeriAl = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..hesap_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' and id='"..esyaGenel_id.."' ")
if esyamiGeriAl and esyayiSil then
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich zum Markt hinzugefügt! Bitte kontrollieren Sie nach.")
say("")
end
elseif esyamiNeYapayim == 2 then
say_title("Info:")
say("")
say_reward("Geben Sie einen neuen Preis ein: ")
esyaYeniFiyat = alisveris.input_number()
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
esyaVarmiKontrolSay =tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item, dessen Preis Sie ändern möchten, wurde bereits verkauft.")
say("")
return
end
esyaFiyatGuncelle = mysql_query10("update player.alisveris set esya_fiyati = '"..esyaYeniFiyat.."' where karakter_id='"..karakter_id.."' and karakter_isim='"..karakter_isim.."' and esya_id='"..esyaid.."' ")
if esyaFiyatGuncelle then
say_title("Info:")
say("")
say("Der neue Preis des Items beträgt nun "..genel_veri(esyaYeniFiyat).. " [ENTER] - Erfolgreich -")
say("")
end
end
end
end
end
end
end
end
when 20092.chat."Den Markt öffnen" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_account_id())
karakter_isim = tonumber(pc.get_name())
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i = 1, esyaKategoriSecDiziSay, 1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local tumEsyalar = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ORDER BY id DESC")
local tumEsyalarSay = tonumber(table.getn(tumEsyalar))
if tumEsyalarSay < 1 then
say_title("Warnung:")
say("")
say_reward("Zurzeit sind keine Items auf dem Markt.")
say("")
return
end
say_title("[WINDOW_SIZE width;350|height;350]Alle Items:")
say("")
tumEsyalarDizi = {}
for i=1,tumEsyalarSay,1 do
tumEsyalarDizi[i] = tumEsyalar.esya_adi[i].."("..tostring(tumEsyalar.karakter_isim[i])..")"
end
tumEsyalarDizi[tumEsyalarSay + 1 ] = "Schließen"
tumEsyalariGoster = select_table(tumEsyalarDizi)
for i=1,tumEsyalarSay,1 do
if tumEsyalariGoster == tumEsyalarSay + 1 then
return
end
if tumEsyalariGoster == i then
satanKisiKimlik = tonumber(tumEsyalar.karakter_id[i])
satanKisiAd = tostring(tumEsyalar.karakter_isim[i])
esyaFiyati = tonumber(tumEsyalar.esya_fiyati[i])
esyaKodu = tonumber(tumEsyalar.esya_kodu[i])
esyaKimlik = tonumber(tumEsyalar.esya_id[i])
esyaSure = tonumber(tumEsyalar.esya_sure[i])
esyaAdet = tonumber(tumEsyalar.esya_adet[i])
esyaGenel_id = tonumber(tumEsyalar.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Name des Verkäufers: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
local kalan = alisveris.sure_hesapla(esyaSure - get_time())
say_reward(kalan)
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC ")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
if esyayiNeYapacaksin == 1 then
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis hat sich geändert, bitte kaufen Sie das Item erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Sie haben nicht genügend Geld um das Item zu kaufen.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Das Item ist bereits abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie versuchen zu kaufen wurde entweder vom [ENTER] Käufer entfernt oder an einen anderen Spieler verkauft.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich hinzugefügt! Kontrollieren Sie nochmals nach zur Sicherheit.")
say("Ihnen wurde(n) "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Übrig gebliebendes Geld: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Das Item konnte nicht gekauft werden!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
end
end
end
when 20092.chat."Itemsuche" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_account_id())
karakter_isim = tostring(pc.get_name())
esyaAra = select("Item nach Code suchen","Nach Usernamen suchen","Ordne nach Preis","Kapat")
if esyaAra == 1 then
say_title("Info:")
say("")
say_reward("Bitte gib den Item-Code ein:")
esyaAramaKod = tonumber(input())
esyaAramaKodKontrol = mysql_query10("select * from player.alisveris where esya_kodu='"..esyaAramaKod.."' ORDER BY id DESC")
esyaAramaKodKontrolSay = tonumber(table.getn(esyaAramaKodKontrol))
if esyaAramaKodKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Mit dem Code wurde kein inseriertes Item gefunden!")
say("")
return
elseif esyaAramaKod == "" or esyaAramaKod == nil then
say_title("Warnung:")
say("")
say_reward("Bitte geben Sie einen Wert ein.")
say("")
return
elseif esyaAramaKod == 0 then
say_title("Warnung:")
say("")
say_reward("Falsche Eingabe.")
say("")
return
end
esyaAramaKodDizi = {}
for i=1,esyaAramaKodKontrolSay,1 do
esyaAramaKodDizi[i] = tostring(esyaAramaKodKontrol.esya_adi[i]).."("..tostring(esyaAramaKodKontrol.karakter_isim[i])..")"
end
esyaAramaKodDizi[esyaAramaKodKontrolSay + 1] = "Schließen"
esyaAramaKodSec = select_table(esyaAramaKodDizi)
for i=1,esyaAramaKodKontrolSay,1 do
if esyaAramaKodSec == esyaAramaKodKontrolSay + 1 then
return
end
if esyaAramaKodSec == i then
satanKisiKimlik = tonumber(esyaAramaKodKontrol.karakter_id[i])
satanKisiAd = tostring(esyaAramaKodKontrol.karakter_isim[i])
esyaFiyati = tonumber(esyaAramaKodKontrol.esya_fiyati[i])
esyaKodu = tonumber(esyaAramaKodKontrol.esya_kodu[i])
esyaKimlik = tonumber(esyaAramaKodKontrol.esya_id[i])
esyaSure = tonumber(esyaAramaKodKontrol.esya_sure[i])
esyaAdet = tonumber(esyaAramaKodKontrol.esya_adet[i])
esyaGenel_id = tonumber(esyaAramaKodKontrol.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item wurde entweder verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("Steine")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Name des Verkäufers: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis des Items wurde geändert. Bitte versuchen Sie es erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Die Zeit des Items, das sie kaufen möchten ist leider abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich gekauft!")
say("Von Ihrem Konto wurde "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Restkontostand: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Item konnte nicht gekauft werden!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
elseif esyaAra == 2 then
say_title("Info:")
say("")
say_reward("Geben Sie den Namen des gewünschten Verkäufers ein:")
esyaSahipAdi = tostring(input())
if esyaSahipAdi == "" or esyaSahipAdi == nil then
say_title("Warnung:")
say("")
say_reward("Bitte einen Namen eingeben!")
say("")
return
elseif esyaSahipAdi == karakter_isim then
say_title("Warnung:")
say("")
say_reward("Ihr Name ist nicht möglich!")
say("")
return
end
esyaKarakterAdiAra = mysql_query10("select * from player.alisveris where karakter_isim='"..esyaSahipAdi.."' ORDER BY id DESC ")
esyaKarakterAdiAraSay = tonumber(table.getn(esyaKarakterAdiAra))
if esyaKarakterAdiAraSay < 1 then
say_title("Warnung:")
say("")
say_reward("Kein Item wurde gefunden, das von diesem Verkäufer inseriert wurde.")
say("")
else
esyaKarakterDizi = {}
for i=1,esyaKarakterAdiAraSay,1 do
esyaKarakterDizi[i] = esyaKarakterAdiAra.esya_adi[i].."("..tostring(esyaKarakterAdiAra.karakter_isim[i])..")"
end
esyaKarakterDizi[esyaKarakterAdiAraSay + 1 ] = "Schließen"
esyaKarakterSec = select_table(esyaKarakterDizi)
for i=1,esyaKarakterAdiAraSay,1 do
if esyaKarakterSec == esyaKarakterAdiAraSay + 1 then
return
end
if esyaKarakterSec == i then
satanKisiKimlik = tonumber(esyaKarakterAdiAra.karakter_id[i])
satanKisiAd = tostring(esyaKarakterAdiAra.karakter_isim[i])
esyaFiyati = tonumber(esyaKarakterAdiAra.esya_fiyati[i])
esyaKodu = tonumber(esyaKarakterAdiAra.esya_kodu[i])
esyaKimlik = tonumber(esyaKarakterAdiAra.esya_id[i])
esyaSure = tonumber(esyaKarakterAdiAra.esya_sure[i])
esyaAdet = tonumber(esyaKarakterAdiAra.esya_adet[i])
esyaGenel_id = tonumber(esyaKarakterAdiAra.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Verkäufer: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis wurde geändert. Versuchen Sie es erneut.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Die Zeit des Items ist abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Das Item wurde erfolgreich gekauft.")
say("Von Ihrem Konto wurde "..genel_veri(esyaFiyati).." Yang abgezogen.")
say("")
say_reward("Verbleibender Kontostand: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Das Item ist nicht gekauft worden.")
end
end
end
end
end
elseif esyaAra == 3 then
esyaKategoriSecDizi = {
"Waffen",
"Rüstungen",
"Schmuck",
"Helme",
"Schuhe",
"Schilder",
"Sonstiges"
}
esyaKategoriSecDiziSay = tonumber(table.getn(esyaKategoriSecDizi))
esyaKategoriSecDiziY = {}
for i=1,esyaKategoriSecDiziSay,1 do
esyaKategorSayisiKontrol = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ")
esyaKategoriSayisi = tonumber(table.getn(esyaKategorSayisiKontrol))
esyaKategoriSecDiziY[i] = esyaKategoriSecDizi[i].."("..esyaKategoriSayisi..")"
end
esyaKategoriSecDiziY[esyaKategoriSecDiziSay + 1 ] = "Schließen"
esyaKategoriSec = select_table(esyaKategoriSecDiziY)
for i=1,esyaKategoriSecDiziSay,1 do
if esyaKategoriSec == esyaKategoriSecDiziSay + 1 then
return
end
if esyaKategoriSec == i then
local tumEsyalar = mysql_query10("select * from player.alisveris where esya_kategori='"..i.."' ORDER BY esya_fiyati DESC ")
local tumEsyalarSay = tonumber(table.getn(tumEsyalar))
if tumEsyalarSay < 1 then
say_title("Warnung:")
say("")
say_reward("Zurzeit keine Items vorhanden.")
say("")
return
end
say_title("[WINDOW_SIZE width;350|height;350]Alle Items:")
say("")
tumEsyalarDizi = {}
for i=1,tumEsyalarSay,1 do
tumEsyalarDizi[i] = tumEsyalar.esya_adi[i].."("..tostring(tumEsyalar.karakter_isim[i])..")"
end
tumEsyalarDizi[tumEsyalarSay + 1 ] = "Schließen"
tumEsyalariGoster = select_table(tumEsyalarDizi)
for i=1,tumEsyalarSay,1 do
if tumEsyalariGoster == tumEsyalarSay + 1 then
return
end
if tumEsyalariGoster == i then
satanKisiKimlik = tonumber(tumEsyalar.karakter_id[i])
satanKisiAd = tostring(tumEsyalar.karakter_isim[i])
esyaFiyati = tonumber(tumEsyalar.esya_fiyati[i])
esyaKodu = tonumber(tumEsyalar.esya_kodu[i])
esyaKimlik = tonumber(tumEsyalar.esya_id[i])
esyaSure = tonumber(tumEsyalar.esya_sure[i])
esyaAdet = tonumber(tumEsyalar.esya_adet[i])
esyaGenel_id = tonumber(tumEsyalar.id[i])
karakterParam = tonumber(pc.get_gold())
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
local esyaTablo = mysql_query10("select * from player.alisveris where esya_id ='"..esyaKimlik.."' ")
say_item_vnum(esyaKodu)
say_reward("[WINDOW_SIZE width;350|height;460]Boni-Liste")
for i=13,21,2 do
if tonumber(esyaTablo[1][i]) != 0 then
say_title(alisveris.efsun(tonumber(esyaTablo[1][i]))..tostring(esyaTablo[1][i+1]))
end
end
say("")
say_reward("TAÞLAR")
for i=10,12,1 do
say_title(alisveris.tas(tonumber(esyaTablo[1][i])))
end
say("")
say_reward("Verkäufer: "..satanKisiAd)
say_reward("Preis: "..genel_veri(esyaFiyati))
say_reward("Anzahl: "..esyaAdet)
kalan = alisveris.sure_hesapla(esyaSure-get_time())
say_reward(kalan)
say("")
say("")
say("")
say("")
esyayiNeYapacaksin = select("Kaufen","Schließen")
local tumEsyalarY = mysql_query10("select * from player.alisveris where esya_id='"..esyaKimlik.."' ORDER BY id DESC")
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
esyaFiyatiY = tonumber(tumEsyalarY.esya_fiyati[1])
say_title("Info:")
say("")
say("Möchten Sie das Item wirklich kaufen?")
say("")
esyaSatinAlSec = select("Ja","Nein")
if esyaSatinAlSec == 2 then
return
end
if esyayiNeYapacaksin == 1 then
if esyaFiyatiY != esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Der Preis hat sich geändert. Bitte nochmal kaufen.")
say("")
return
elseif karakterParam < esyaFiyati then
say_title("Warnung:")
say("")
say_reward("Nicht genügend Geld vorhanden.")
say("")
return
elseif esyaSure - get_time() < 0 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie kaufen wollen, ist abgelaufen.")
say("")
return
end
esyaVarmiKontrolEt = mysql_query10("select * from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' ")
esyaVarmiKontrolSay = tonumber(table.getn(esyaVarmiKontrolEt))
if esyaVarmiKontrolSay < 1 then
say_title("Warnung:")
say("")
say_reward("Das Item das Sie kaufen möchten, wurde bereits verkauft oder zurückgenommen.")
say("")
return
end
tas1 = esyaTablo.tas1[1]
tas2 = esyaTablo.tas2[1]
tas3 = esyaTablo.tas3[1]
efsun1 = esyaTablo.efsun1[1]
efsun2 = esyaTablo.efsun2[1]
efsun3 = esyaTablo.efsun3[1]
efsun4 = esyaTablo.efsun4[1]
efsun5 = esyaTablo.efsun5[1]
efsun1deger = esyaTablo.efsun1deger[1]
efsun2deger = esyaTablo.efsun2deger[1]
efsun3deger = esyaTablo.efsun3deger[1]
efsun4deger = esyaTablo.efsun4deger[1]
efsun5deger = esyaTablo.efsun5deger[1]
window = "MALL"
local depoKontrol = mysql_query10("select pos from player.item where owner_id='"..karakter_id.."' and window='"..window.."' ORDER BY id DESC LIMIT 1")
local pos
depoKontrolSay = tonumber(table.getn(depoKontrol))
if depoKontrolSay == 0 then
pos = 0
else
pos = depoKontrol.pos[1]+1
end
esyayiAldim = mysql_query10("insert into player.item(owner_id,window,pos,count,vnum,socket0,socket1,socket2,socket3,socket4,socket5,attrtype0,attrvalue0,attrtype1,attrvalue1,attrtype2,attrvalue2,attrtype3,attrvalue3,attrtype4,attrvalue4,attrtype5,attrvalue5,attrtype6,attrvalue6)values('"..karakter_id.."','"..window.."','"..pos.."','"..esyaAdet.."','"..esyaKodu.."','"..tas1.."','"..tas2.."','"..tas3.."',0,0,0,'"..efsun1.."','"..efsun1deger.."','"..efsun2.."','"..efsun2deger.."','"..efsun3.."','"..efsun3deger.."','"..efsun4.."','"..efsun4deger.."','"..efsun5.."','"..efsun5deger.."',0,0,0,0)")
esyayiSil = mysql_query10("delete from player.alisveris where karakter_id='"..satanKisiKimlik.."' and karakter_isim='"..satanKisiAd.."' and esya_id='"..esyaKimlik.."' and id='"..esyaGenel_id.."' ")
alisverisParasiYukle = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param + '"..esyaFiyati.."' where id='"..satanKisiKimlik.."' and name='"..satanKisiAd.."' ")
if esyayiAldim and esyayiSil and alisverisParasiYukle then
pc.change_money(-esyaFiyati)
karakterParamY = tonumber(pc.get_gold())
say_title("Info:")
say("")
say("Ihr Item wurde erfolgreich aufgenommen.")
say("Es wurden "..genel_veri(esyaFiyati).." Yang von ihrem Konto abgehoben.")
say("")
say_reward("Verbleibendes Geld: "..genel_veri(karakterParamY))
say("")
else
say_title("Warnung:")
say("")
say_reward("Item nicht aufgenommen!")
end
elseif esyayiNeYapacaksin == 2 then
return
end
end
end
end-- kategori seçiminin endi
end-- kategori forunun endi
end
end
when 20092.chat."Mein Konto" with game.get_event_flag("alisverisSistemi") == 1 begin
karakter_id = tonumber(pc.get_player_id())
karakter_isim = tostring(pc.get_name())
alisverisParamKontrol = mysql_query10("select * from player.player where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
alisverisParam = tonumber(alisverisParamKontrol.alisveris_param[1])
say_title("Info:")
say("")
say("Herzlich willkommen "..karakter_isim)
say("Von hier können Sie das Geld abheben das sie verdient haben.")
say("")
say_reward("Ihr Kontostand beträgt: "..genel_veri(alisverisParam))
say("")
say_reward("Was möchten Sie tun?")
say("")
alisverisParamiNeYapayim = select("Geld abheben","Schließen")
if alisverisParamiNeYapayim == 1 then
say_title("Info:")
say("")
say_reward("Geben Sie die Anzahl an Yang ein, die Sie abheben möchten:")
cekilecekParaMiktari = alisveris.input_number()
if alisverisParam == 0 then
say_title("Warnung:")
say("")
say_reward("Sie haben nicht so viel Yang.")
say("")
return
elseif cekilecekParaMiktari > alisverisParam or cekilecekParaMiktari == 0 or cekilecekParaMiktari < 0 then
say_title("Warnung:")
say("")
say_reward("Überprüfen Sie bitte die Anzahl.")
say("")
return
end
alisverisParamiCektim = mysql_query10("UPDATE player.player SET alisveris_param = alisveris_param - '"..cekilecekParaMiktari.."' where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
if alisverisParamiCektim then
pc.change_money(cekilecekParaMiktari)
say_title("Info:")
say("")
say("Von Ihrem Konto wurde(n) "..genel_veri(cekilecekParaMiktari).." Yang eingezogen.")
say("")
alisverisParamKontrol = mysql_query10("select * from player.player where id='"..karakter_id.."' and name='"..karakter_isim.."' ")
alisverisParam = tonumber(alisverisParamKontrol.alisveris_param[1])
say_reward("Yang: "..genel_veri(alisverisParam))
say("")
end
elseif alisverisParamiNeYapayim == 2 then
return
end
end
when 20092.chat."(GM) - Verwaltung des Marktes" with pc.is_gm() begin
yoneticiAd = tostring(pc.get_name())
say_title("Info:")
say("")
say("Hallo, "..yoneticiAd)
say("Hier können Sie den Markt öffnen oder schließen.")
say("")
say_reward("Aktueller Status des Marktes: "..game.get_event_flag("alisverisSistemi"))
say("")
say_reward("Was möchtest du machen?")
say("")
yoneticiSecim = select("Markt öffnen","Markt schließen","Zurück")
if yoneticiSecim == 1 then
say_title("Info:")
say("")
game.set_event_flag("alisverisSistemi",1)
say("Der Markt wurde wieder geöffnet.")
say("")
elseif yoneticiSecim == 2 then
say_title("Info:")
say("")
game.set_event_flag("alisverisSistemi",0)
say("Der Markt wurde geschlossen.")
say("")
elseif yoneticiSecim == 3 then
return
end
end
when 20092.click with game.get_event_flag("alisverisSistemi") == 0 begin
say_title("Warnung:")
say("")
say_reward("Der Markt wurde leider geschlossen. Kommen Sie später noch einmal wieder.")
say("")
end
--------- FONKSÝYON
function sure_hesapla(gelen_sure)
local kalan = gelen_sure
local saat = 0
local dakika = 0
while kalan > 3600 do
saat = saat+1
kalan= kalan - 3600
end
while kalan > 60 do
dakika = dakika+1
kalan= kalan - 60
end
if kalan < 0 then
kalan = 0
end
--say_reward())
gelen_sure = tostring("Verbl. Zeit: "..saat.." Stunde(n) "..dakika.." Minute(n) "..kalan.." Sekunde(n)")
return gelen_sure
end
function input_number (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil and n <= 2000000000 then
break
end
say_reward("Bitte den Preis auf unter 2KKK reduzieren!")
n = nil
end
return n
end
function esyaAdet_input (sentence)
say (sentence)
local n = nil
while n == nil do
n = tonumber (input())
if n != nil and n <= 200 then
break
end
say_reward("Nicht mehr als 200 Stück!")
n = nil
end
return n
end
function tas(vnum)
local tas =
{
[0] = {"Bu Nesneye Taþ Eklenemez "},
[1] = {"Taþ eklenmemiþ "},
[28430] = {"Durchbruch +4"},
[28431] = {"Todesstoß +4"},
[28432] = {"Wiederkehr +4"},
[28433] = {"Krieger +4"},
[28434] = {"Ninja +4"},
[28435] = {"Sura +4"},
[28436] = {"Schamane +4"},
[28437] = {"Monster +4"},
[28438] = {"Ausweichen +4"},
[28439] = {"Ducken +4"},
[28440] = {"Magie +4"},
[28441] = {"Vitalität +4"},
[28442] = {"Schutz +4"},
[28443] = {"Hast +4"},
[28330] = {"Durchbruch +3"},
[28331] = {"Todesstoß +3"},
[28332] = {"Wiederkehr +3"},
[28333] = {"Krieger +3"},
[28334] = {"Ninja +3"},
[28335] = {"Sura +3"},
[28336] = {"Schamane +3"},
[28337] = {"Monster +3"},
[28338] = {"Ausweichen +3"},
[28339] = {"Ducken +3"},
[28340] = {"Magie +3"},
[28341] = {"Vitalität +3"},
[28342] = {"Schutz +3"},
[28343] = {"Hast +3"},
[28230] = {"Durchbruch +2"},
[28231] = {"Todesstoß +2"},
[28232] = {"Wiederkehr +2"},
[28233] = {"Krieger +2"},
[28234] = {"Ninja +2"},
[28235] = {"Sura +2"},
[28236] = {"Schamane +2"},
[28237] = {"Monster +2"},
[28238] = {"Ausweichen +2"},
[28239] = {"Ducken +2"},
[28240] = {"Magie +2"},
[28241] = {"Vitalität +2"},
[28242] = {"Schutz +2"},
[28243] = {"Hast +2"},
[28130] = {"Durchbruch +1"},
[28131] = {"Todesstoß +1"},
[28132] = {"Wiederkehr +1"},
[28133] = {"Krieger +1"},
[28134] = {"Ninja +1"},
[28135] = {"Sura +1"},
[28136] = {"Schamane +1"},
[28137] = {"Monster +1"},
[28138] = {"Ausweichen +1"},
[28139] = {"Ducken +1"},
[28140] = {"Magie +1"},
[28141] = {"Vitalität +1"},
[28142] = {"Schutz +1"},
[28143] = {"Hast +1"},
[28030] = {"Durchbruch +0"},
[28031] = {"Todesstoß +0"},
[28032] = {"Wiederkehr +0"},
[28033] = {"Krieger +0"},
[28034] = {"Ninja +0"},
[28035] = {"Sura +0"},
[28036] = {"Schamane +0"},
[28037] = {"Monster +0"},
[28038] = {"Ausweichen +0"},
[28039] = {"Ducken +0"},
[28040] = {"Magie +0"},
[28041] = {"Vitalität +0"},
[28042] = {"Schutz +0"},
[28043] = {"Hast +0"},
[28960] = {"Steinsplitter "},
}
return tas[vnum][1]
end
function efsun(vnum)
local efsun =
{
[0] = {"Keine Boni vorhanden "},
[1] = {"Max TP +"},
[2] = {"Max MP +"},
[3] = {"VIT +"},
[4] = {"INT +"},
[5] = {"STR +"},
[6] = {"DEX +"},
[7] = {"Angriffsgeschwindigkeit +"},
[8] = {"Bewegungsgeschwindigkeit +"},
[9] = {"Zaubergeschwindigkeit +"},
[10] = {"TP-Regeneration %"},
[11] = {"MP-Regeneration %"},
[12] = {"Vergiftungschance %"},
[13] = {"Ohnmachtschance %"},
[14] = {"Verlangsamungschance %"},
[15] = {"Chance auf Krit %"},
[16] = {"Chance auf DB %"},
[17] = {"Stark gegen Halbmenschen %"},
[18] = {"Stark gegen Tiere %"},
[19] = {"Stark gegen Orks %"},
[20] = {"Stark gegen Esoterische %"},
[21] = {"Stark gegen Untote %"},
[22] = {"Stark gegen Teufel %"},
[23] = {"Schaden wird von TP absorbiert %"},
[24] = {"Schaden wird von MP absorbiert %"},
[25] = {"Chance TP des Gegners zu übernehmen %"},
[26] = {"Chance MP bei Treffer zurückzuerhalten %"},
[27] = {"Chance körperlichen Angriff abzublocken %"},
[28] = {"Chance Pfeilangriff auszuweichen %"},
[29] = {"Schwertverteidigung %"},
[30] = {"Zweihandverteidigung %"},
[31] = {"Dolchverteidigung %"},
[32] = {"Glockenverteidigung %"},
[33] = {"Fächerverteidigung %"},
[34] = {"Pfeilwiederstand %"},
[35] = {"Feuerwiderstand %"},
[36] = {"Blitzwiderstand %"},
[37] = {"Magiewiderstand %"},
[38] = {"Windwiderstand %"},
[39] = {"Chance körperlichen Angriff zu reflektieren %"},
[40] = {"Chance Fluch zu reflektieren %"},
[41] = {"Giftwiderstand %"},
[42] = {"Chance MP wiederherzustellen %"},
[43] = {"Chance auf EXP Bonus %"},
[44] = {"Chance auf doppeltes Yang %"},
[45] = {"Chance doppelte Menge Gegenstände fallenzulassen %"},
[46] = {"Trank effekt zuwachs %"},
[47] = {"Chance TP wiederherzustellen %"},
[48] = {"Abwehr gegen Ohnmacht"},
[49] = {"Abwehr gegen Verlangsamen"},
[50] = {"Imun gegen Stürzen "},
[51] = {" "},
[52] = {"Bogenreichweite +"},
[53] = {"Angriffswert +"},
[54] = {"Verteidigung +"},
[55] = {"Magischer Angriffswert +"},
[56] = {"Magischer Verteidigungswert +"},
[57] = {" "},
[58] = {"Max. Ausdauer +"},
[59] = {"Stark gegen Krieger %"},
[60] = {"Stark gegen Ninja %"},
[61] = {"Stark gegen Sura %"},
[62] = {"Stark gegen Schamanen %"},
[63] = {"Stark gegen Monster %"},
[64] = {"Angriffswert +"},
[65] = {"Verteidigung +"},
[66] = {"EXP +?%"},
[67] = {"Dropchance [Gegenstände] "},
[68] = {"Dropchance [Gold] "},
[69] = {" "},
[70] = {" "},
[71] = {"Fertigkeitschaden %"},
[72] = {"Durchschnittschaden %"},
[73] = {"Widerstand gegen Fertigkeitsschaden "},
[74] = {"durchschn. Schadenswiderstand "},
[75] = {" "},
[76] = {"iCafe exp-bonus "},
[77] = {"iCafe Chance auf erbeuten von gegenständen "},
[78] = {"Abwehrchance gegen Kriegerangriffe %"},
[79] = {"Abwehrchance gegen Ninjaangriffe %"},
[80] = {"Abwehrchance gegen Suraangriffe %"},
[81] = {"Abwehrchance gegen Schamanenangriffe %"},
}
return efsun[vnum][1]
end
end -- state endi
end -- quest endi
Habe auch noch die +0, +1, +2 und +3 Steine hinzugefügt. Auf dem Server wo es +5 oder höhere Steine gibt, sollten diese noch reineditiert werden.
Hast aber den ein oder anderen Satz vergessen zu übersetzen
Zudem ist die Mysql Query alles andere wie Deutsch
Yes because its sending the account information to his servers hum?
Can you please explain me, in which line the information is being sent, or any other information is going to be transfered outside the quest?
If you don't know a thing about lua, please don't announce such shitty comments. I red this script and there's no backdoor in it.
Ah and the information up there is to find out which item belongs to which account.
Quote:
Originally Posted by AnTii™
Hast aber den ein oder anderen Satz vergessen zu übersetzen
Zudem ist die Mysql Query alles andere wie Deutsch
Ja, aber ich wollte nicht auch noch die ganze Datenbank übersetzen und alles ändern in der Quest.
Ja kann sein dass ich den ein oder anderen Satz vergessen habe, aber freut euch doch einfach dass es überhaupt jemand gemacht hat. Das war nämlich nicht so einfach mal kurz alles übersichtliches übersetzen, weil ich schauen musste sogar zwischen den einzelnen Variablen, dass das auch wirklich ein Text ist und nicht nur eine Variable, die Türkisch bleiben muss weil ich sie sonst überall hätte abändern müssen. Dazu kommt noch, dass ich die Bonis übersetzen musste was die größte Drecksarbeit des Jahrhunderts war und na ja..
Edit: So jetzt müsste oben alles übersetzt sein, wenn es noch Sachen gibt die auf Türkisch sind, sagt sie mir einfach, dann kann ich es abändern.
Und dass die ganzen Variablen etc. türkisch bleiben, sollte hoffentlich jedem klar sein. Aber keine Angst, es ist kein Backdoor drin.
Yes because its sending the account information to his servers hum?
Can you please explain me, in which line the information is being sent, or any other information is going to be transfered outside the quest?
If you don't know a thing about lua, please don't announce such shitty comments. I red this script and there's no backdoor in it.
Ah and the information up there is to find out which item belongs to which account.
Ja, aber ich wollte nicht auch noch die ganze Datenbank übersetzen und alles ändern in der Quest.
Ja kann sein dass ich den ein oder anderen Satz vergessen habe, aber freut euch doch einfach dass es überhaupt jemand gemacht hat. Das war nämlich nicht so einfach mal kurz alles übersichtliches übersetzen, weil ich schauen musste sogar zwischen den einzelnen Variablen, dass das auch wirklich ein Text ist und nicht nur eine Variable, die Türkisch bleiben muss weil ich sie sonst überall hätte abändern müssen. Dazu kommt noch, dass ich die Bonis übersetzen musste was die größte Drecksarbeit des Jahrhunderts war und na ja..
Edit: So jetzt müsste oben alles übersetzt sein, wenn es noch Sachen gibt die auf Türkisch sind, sagt sie mir einfach, dann kann ich es abändern.
Und dass die ganzen Variablen etc. türkisch bleiben, sollte hoffentlich jedem klar sein. Aber keine Angst, es ist kein Backdoor drin.
Der Themenersteller castet Strings in Strings und Numbers in Numbers, hierbei beißt sich die Katze in den Schwanz. MrLibya scheint sich nur unheimlich darüber aufgeregt zu haben, von Backdoors ist hier weniger die Rede.
[Selling] >>10€ - 25€ PSC = Offline + DE Shop<< 05/10/2015 - elite*gold Trading - 12 Replies Der Shop ist in diesem Moment:
Inaktiv
Liebe e*gold-Bunker,
Ich verkaufe 10€ - 25 € PSCards Offline + DE aus Hamburg.
Belege gibt es auf Anfrage
(Das fotografieren/scannen ist umständlich also gibt vorher Bescheid)
Zu einem Kurs von 1€ zu 70 E*Gold (kz. 1:70)NEW
offline PSC shop 09/22/2012 - elite*gold Trading - 6 Replies 10euro = 440e*g VHB aber Treasures stehen!
10er PSC
Treasure
Treasure
Treasure
bitte schreibt wenn ihr sie gekauft habt und gebt TBM ;)
Offline Shop 08/03/2009 - Lineage 2 - 0 Replies Dont know if anyone of u know about that how to setup a offline shop on serv? Hope i get a answer would be really thankfully =):bandit:
![Metin2 Offline Shop[LUA]](https://www.elitepvpers.com/forum/iconimages/metin2-pserver-guides-strategies/metin2-offline-shop-lua_ltr.gif){kind=small}
Metin2 Offline Shop[LUA]
