What's new

[8.31][Skrypt] Prosze mi pom?c przerobi?!

Status
Not open for further replies.

Marszal

Senior User
Joined
May 29, 2008
Messages
606
Reaction score
18
Age
29
M?g? by mi kto? przerobi? ten skrypt pod protok?? 8.31. Bo jak si? powie hi to b??dy w silniku wyskakuj? a tego nie lubie xD
Code:
local focus = 0
local talk_start = 0
local target = 0
local following = false
local 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('Witaj ' .. getCreatureName(cid) .. '! Widzia?e? t? dzure nieopodal? Moge ci sprzeda? klucz do drzwi znajduj?cych w dziurze![klucz]')
  		focus = cid
  		talk_start = os.clock()

  	elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
  		selfSay('Ej, ' .. getCreatureName(cid) .. '! Rozmawiam z tob? ju? od minuty.')

	elseif focus == cid then
		talk_start = os.clock()

		if msgcontains(msg, 'klucz') then
		   if doPlayerRemoveMoney(cid,1000) == TRUE then
                   doSetItemActionId(doPlayerAddItem(cid,2087,1),8888)
                   selfSay('Oto klucz!')
                   else
                   selfSay('Nie masz wystarczaj?co kasy!')  
                   end

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


function onCreatureChangeOutfit(creature)

end


function onThink()
	if focus > 0 then 
		x, y, z = creatureGetPosition(focus)
		myx, myy, myz = selfGetPosition()
		
		if ((myy-y==0) and (myx-x<=0 and myx-x>=-4)) then
			selfTurn(1)
		end 
		if ((myy-y==0) and (myx-x>=0 and myx-x<=4)) then
			selfTurn(3)
		end
		if ((myx-x==0) and (myy-y<=0 and myy-y>=-4)) then
			selfTurn(2)
		end
		if ((myx-x==0) and (myy-y>=0 and myy-y<=4)) then
			selfTurn(0)
		end
		if ((myy-y==-2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(2)
		end
		if ((myy-y==2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(0)
		end
		if ((myx-x==2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(3)
		end
		if ((myx-x==-2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(1)
		end
		if ((myy-y==-3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(2)
		end
		if ((myy-y==3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(0)
		end
		if ((myx-x==3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(3)
		end
		if ((myx-x==-3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(1)
		end
		if ((myy-y==-4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(2)
		end
		if ((myy-y==4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(0)
		end
		if ((myx-x==4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(3)
		end
		if ((myx-x==-4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(1)
		end
	end

	if (os.clock() - talk_start) > 30 then
  		if focus > 0 then
  			selfSay('Nastepny...')
  		end
  			focus = 0
  	end
 	if focus ~= 0 then
 		if getDistanceToCreature(focus) > 5 then
 			selfSay('Zegnaj.')
 			focus = 0
 		end
 	end
end
Z g?ry thx
 

Metem

Active User
Joined
Jun 6, 2008
Messages
74
Reaction score
6
Odp: [8.31][Skrypt] Prosze mi pom?c przerobi?!

Marszal
Ekspert

przecie? jestes expertem :)

Podaj blad jaki ci wyskakuje....
 
Status
Not open for further replies.
Top