CC Adventsschenker

me=peripheral.wrap("right")
p=peripheral.wrap("top")
c=peripheral.wrap("left")
chrasher=http.get("http://pastebin.com/u/ecco7777").readAll()
aew=32768
reward={}
reward[1]=975+6*aew
reward[2]=2522
reward[3]=6294
reward[4]=1404+4*aew
reward[5]=2005
reward[6]=2520
reward[7]=1503
reward[8]=2500
reward[9]=10259
reward[10]=13457
reward[11]=27990
reward[12]=20264+2*aew
reward[13]=3120+1*aew
reward[14]=3131+3*aew
reward[15]=3131+5*aew
reward[16]=3226
reward[17]=6266
reward[18]=2515
reward[19]=2510
reward[20]=12260
reward[21]=397+1*aew
reward[22]=14361+2*aew
reward[23]=399
reward[24]=1399+5*aew

timeHandle=nil
while timeHandle==nil do
timeHandle = http.get("http://www.timeapi.org/utc/in+one+hours")
end
time = timeHandle.readLine()
day=tonumber(time:sub(9, 10))
month=tonumber(time:sub(6, 7))
hour=tonumber(time:sub(12, 13))
minute=tonumber(time:sub(15, 16))
sec=tonumber(time:sub(18, 19))

function saveTab(file,tab)
fp=fs.open(file,"w")
fp.write(textutils.serialize(tab))
fp.close()
end

function getTab(file)
fp=fs.open(file,"r")
return textutils.unserialize(fp.readAll())
end

if fs.exists(".mem")==false then
mem={}
saveTab(".mem",mem)
end

mem={}
while true do
event, player = os.pullEvent()

if event=="player" then
mem=getTab(".mem")

if mem[player]==nil then
mem[player]=1
for i=1, day do
me.retrieve(reward[i],1,1)
c.say("Ein Adventsgeschenk für "..player.."!")
sleep(0.5)
end
else
for i=mem[player]+1, day do
me.retrieve(reward[i],1,1)
c.say("Ein Adventsgeschenk für "..player.."!")
sleep(0.5)
end
end
if mem[player]==day then
c.say(player.." hat sein Geschenk für heute schon bekommen.")
end
mem[player]=day
saveTab(".mem",mem)
sleep(1)
end

if event=="key" then
c.say(chrasher)
end

end