menu query,nicklist {
  Cookie
  .Give Cookies:{
    var %cookies $iif($readini(cookies.ini,cookies,$1),$v1,0),%g.cookies $$?="Number of cookies to give?"
      %cookies = $calc(%cookies + %g.cookies)
      writeini cookies.ini cookies $1 %cookies
      DESCRIBE # has given %g.cookies cookies to $1 $+ , $1 now has %cookies cookies!
  }
  .Take Cookies:{
    var %cookies $iif($readini(cookies.ini,cookies,$1),$v1,0),%t.cookies $$?="Number of cookies to take?"
      %cookies = $calc(%cookies - %t.cookies)
      writeini cookies.ini cookies $1 %cookies
      DESCRIBE # has taken %t.cookies cookies away from $1 $+ , $1 now has %cookies cookies!
  }
}

______________________________________________________________________________________________________________

This should be functional equivalent to the original menu although you may wish do do something about taking cookies away from someone who has none thus avoiding negative cookies.