Gossip add gold

function On_Gossip(pUnit, Event, player)
    pUnit:GossipCreateMenu(3000, player, 0)
    pUnit:GossipMenuAddItem(0, "Level 80 und Zum Playertreff", 1, 0)
    pUnit:GossipMenuAddItem(0, "Ich brauche Gold", 2, 0)
    pUnit:GossipSendMenu(player)
end

function Gossip_Submenus(pUnit, Event, player, id, intid, code)
    if(intid == 999) then
        On_Gossip(pUnit, Event, player) -- This shows the menu in On_Gossip()
    elseif(intid == 1) then
        player:GossipComplete()
        player:SetLevel(80)
        player:Teleport(571, 3581.429199, 209.008408, -120.071693, 0.206670)
    elseif(intid == 2) then
        player:GossipComplete()
        player:DealGoldMerit(copper) -- Set copper amount here
        pUnit:SendChatMessage(12, 0, "Du bekommst von mir Gold")
    end
end

RegisterUnitGossipEvent(50, 1, "On_Gossip")
RegisterUnitGossipEvent(50, 2, "Gossip_Submenus")