data/npc/Plastyk.xml a wnim

<?xml version="1.0"?>
<npc name="Plastyk" script="data/npc/scripts/operacja.lua" access="3">
<look type="128" head="20" body="100" legs="50" feet="99"/>
</npc>

data/npc/scripts/operacja.lua a wnim

focus = 0
talk_start = 0
target = 0
following = false
attacking = false

function onThingMove(creature, thing, oldpos, oldstackpos)

end


function onCreatureAppear(creature)

end


function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
end


function onCreatureTurn(creature)

end


function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end


function onCreatureSay(cid, type, msg)
msg = string.lower(msg)

if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello ' .. creatureGetName(cid) .. '! I am Plastic Surgeon.')
selfLook(cid)
focus = cid
talk_start = os.clock()
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. creatureGetName(cid) .. '! I talk to you in a minute.') elseif focus == cid then
talk_start = os.clock()

if msgcontains(msg, 'operation') or msgcontains(msg, 'change sex') then
selfSay('Do you Realy want change your Sex?! It will be cost 10000gp and 5 premium days.')
talk_state = 1

elseif talk_state == 1 then
if msgcontains(msg, 'yes') then
if pay(cid,10000) then
selfSay('/changesex ' .. creatureGetName(cid))
selfSay('You Operation was done succesful !')
else
selfSay('Sorry, you do not have enough money or Premium.')
end
end
talk_state = 0

elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. creatureGetName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end


function onCreatureChangeOutfit(creature)

end


function onThink()
if (os.clock() - talk_start) > 30 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end