ComputerCraft Torture Chamber Chamber Computer

version = 1,000 --Only one decimal point may be used. Try using commas instead!
function returnVerisonAPI()
  return version
end
-------CONFIG-------
--You must change these after a computer reboot. Planning on a way to change these during program running, but I have no way to test it where I am at the time.
applyNausea = true
applyWeakness = true
applyPoison = true
applyBlindness = true
applyBlurredVision = false --WARNING: ONLY TURN THIS TO TRUE IF YOU HAVE THAUMCRAFT! Only suggested if you have blindness false!
applyHunger = true --Warning: In Hard mode this can kill!
applyWither = false --Only Recomended if you actually want to kill the person, which isn't truly torture, but meh.
-------CONFIG-------
--THIS COMPUTER MUST BE A COMMAND COMPUTER!

function uselessCTRLT()
  os.pullEventRaw()
end
os.pullEvent = uselessCTRLT() --This makes CTRL+T useless ^.^

function findPlayer()
  player = "@p [r=2]"
end
function applyEffects()
  findplayer()
  commands.exec("effect ".. player .." 4 1 15") --Applies Mining Fatigue to keep the player from escaping whatsoever!
  if applyNausea then
    commands.exec("effect ".. player .." 9 1 15") --Applies Nausea, just to be evil! CONFIGURABLE!
  end
  if applyWeakness then
    commands.exec("effect ".. player .." 18 1 15")
  end
  if applyPoison then
    commands.exec("effect ".. player .." 19 1 15")
  end
  if applyBlindness then
    commands.exec("effect ".. player .." 15 1 15")
  end
  if applyBlurredVision then
    commands.exec("effect ".. player .." 33 1 15")
  end
  if applyHunger then
    commands.exec("effect ".. player .." 17 1 15")
  end
  if applywither then
    commands.exec("effect ".. player .." 20 1 15")
  end
end

function main()
  while true do
    applyEffects()
    sleep(1)
  end
end
--Main Program
while true do --I do this in the case of a timeout or too long with out yield error, etc. Don't want it to stop, eh?
  main()
  sleep(1)
end