(index ("fetch-quotes" 0) ("fetch-quotes" 958))
(def (sig (procedure "(fetch-quotes symbol-or-symbols field-or-fields)" (id fetch-quotes))) (p (tt "fetch-quotes") " takes one or more stock symbols and one or more field name symbols and returns a table of the requested information:") (pre "   > (use yahoo-finance)\n   \n   > (fetch-quotes 'aapl 'eps)\n   ((stock (eps 42.548)))\n   \n   > (fetch-quotes 'aapl '(name p/e p/s p/b))\n   ((stock (name \"Apple Inc.\")\n           (p/e 15.86)\n           (p/s 4.25)\n           (p/b 5.66)))\n   \n   > (fetch-quotes '(aapl goog msft) '(name high low change)))\n   ((stock (name \"Apple Inc.\")\n           (high 677.67)\n           (low 672.6)\n           (change -1.334))\n    (stock (name \"Google Inc.\")\n           (high 688.99)\n           (low 676.15)\n           (change 10.76))\n    (stock (name \"Microsoft Corpora\")\n           (high 30.75)\n           (low 30.44)\n           (change 0.02)))") (p "Read the code for a list of available fields."))
(def (sig (procedure "(fetch-quotes symbol [interval [start-date [end-date]]])" (id fetch-quotes))) (p (tt "fetch-history") " takes a single stock symbol and, as optional arguments, an interval symbol (one of " (tt "daily") ", " (tt "weekly") ", " (tt "monthly") ", or " (tt "dividends") "), a start date as a list of numbers of the form " (tt "(y m d)") ", and an end date of the same form. It returns a table in one of two forms:") (pre "   > (fetch-history 'aapl 'monthly)\n   ((row (date \"2012-08-01\")\n         (open 615.91)\n         (high 680.87)\n         (low 600.25)\n         (close 673.47)\n         (volume 13327800)\n         (adjusted-close 673.47))\n    (row (date \"2012-07-02\")\n         (open 584.73)\n         (high 619.87)\n         (low 570.0)\n         (close 610.76)\n         (volume 15938700)\n         (adjusted-close 608.15))\n     ...)\n   \n   > (fetch-history 'aapl 'dividends '(1987 1 1) '(1989 1 1))\n   ((row (date \"1988-11-21\") (dividend 0.025))\n    (row (date \"1988-08-15\") (dividend 0.02))\n    (row (date \"1988-05-16\") (dividend 0.02))\n    (row (date \"1988-02-12\") (dividend 0.02))\n    (row (date \"1987-11-17\") (dividend 0.02))\n    (row (date \"1987-08-10\") (dividend 0.015))\n    (row (date \"1987-05-11\") (dividend 0.015)))"))
