<particle>
   <layer count="2" />
   <emitter name="fire1">
      <position x="0" y="0" random="2" /> <!-- Die relative Position, mit einer zufallsveraenderung von .4 -->
      <startscale x="2" y="2" /> <!-- Start skalierung -->
      <scaling x="-0.02" y="-0.02" random="0" /> <!-- Die Skalierung welche hinzugefuegt wird -->
      <moving x="0" y="-4" random=".8" /> <!-- Bewegung in die einzelnen x/y achsen -->
      <startrotation value="0" random="360" /> <!-- Die start rotation -->
      <rotating value="2" random=".5" /> <!-- drehung, ohne zufall -->
      <startalpha value="1" random="0.2" />
      <fade value="-0.025" />
      <lifetime value="1000" /> <!-- wieviele ms gewartet werden, bis neue partikel erzuegt werden -->
      <count value="3" /> <!-- wieviele partikel erzeugt werden -->
      <image name="par_fire1" />
   </emitter>
   <emitter name="fire2">
      <position x="0" y="0" random="2" /> <!-- Die relative Position, mit einer zufallsveraenderung von .4 -->
      <startscale x="2" y="2" /> <!-- Start skalierung -->
      <scaling x="-0.02" y="-0.02" random="0" /> <!-- Die Skalierung welche hinzugefuegt wird -->
      <moving x="0" y="-4" random=".8" /> <!-- Bewegung in die einzelnen x/y achsen -->
      <startrotation value="0" random="360" /> <!-- Die start rotation -->
      <rotating value="2" random=".5" /> <!-- drehung, ohne zufall -->
      <startalpha value="1" random="0.2" />
      <fade value="-0.035" />
      <lifetime value="1000" /> <!-- wieviele ms gewartet werden, bis neue partikel erzuegt werden -->
      <count value="4" /> <!-- wieviele partikel erzeugt werden -->
      <image name="par_fire2" />
   </emitter>
   <emitter name="fire3">
      <position x="0" y="-50" random="2" /> <!-- Die relative Position, mit einer zufallsveraenderung von .4 -->
      <startscale x="2" y="2" /> <!-- Start skalierung -->
      <scaling x="-0.005" y="-0.005" random="0" /> <!-- Die Skalierung welche hinzugefuegt wird -->
      <moving x="0" y="-4" random=".4" /> <!-- Bewegung in die einzelnen x/y achsen -->
      <startrotation value="0" random="360" /> <!-- Die start rotation -->
      <rotating value="2" random=".5" /> <!-- drehung, ohne zufall -->
      <startalpha value=".5" random="0.2" />
      <fade value="-0.01" />
      <lifetime value="1000" /> <!-- wieviele ms gewartet werden, bis neue partikel erzuegt werden -->
      <count value="1" /> <!-- wieviele partikel erzeugt werden -->
      <image name="par_fire3" />
   </emitter>
   <system name="fire">
      <event duration="-1"> <!-- Ein Event, welches als erstes ausgefuehrt wird, die dauer betraegt -1 => unendlich -->
         <emitter name="fire3" />
         <emitter name="fire2" /> <!-- Startet den emitter "fire2" -->
         <emitter name="fire1" /> <!-- Startet den emitter "fire1" -->
         
      </event>
   </system>
   
   <emitter name="snow">
      <position x="0" y="-100" random="50" /> <!-- Die relative Position, mit einer zufallsveraenderung von .4 -->
      <startscale x="2" y="2" /> <!-- Start skalierung -->
      <moving x="0" y="2" random="0" /> <!-- Bewegung in die einzelnen x/y achsen -->
      <startalpha value="0.5" random="0.2" />
      <wait value="1" /> <!-- wieviele ms gewartet werden, bis neue partikel erzuegt werden -->
      <count value="1" /> <!-- wieviele partikel erzeugt werden -->
      <image name="par_snow" />
      <lifetime value="2000" />
      <script onupdate="0" oncreate="0" ondelete="0">
         game.particle.snow = {}
         function game.particle.snow.onupdate()
            ParticleSetPosition(ParticleGetPositionX()+math.random(8)-4,ParticleGetPositionY())
            if PointCollisionGameMap(game.map.id,ParticleGetPositionX(),ParticleGetPositionY()==1 then
               ParticleSetMove(0,0)
            end
         end
         function game.particle.snow.oncreate()
            ParticleSetPosition(math.random(WidthGameMap(game.map.id)),0)
         end
      </script>
   </emitter>
   <system name="snow">
      <event duration="-1">
         <emitter name="snow" />
         <wait value="5" />
      </event>
   </system>
</particle>

game.palm={}
palmImage1=TImage.create()
palmImage1:loadFromIni("palm1")
palmImage1:handle(32,92)

palmImage2=TImage.create()
palmImage2:loadFromIni("palm2")
palmImage2:handle(32,116)



function game.palm.update(id)
   local move=false
   while checkMapCollision(getX(id),getY(id))==0 do
      setY(id,getY(id)+1)
      move=true
   end
   if move then
      game.palm[id].rotation=getMapAngle(getX(id),getY(id))
   end

   --im Wind wiegen
   if game.palm[id].winddir==0 then
      game.palm[id].wind=game.palm[id].wind+.1
   elseif game.palm[id].winddir==1 then
      game.palm[id].wind=game.palm[id].wind-.1
   end
   if game.palm[id].wind>10 then
      game.palm[id].winddir=1
   elseif game.palm[id].wind<-10 then
      game.palm[id].winddir=0
   end
end

function game.palm.render(id)
   local selectImage=palmImage1
   local x=getObjectRelativeX(id)
   local y=getObjectRelativeY(id)
   info=game.palm[id].palm
   
   if info==1 then
      selectImage=palmImage1
   elseif info==2 then
      selectImage=palmImage2
   end
   selectImage:position(x,y)
   selectImage:setRotation(game.palm[id].rotation+game.palm[id].wind)
   selectImage:draw()
end

function game.palm.create(id)
   local palmtyp
   if getName(id)=="palm1" then
      palmtyp=1
   elseif getName(id)=="palm2" then
      palmtyp=2
   end
   game.palm[id]={}
   game.palm[id]={wind=0, winddir=0,rotation=0,palm=palmtyp}
end

function game.palm.load(id) --Wird beim laden aufgerufen
   game.palm[id]={}
   game.palm[id]={wind=0, winddir=0,rotation=0,palm=palmtyp}
   game.palm[id].wind=loadNumber()
   game.palm[id].winddir=loadNumber()
   game.palm[id].rotation=loadNumber()
   game.palm[id].palm=loadNumber()
end
function game.palm.save(id)
   saveNumber(game.palm[id].wind)
   saveNumber(game.palm[id].winddir)
   saveNumber(game.palm[id].rotation)
   saveNumber(game.palm[id].palm)
end

function game.palm.remove(id)
end


function game.palm.editorRender(id)
   local selectimage
   if getEditorSelect()=="palm1" then
      selectImage=palmImage1
   elseif getEditorSelect()=="palm2" then
      selectImage=palmImage2
   end
   local x=mouseX()
   local y=mouseY()
   while checkMapCollision(x+getScrollX(),y+getScrollY())==0 do
      y=y+1
   end
   rot=getMapAngle(x+getScrollX(),y+getScrollY())
   selectImage:setRotation(rot)
   selectImage:setAlpha(.7)
   selectImage:position(x,y)
   selectImage:draw()
   setX(id, x+getScrollX())
   if mouseHit(1)==1 then
      setX(id,getScrollX()+mouseX())
      setY(id,getScrollY()+mouseY())
      return 1
   end
   return 0
end

game.player={}
hunger=100.0
thirst=100.0
energy=100.0
comfort=100.0
life=100.0

needWindow=guiCreateWindow()
guiSetGadget(needWindow,0,0,155,86)
hungerGadget=guiCreateRow(needWindow,getLanguage("hunger"))
guiSetRowColor(hungerGadget,255,0,0)

thirstGadget=guiCreateRow(needWindow,getLanguage("thirst"))
guiSetRowColor(thirstGadget,0,0,255)

energyGadget=guiCreateRow(needWindow,getLanguage("energy"))
guiSetRowColor(energyGadget,0,255,0)


comfortGadget=guiCreateRow(needWindow,getLanguage("comfort"))
guiSetRowColor(comfortGadget,255,0,255)


lifeGadget=guiCreateRow(needWindow,getLanguage("life"))
guiSetRowColor(lifeGadget,0,255,255)


function game.player.update(id)
   scrollToPosition(getX(id)-getScreenWidth()/2,getY(id)-getScreenHeight()/2)
   if keyDown(KEY_LEFT)==1 then
      controllerGoLeft(id)
   elseif keyDown(KEY_RIGHT)==1 then
      controllerGoRight(id)
   end
   if keyHit(KEY_SPACE)==1 then
      controllerGoJump(id)
   end
   if currentGameState()==2 then
      game.player.updateInEditor()
   else
      game.player.updateInGame()
   end
   x=getX(id)
   calculateMovement(id)
end

function game.player.render(id)
   local x=getObjectRelativeX(id)
   local y=getObjectRelativeY(id)
   setColor(255,0,0)
   drawOval(x+1,y+1,8,32)
   setColor(255,255,255)
   if currentGameState()==2 then
      game.player.renderInEditor()
   else
      game.player.renderInGame()
   end
   if mouseDown(1)==1 then
      game.player[id].toX=tonumber((mouseX()+getScrollX())/2)*2
      game.player[id].toY=tonumber((mouseY()+getScrollY())/2)*2
   end
end

function game.player.create(id)
   createController(id)
   controllerSetSpeed(id, 2)
   controllerSetMaxJump(id, 18)
   game.player[id]={toX=0,toY=0,dir=0,jump=0}
end


function game.player.load(id)
   game.player.create(id)
end
function game.player.save(id)
end
function game.player.remove(id)
end

function game.player.updateInEditor(id)

end
function game.player.renderInEditor(id)
   guiHideGadget(needWindow)
end

function game.player.updateInGame(id)
   --Bedürfnisse umrechnen
   relHunger=hunger/100.0*150.0
   guiSetGadget(hungerGadget,2,2,relHunger,14)
   
   relThirst=thirst/100.0*150.0
   guiSetGadget(thirstGadget,2,18,relThirst,14)
   
   relEnergy=energy/100.0*150.0
   guiSetGadget(energyGadget,2,18+14+2,relEnergy,14)
   
   relComfort=comfort/100.0*150.0
   guiSetGadget(comfortGadget,2,18+14*2+4,relComfort,14)
   
   relLife=life/100.0*150.0
   guiSetGadget(lifeGadget,2,18+14*3+6,relLife,14)
   
   --Bedürfnisse sinken lassen
   hunger=hunger-.02
   thirst=thirst-.03
   energy=energy-.01
   comfort=comfort-.015
   
   if hunger>100 then hunger=100 end
   if thirst>100 then thirst=100 end
   if energy>100 then energy=100 end
   if life>100 then life=100 end

   --Life ändern
   if hunger<0 then
      hunger=0
      life=life-.05
   end
   if thirst<0 then
      thirst=0
      life=life-.05
   end
   if energy<0 then
      energy=0
      life=life-.05
   end
   if comfort<0 then
      comfort=0
      life=life-.05
   end
end
function game.player.renderInGame(id)

end
function game.player.changeNeed(id, val)
   if id==0 then
      hunger=hunger+val
   elseif id==1 then
      thirst=thirst+val
   elseif id==2 then
      energy=energy+val
   elseif id==3 then
      comfort=comfort+val
   elseif id==4 then
      life=life+val
   end
end
function game.player.goToPosition(x,y)
   game.player[id].toX=x
   game.player[id].toY=y
end