• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!
  • 2026 staff recruitment is open! Check it out and consider applying!

[ZNOTEAAC] Downgrade Automatic shop from printer?

X

xvizzyy

Member
Joined
Apr 27, 2013
Messages
44
Reaction score
7
Hello, as the title says I would like to ask if someone can downgrade the script from 1.0 to 0.3~ and release it? :)

https://otland.net/threads/automatic-znote-aac-shop-tfs-1-0.224483/

Code: 
<globalevent name="Znote Shop" interval="30000" script="znoteShop.lua"/>

Code: 
function onThink(interval, lastExecution)
    local players = Game.getPlayers()
    if #players == 0 then -- 0 players online, no need to execute the script
        return true
    end

    local player
    for i = 1, #players do
        player = players[i]
        local orderQuery = db.storeQuery('SELECT `id`, `type`, `itemid`, `count` FROM `znote_shop_orders` WHERE `account_id` = '.. player:getAccountId() ..' LIMIT 1;')
        if orderQuery then --Lets check if the players online have orderd something from the shop
            local orderId = result.getDataInt(orderQuery, 'id')
            local orderType = result.getDataInt(orderQuery, 'type')
            local orderItemId = result.getDataInt(orderQuery, 'itemid')
            local orderCount = result.getDataInt(orderQuery, 'count')
            result.free(orderQuery)

            if orderType == 1 then
                if player:addItemEx(Game.createItem(orderItemId, orderCount or 1)) ~= RETURNVALUE_NOERROR or
                    player:getFreeCapacity() < ItemType(orderItemId):getWeight(orderCount or 1) then --Lets check if player have slot or cape left. Else send to player inbox

                    local parcel = player:getInbox():addItem(2596, 1, false, 1)
                    if not parcel then --If not being able to create parcel we stop the script and retry again.
                        print('[ERROR Znote Shop Globalevents] = Error on creating a parcel.')
                        return true
                    end

                    local letter = parcel:addItem(2598, 1, false, 1)
                    letter:setAttribute(ITEM_ATTRIBUTE_TEXT, 'You have received your shop item. Thanks for donating.')
                    parcel:addItem(orderItemId, orderCount or 1, false, 1)
                end
                db.query('DELETE FROM `znote_shop_orders` WHERE `id` = '.. orderId ..';')
                player:sendTextMessage(MESSAGE_INFO_DESCR, 'Congratulations! You have received '.. orderCount ..'x '.. ItemType(orderItemId):getName() ..'!')
            end
        end
    end
    return true
end
 
Sort by date Sort by votes
Code: 
function onThink(interval, lastExecution)
    local players = getPlayersOnline()
    if #players == 0 then -- 0 players online, no need to execute the script
        return true
    end

    local cid
    for i = 1, #players do
        cid = players[i]
        local orderQuery = db.storeQuery('SELECT `id`, `type`, `itemid`, `count` FROM `znote_shop_orders` WHERE `account_id` = '.. getAccountIdByName(getPlayerName(cid)) ..' LIMIT 1;')
        if orderQuery then --Lets check if the players online have orderd something from the shop
            local orderId = result.getDataInt(orderQuery, 'id')
            local orderType = result.getDataInt(orderQuery, 'type')
            local orderItemId = result.getDataInt(orderQuery, 'itemid')
            local orderCount = result.getDataInt(orderQuery, 'count')
            result.free(orderQuery)

            if orderType == 1 then
                if doPlayerAddItemEx(cid, doCreateItem(orderItemId, orderCount or 1)) ~= RETURNVALUE_NOERROR or
                    getPlayerFreeCap(cid) < getItemWeight(orderItemId) * orderCount or 1 then --Lets check if player have slot or cape left. Else send to player inbox
                    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Could not deliver the objects, try to free up some cap!')
                    return true
                end

                db.query('DELETE FROM `znote_shop_orders` WHERE `id` = '.. orderId ..';')
                local itemInfo = getItemInfo(orderItemId)
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Congratulations! You have received '.. orderCount ..'x '.. itemInfo.name ..'!')
            end
        end
    end
    return true
end

Give it a try
 
Upvote 0 Downvote
Tarek1337 said:
Yeh, Just try to find the Gesior´s shop delivery system. :p And i will try to help you
Click to expand...
Was not at home, sorry ill try to find it tomorrow its late for now.

