|
|
战神引擎商城明文传奇源代码mir2.scenes.main.panel.shop
local itemInfo = import("..common.itemInfo")
local common = import("..common.common")
local shop = class("shop", function() return display.newNode() end)
table.merge(shop, {
content,
nodes,
selectData,
-- 物品容器
shopcontain = {},
tag1=nil, --一级标签
tag2=nil, --二级标签
tag1Node = nil,
tag2Node = nil,
curSubIdx = nil
})
local tags = {
hot={tag1="shop",var=6}, give={tag1="shop",var=4}, intensify={tag1="shop",var=2},
friend={tag1="shop",var=3}, limit={tag1="shop",var=4},spicel={tag1="shop",var=5},
}
function shop:ctor(name)
self._supportMove = true
g_data.shop:setEvtListener(self)
params = params or {}
if type(params.tag2) ~= "string" or tags[params.tag2] then
params.tag2 = "hot"
end
params.tag1 = tags[params.tag2].tag1
--背景
local bg = res.get2("pic/common/black_2.png"):addTo(self):anchor(0,0)
self:size(bg:getContentSize()):anchor(.5,.5):center()
res.get2("pic/panels/shop/title.png"):addTo(bg):pos(bg:getw()/2, bg:geth()-14):anchor(.5,1)
--关闭
an.newBtn(res.gettex2("pic/common/close10.png"),function()
sound.playSound("103")
self:hidePanel()
end,{
pressImage=res.gettex2("pic/common/close11.png"),
size = cc.size(64,64)
}):addTo(bg):pos(bg:getw()-9, bg:geth()-8):anchor(1,1)
--一级标签
-- "pic/panels/shop/cz.png"
common.tabs(bg, { sprs={"pic/panels/shop/shangc.png"},ox = 3, oy=12}, function(idx, btn)
if 1 == idx then
self.tag1 = "shop"
self:load("hot")
elseif 2 == idx then
self.tag1 = "charge"
self:load2()
--main_scene.ui:tip("本次测试有丰厚奖励，暂不开放充值。")
end
end, {
tabTp=1,
pos={x=0, y=bg:geth()-38, offset=70, anchor=cc.p(1,1)},
})
end
function shop:onCleanup()
g_data.shop:setEvtListener(nil)
end
function shop:load()
if self.tag1Node then
self.tag1Node:removeSelf()
end
self.tag1Node = display.newNode():addTo(self)
display.newScale9Sprite(res.getframe2("pic/common/black_5.png"), 0, 0, cc.size(127,390)):addTo(self.tag1Node):pos(12,15):anchor(0,0)
display.newScale9Sprite(res.getframe2("pic/common/black_5.png"), 0, 0, cc.size(480,390)):addTo(self.tag1Node):pos(146,15):anchor(0,0)
local sprs = {
"pic/panels/shop/rx.png",
"pic/panels/shop/zs.png",
"pic/panels/shop/bg.png",
"pic/panels/shop/qh.png",
"pic/panels/shop/hy.png",
"pic/panels/shop/xl.png",
}
--local strs = ({shop={"热销", "补给", "强化","好友", "限量","奇珍"},charge={}})[self.tag1]
local initTag = {5,0,1,2,3,4}
common.tabs(self.tag1Node, {sprs=sprs}, function(idx, btn)
local tmpType = (initTag[idx] or 0)
self.tag2 = ({shop={"hot", "give", "intensify","friend","limit","spicel"}, charge={}})[self.tag1][tmpType]
-- 需要获取数据
local items = g_data.shop:getCurTypePageGoods(tmpType,0)
self.curSubIdx = tmpType
if #items == 0 then
self:query(0, tmpType)
self:processUpt(-1)
if self.tag2Node then
self.tag2Node:removeSelf()
self.tag2Node = nil
end
else
self:processUpt(tmpType,items)
end
end, {
tabTp=2,
pos={x=21, y=self:geth()-84, offset=50, anchor=cc.p(0,.5)}
})
self:processUpt(-1) --默认ui背景,避免通讯造成界面过渡生硬
end
function shop:showLock()
if tolua.isnull(self.infoView) then return end
local covert = display.newNode()
local layer = cc.LayerColor:create(cc.c4b(0,0,0,128))
covert:addChild(layer)
covert:setTouchEnabled(true)
covert:setTouchSwallowEnabled(true)
local loading = res.get2("pic/common/loading.png"):add2(layer)
loading:runForever(cca.rotateBy(1, 360))
covert.setContentSize = function(_, ...)
layer:setContentSize(...)
local sz = layer:getContentSize()
loading:pos(sz.width/2,sz.height/2)
end
covert.getContentSize = function()
return layer:getContentSize()
end
covert:add2(self.tag2Node):pos(self.infoView:getPosition()):size(self.infoView:getContentSize())
self.covert = covert
end
function shop:releaseLock()
if not tolua.isnull(self.covert) then
self.covert:removeSelf()
end
end
function shop:load2(tag2)
if self.tag1Node then
self.tag1Node:removeSelf()
end
self.tag1Node = display.newNode():addTo(self)
if self.tag2Node then
self.tag2Node:removeSelf()
end
self.tag2Node = display.newNode():addTo(self)
self.curSubIdx = nil
display.newScale9Sprite(res.getframe2("pic/scale/scale14.png")):addto(self.tag2Node):anchor(0, 0):pos(14,14):size(self:getw()-28,self:geth()-60)--:debug()
an.newBtn(res.gettex2("pic/common/btn10.png"), function()
local btns = {"确定"}
local helperText = "支付结果可能存在延迟,请耐心等待.\n支付过程中请勿关闭游戏，否则您成功购买\n的商品可能会延期半小时以上才能发放。"
-- if g_data.shop:hasTimeoutOrder() then
-- helperText = helperText.."\n 似乎存在超时订单,您可以尝试\"刷新订单\""
-- end
local ops = {}
local box = an.newMsgbox("", function(idx)
if ops[idx] then
ops[idx]()
end
end, {hasCancel = false, disableScroll=true})
an.newLabel(helperText, 20, 1):addTo(box):pos(box:centerPos()):anchor(.5,.5)
end, {
pressImage=res.gettex2("pic/common/btn11.png"),
label = {"充值帮助", 18, 1,{color=def.colors.btn20}}}
):add2(self.tag2Node):anchor(0,0.5):pos(20,self:geth()-72)
an.newBtn(res.gettex2("pic/common/btn10.png"), function()
g_data.shop:checkPaidOrder()
end, {
pressImage=res.gettex2("pic/common/btn11.png"),
label = {"刷新订单", 18, 1,{color=def.colors.btn20}}}
):add2(self.tag2Node):anchor(0,0.5):pos(120,self:geth()-72)
an.newLabel("若充值有问题，请点击充值帮助!", 20, 0):anchor(0.5,0.5):add2(self.tag2Node):pos(self:getw()*0.5+50,self:geth()-72)
local lists = g_data.shop:getProducts()
local infoView = an.newScroll(12,18, self:getw()-28,self:geth()-114):add2(self.tag2Node)--:debug()
self.infoView = infoView
local h = 160
infoView:setScrollSize(self:getw()-28, math.max(self:geth()-110, math.modf((#lists-1)/4) * h))
if #lists <= 0 then
local sz = infoView:getScrollSize()
local txt = "正在从苹果服务端请求商品列表"
if device.platform ~= "ios" then
txt = "当前仅支持通过iOS客户端进行充值"
end
an.newLabel(txt, 20, 0):anchor(0.5, 1):add2(infoView):pos(sz.width/2, sz.height*0.618)
end
for i,v in ipairs(lists) do
local node = res.get2("pic/panels/shop/bg2.png"):anchor(0,1):pos(((i-1)%4)*152+4,infoView:getScrollSize().height-math.modf((i-1)/4)*h):add2(infoView)
an.newLabel(v.name, 20, 0):anchor(0.5,0.5):add2(node):pos(node:getw()*0.5, node:geth()-24)
res.get2("pic/panels/shop/line02.png"):pos(node:getw()*0.5, node:geth()-40):add2(node):scaleX(0.6)
res.get2("pic/console/infobar/yb.png"):pos(node:getw()*0.5-8, node:geth()*0.5+8):add2(node)
res.get2("pic/console/infobar/yb.png"):pos(node:getw()*0.5+8, node:geth()*0.5-8):add2(node)
an.newBtn(res.gettex2("pic/common/btn20.png"), function()
if g_data.shop:hasPayingOrder() then
if main_scene and main_scene.ui then
main_scene.ui:tip("当前正在处理其他订单,请稍后...")
end
return
end
local function buy()
self:showLock()
g_data.shop:addPayOrder(v.identifier)
end
local tip = "是否确认购买 " ..v.name .." ?"
local msgbox = an.newMsgbox("", function(isOk)
if 1 == isOk then
buy()
end
end, {hasCancel = true})
an.newLabel(v.name,22,1):add2(msgbox.bg):pos(280,190):anchor(.5,0)
an.newLabel("充值金额",22,1,{color=def.colors.cellTitle}):add2(msgbox.bg):pos(50,190)
res.get2("pic/panels/setting/line.png"):pos(msgbox.bg:getw()*0.5, 180-5):add2(msgbox.bg):scaleX(0.6)
an.newLabel(g_data.login:getSelectGroup():get("groupName"),22,1):add2(msgbox.bg):pos(280,135):anchor(.5,0)
an.newLabel("充值服务器",22,1,{color=def.colors.cellTitle}):add2(msgbox.bg):pos(50,135)
res.get2("pic/panels/setting/line.png"):pos(msgbox.bg:getw()*0.5, 125-5):add2(msgbox.bg):scaleX(0.6)
an.newLabel("当前角色",22,1):add2(msgbox.bg):pos(280,80):anchor(.5,0)
-- local numInput = an.newInput(200, 80, 120, 30, 22,{
-- label = {"", 16*scale},
-- return_call = function() pwInput:startInput() end
-- }):addTo(self)
an.newLabel("充值对象",22,1,{color=def.colors.cellTitle}):add2(msgbox.bg):pos(50,80)
--res.get2("pic/panels/setting/line.png"):pos(msgbox.bg:getw()*0.5, 70):add2(msgbox.bg):scaleX(0.6)
end, {pressImage=res.gettex2("pic/common/btn21.png"),label = {"￥ "..v.price, 22, 1,{color=def.colors.btn20}}})
:add2(node):anchor(0.5,0.5):pos(node:getw()*0.5,30)
end
if g_data.shop:hasPayingOrder() then
self:showLock()
end
end
function shop:onPaymentEvent(step,code,msg)
if not main_scene or not main_scene.ui or tolua.isnull(self) then
return
end
if not tolua.isnull(main_scene.ui.panels.shop) and not g_data.shop:hasPayingOrder() then
print("releaseLock")
main_scene.ui.panels.shop:releaseLock()
end
code = tonumber(code)
if step == "onUpdatedProducts"then
if not self.curSubIdx then
self:load2()
end
elseif step == "onPayReady" then
if code == -1 then
main_scene.ui:tip("存在未完成订单,请稍后重试.")
else
main_scene.ui:tip("未知错误")
end
elseif step == "onPayEnd" then
if code == 1002 then
main_scene.ui:tip("订单取消")
elseif code == 1011 then
main_scene.ui:tip("查询订单超时,如果您已经成功支付,我们将在稍后同步支付结果")
elseif code ~= 0 and msg then
main_scene.ui:tip(msg)
--main_scene.ui:tip(string.format("如果您已经成功支付,我们将在稍后同步支付结果",code))
end
elseif step == "onPayResult" then
if code == -1 then--不可能
main_scene.ui:tip("订单查询异常,如果您已经成功支付,我们将在稍后同步支付结果")
elseif code == -2 then
main_scene.ui:tip("订单查询超时,如果您已经成功支付,我们将在稍后同步支付结果")
elseif code < 0 then
main_scene.ui:tip("服务异常,如果您已经成功支付,请联系客服解决此问题")
end
print("onPayResult",code);
elseif code ~= 0 then
main_scene.ui:tip("购买异常,异常ID:"..code)
end
end
function shop:processUpt(tag2Var,items)
-- 非选择页
if self.curSubIdx ~= tag2Var or not items then
return
end
if self.tag2Node then
self.tag2Node:removeSelf()
end
self.tag2Node = display.newNode():addTo(self)
local infoView = an.newScroll(150, 19, 478, 384):add2(self.tag2Node)--:debug()
local h = 126
infoView:setScrollSize(478, math.max(384, math.modf((#items-1)/2) * h))
for i,v in ipairs(items) do
local node = res.get2("pic/panels/shop/bg1.png"):anchor(0,1):pos((i%2)== 0 and 240 or 0,infoView:getScrollSize().height-math.modf((i-1)/2)*h):add2(infoView)
res.get2("pic/panels/shop/frame.png"):pos(50,50):add2(node):enableClick(function(x,y)
print(x,y)
self:show(v,cc.p(x,y))
end)
res.get("items", v:get("looks")):addto(node):pos(50,50)
an.newLabel(v:get("name"), 20, 1):anchor(0.5,0.5):add2(node):pos(node:getw()*0.5, node:geth()-24)
res.get2("pic/panels/shop/line02.png"):pos(node:getw()*0.5, node:geth()-40):add2(node)
an.newBtn(res.gettex2("pic/common/btn20.png"), function()
local function buy()
net.send({CM_DOSHOP,recog = 1}, {v:get("name")})
end
-- 免确认购买
--[[
if g_data.setting.other.buyNotTip then
buy()
return
end
]]
local box = an.newMsgbox("", function(isOk)
if 1 == isOk then
buy()
end
end, {hasCancel = true, disableScroll = true})
an.newLabel("是否确认购买 " ..v:get("name") .." ?", 20, 1):addTo(box):pos(box:centerPos()):anchor(.5,.5)
end, {pressImage=res.gettex2("pic/common/btn21.png"),label = {math.modf(v:get("price")) .."", 18, 1,{color=def.colors.btn20}},
labelOffset=cc.p(-20,0),sprite=res.gettex2("pic/console/infobar/yb.png"),spriteOffset=cc.p(20,0)})
:add2(node):anchor(0.5,0.5):pos(160,50)
end
end
function shop:show(data, scenePos, params)
params = params or {}
local layer = display.newNode():size(display.width, display.height):addto(params.parent or main_scene.ui, params.z or main_scene.ui.z.textInfo)
layer:setTouchEnabled(true)
layer:setTouchSwallowEnabled(false)
layer:addNodeEventListener(cc.NODE_TOUCH_CAPTURE_EVENT, function(event)
if event.name == "ended" then
layer:runs({
cc.DelayTime:create(0.01),
cc.RemoveSelf:create(true)
})
end
return true
end)
local bg = display.newScale9Sprite(res.getframe2("pic/scale/scale24.png")):addto(layer):anchor(0, 1)
local w, h, space = 0, 7, -2
-- 信息,按钮
h = h + 160
local infos = {}
local introduces = string.split(data:get("descStr"), '|')
for i,v in ipairs(introduces) do
infos[#infos+1] = an.newLabel(introduces, 20, 1)
h = h+22
end
res.get2("pic/panels/shop/frame.png"):pos(50,h-50):add2(bg)
res.get("items", data:get("looks")):addto(bg):pos(50,h-50)
local itemName = an.newLabel(data:get("name"), 20, 1):anchor(0,0.5):add2(bg):pos(90, h-50)
w = math.max(w, itemName:getw()+20+90)
local posh = h-120
for i,v in ipairs(infos) do
v:addto(bg, 99):anchor(0, 0):pos(10, posh - (i-1)*22)
w = math.max(w, v:getw()+20)
end
an.newBtn(res.gettex2("pic/common/btn20.png"), function()
local function buy()
net.send({CM_DOSHOP,recog = 1}, {data:get("name")})
end
-- 免确认购买
--[[
if g_data.setting.other.buyNotTip then
buy()
return
end]]
local msgbox = an.newMsgbox("", function(isOk)
if 1 == isOk then
buy()
end
end, {hasCancel = true, disableScroll = true})
an.newLabel("是否确认购买 " ..data:get("name") .." ?", 20, 1):addTo(msgbox):pos(msgbox:centerPos()):anchor(.5,.5)
end, {pressImage=res.gettex2("pic/common/btn21.png"),label = {math.modf(data:get("price")) .."", 18, 1,{color=def.colors.btn20}},
labelOffset=cc.p(-20,0),sprite=res.gettex2("pic/console/infobar/yb.png"),spriteOffset=cc.p(20,0)})
:add2(bg):anchor(0.5,0.5):pos(w*0.5,30)
local rect = cc.rect(params.minx or 0, params.miny or 0, params.maxx or display.width, params.maxy or display.height)
local p = scenePos
if p.x < rect.x then p.x = rect.x end
if p.x+w > rect.width then p.x = rect.width-w end
if p.y > rect.height then p.y = rect.height end
if p.y-h < rect.y then p.y = h+rect.y end
bg:size(w, h):pos(p.x, p.y)
end
function shop.onDoShopFail(ident,recog,param)
local str = nil
if 0 == recog then str = '非法物品名'
elseif -1 == recog then str = '不存在你想购买的物品'
elseif -2 == recog then str = '请先进行元宝充值'
elseif -3 == recog then str = '你帐号中的元宝数不够'
elseif -4 == recog then str = '你无法携带更多的物品'
elseif -5 == recog then str = '购买物品不在商城中'
elseif -6 == recog then str = '您的购买速度过快'
elseif - 8 == recog then str = '您的专属元宝不足'
elseif - 8 == recog then str = '您的荣耀点不足'
elseif -9 == recog then str = '您不是主宰者不能购买'
else
str = '你无法购买 err:' .. recog
end
main_scene.ui:tip("购买失败:"..str)
end
function shop:query(page, type)
net.send({CM_REQSEESHOP,recog = type})
end
return shop
|
|
发表于 2023-8-11 01:22:54