WibbenZ said:
Code: 
function onThink(interval, lastExecution)
    local players = getPlayersOnline()
    if #players == 0 then -- 0 players online, no need to execute the script
        return true
    end

    local cid
    for i = 1, #players do
        cid = players[i]
        local orderQuery = db.storeQuery('SELECT `id`, `type`, `itemid`, `count` FROM `znote_shop_orders` WHERE `account_id` = '.. getAccountIdByName(getPlayerName(cid)) ..' LIMIT 1;')
        if orderQuery then --Lets check if the players online have orderd something from the shop
            local orderId = result.getDataInt(orderQuery, 'id')
            local orderType = result.getDataInt(orderQuery, 'type')
            local orderItemId = result.getDataInt(orderQuery, 'itemid')
            local orderCount = result.getDataInt(orderQuery, 'count')
            result.free(orderQuery)

            if orderType == 1 then
                if doPlayerAddItemEx(cid, doCreateItem(orderItemId, orderCount or 1)) ~= RETURNVALUE_NOERROR or
                    getPlayerFreeCap(cid) < getItemWeight(orderItemId) * orderCount or 1 then --Lets check if player have slot or cape left. Else send to player inbox
                    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Could not deliver the objects, try to free up some cap!')
                    return true
                end

                db.query('DELETE FROM `znote_shop_orders` WHERE `id` = '.. orderId ..';')
                local itemInfo = getItemInfo(orderItemId)
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Congratulations! You have received '.. orderCount ..'x '.. itemInfo.name ..'!')
            end
        end
    end
    return true
end

Give it a try
Click to expand...
Thank you. I tested it but nothing happend when I orderd the product.
 
Upvote 0 Downvote
Tarek1337 said:
Yeh, Just try to find the Gesior´s shop delivery system. :p And i will try to help you
Click to expand...
I guess this would be it:

Code: 
-- ### CONFIG ###
-- message send to player by script "type" (types you can check in "data/lib/000-constants.lua")
SHOP_MSG_TYPE = MESSAGE_STATUS_CONSOLE_BLUE
-- time (in seconds) between queries to MySQL database by shop script
SQL_interval = 30
-- ### END OF CONFIG ###
function onThink(interval, lastExecution)
    local result_plr = db.getResult("SELECT * FROM `z_ots_comunication` WHERE `type` = 'login';")
    if(result_plr:getID() ~= -1) then
        while(true) do
            id = tonumber(result_plr:getDataInt("id"))
            action = tostring(result_plr:getDataString("action"))
            delete = tonumber(result_plr:getDataInt("delete_it"))
            cid = getCreatureByName(tostring(result_plr:getDataString("name")))
            if isPlayer(cid) == TRUE then
                local itemtogive_id = tonumber(result_plr:getDataInt("param1"))
                local itemtogive_count = tonumber(result_plr:getDataInt("param2"))
                local container_id = tonumber(result_plr:getDataInt("param3"))
                local container_count = tonumber(result_plr:getDataInt("param4"))
                local add_item_type = tostring(result_plr:getDataString("param5"))
                local add_item_name = tostring(result_plr:getDataString("param6"))
                local received_item = 0
                local full_weight = 0
                if add_item_type == 'container' then
                    container_weight = getItemWeightById(container_id, 1)
                    if isItemRune(itemtogive_id) == TRUE then
                        items_weight = container_count * getItemWeightById(itemtogive_id, 1)
                    else
                        items_weight = container_count * getItemWeightById(itemtogive_id, itemtogive_count)
                    end
                    full_weight = items_weight + container_weight
                else
                    full_weight = getItemWeightById(itemtogive_id, itemtogive_count)
                    if isItemRune(itemtogive_id) == TRUE then
                        full_weight = getItemWeightById(itemtogive_id, 1)
                    else
                        full_weight = getItemWeightById(itemtogive_id, itemtogive_count)
                    end
                end
                local free_cap = getPlayerFreeCap(cid)
                if full_weight <= free_cap then
                    if add_item_type == 'container' then
                        local new_container = doCreateItemEx(container_id, 1)
                        doItemSetAttribute(new_container, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')
                        doItemSetAttribute(new_container, "tid", id)
                        local iter = 0
                        while iter ~= container_count do
                            local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)
                            doItemSetAttribute(new_item, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')
                            doItemSetAttribute(new_item, "tid", id)
                            doAddContainerItemEx(new_container, new_item)
                            iter = iter + 1
                        end
                        received_item = doPlayerAddItemEx(cid, new_container)
                    else
                        local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)
                        doItemSetAttribute(new_item, "description", 'Bought by ' .. getCreatureName(cid) .. ' [ID:' .. id .. '].')
                        doItemSetAttribute(new_item, "tid", id)
                        received_item = doPlayerAddItemEx(cid, new_item)
                    end
                    if received_item == RETURNVALUE_NOERROR then
                        doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop.')
                        doPlayerSave(cid)
                        db.executeQuery("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";")
                        db.executeQuery("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";")
                    else
                        doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please make place for this item in your backpack/hands and wait about '.. SQL_interval ..' seconds to get it.')
                    end
                else
                    doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. It weight is '.. full_weight ..' oz., you have only '.. free_cap ..' oz. free capacity. Put some items in depot and wait about '.. SQL_interval ..' seconds to get it.')
                end
            end
            if not(result_plr:next()) then
                break
            end
        end
        result_plr:free()
    end
    return true
end
 
Upvote 0 Downvote

Similar threads

Y
  • Question Question
C++ Help T.F.S 1.5 downgrade 772
Replies
0
Views
200
Youchiro
Y
Back
Top