Биржевой Стакан на языке QLUA

Страницы: 1
RSS
Биржевой Стакан на языке QLUA, Когда писал код наткнулся на одну проблему, весь код написан правильно,но почему-то программа выдает не полностью все таблицы
 
local stopped = false
function OnStop()
stopped = true
return 2000
end

--Создание Таблицы
function main()
local Table = AllocTable()
AddColumn(Table,1,"Offer Vol",true, QTable_INT_TYPE, 15)
AddColumn(Table,2,"Offer Price",true, QTable_INT_TYPE, 15)
AddColumn(Table,3,"Bid Vol", true, QTable_INT_TYPE, 15)
CreateWindow(Table)
SetWindowCaption(Table,"Стакан котировок")
SetWindowPos(Table,0,10,300,100)
local RowN=2
for i=1,RowN,1 do
InsertRow (Table,-1)
end
local Offer_Vol
local Offer_Price
local Offer_Count
local Bid_Vol
local Bid_Price
local Bid_Count
local Quotes = {}
local SecCode ="SPBFUT"
while stopped == false do
Quotes = getQuoteLevel2("SRU9",SecCode)
Offer_Count = tonumber (Quotes.offer_count)
Bid_Count = tonumber (Quotes.bid_count)
if Offer_Count > 0 then
Offer_Vol = tonumber (Quotes.offer[1].quantity)
Offer_Price = tonumber (Quotes.offer [1].price)
SetCell (Table,1,1, SecCode)
SetCell (Table,1,2,tostring(Offer_Price))
end
if Bid_Count > 0 then
Bid_Vol = tonumber (Quotes.bid[Bid_Count].quantity)
Bid_Price = tonumber (Quotes.bid[Bid_Count].price)
SetCell(Table,2,2,tostring(Bid_Price))
SetCell(Table,2,3, tostring (Bid_Vol))
end
sleep(100)
end
end
 
Добрый день.
Просьба пояснить, какие именно таблицы, опишите проблему подробнее.
 
При запуске программы не показывает значения, которые написанные в коде:
AddColumn(Table,1,"Offer Vol",true, QTable_INT_TYPE, 15)
AddColumn(Table,2,"Offer Price",true, QTable_INT_TYPE, 15)
AddColumn(Table,3,"Bid Vol", true, QTable_INT_TYPE, 15)

Программа запускается так:
[img]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAASsAAABlCAYAAAAVgcUcAAAUmElEQVR4Ae2dC5QU1ZnHv37BDPIWFBweouAqyuICrjCyKysiJ5F1dYUVmWQVluMeJHs8Pk5cE1FMZD14otFDiCTHKJJEV5G4bDBElIhnVRQRB0VdXg4TmAHCQ0aEGWamZ/b7bvWtqu6u2zWT7a5qZv53TndX3cf3ffdXXf++93Z1TWTlypWthAQCIAACRU4gnhnf4sWLM7OwDwIgAAKBEjhw4AA1NzfTkiVLbL+2WIlI9ezZkxYtWkQjR46kQYMG2ZWwAQIgAAJBEkgmk1R15BhNmvXPdOqTzfTU0qWkxEqEqqKigmbMmEFrKg9T1dYjRPJAAgEQAIEQCaxdtYo+rz1I8yb9tSVWMqISoXq18ghF+A8JBEAABIqBwMa3d9CF5cOp5G+nUGTcuHGtMvXb0zygGGJDDCAAAiCQRaD/uPOtkZWsUVV/8mVWBWSAAAiAQDEQaOYZn1qz6tevH0Uix4ohJsQAAiAAAlkEmltaLbEqKSmhaARrVVmEkAECIFAUBJr4alD70gVoVVEcEwQBAiDgQSBDrKIeVZAFAiAAAuETaGpNrVlJKJgGhn9AEEE4BI59eYR2fvYp1X0Z3JdMvfr0oREjL6befc5UnS6GGFoP1dD6p56k2s8/DexAnHPRxTR53h0U6V+W02eTXrPKWStVuOf91W2pllWnT9mF1LNsBC/gY+SWBQcZRUFg2+bNNP3vJ9EFI84LLJ4dO7+gl3+7gSZOmap8FkMMryy8j+bfcxuVT3gwMA7vbvyIlrLff1y6wtena80q9wL7NVMm5zQmI7NINEKtvBDWyk/ykLTu9fVU2n8odS0pzdkehSAQFoHGxlNKqPYdPhFYCCKMjY2v8Ye4dd4VQwxfHz1CEy4fTSc+qwyMg/hbzH41B5PjtDWrKAtNrjT60ktzFRvLRKxYwsjPvtEACkCgwATkRJHPVp5pBJbEn/jV50UxxCCdb022UAv/Li+loZzhIJFNyU+NQ6zfuqT2s9VDzvpWyw6vN1GEW2tbUjm1Lf4kaQ5qx+Opkeu3eWTVJRahDW99Sj97awdF4y0UTbAAdUlSjB+Lb7ya+vbtk+Zi8l0v0vrHb1J5ciDk4Z2q6fffmUK/1NPki79Pj//kFjrbuzJyQSDvBJx3pj6b8u7C06D41edFW2N4Z/3r9OG773jac2eOLb+Crpg8xZ3lue2OQSq0JJuple92kEZCB8eZkr/6f/fTG7v+ZNu7evhZ9A8XDjTm2xUzNsSW+JOkOagdj6dm1jRbrKI+a0o63oFnl1JMhCqR5EcLbyc9TKdnyXqVp/2a5fRgxcM0ePEueuHyVBvOW7spSt/Q++mmsAcC+SfAH6TqxAnwd7HiT4Yd9nnRxhhEqF58/qe+DG6adTtNmHxNznpZMXDtVh5VtTQ3OSMfPvFlUOROIlQvv/gzO2v6Tf+q2q2vOpKVP+38fqqe1o+0HbYr/iTZHNRe9lO7RlYnGhqVhT69E1S594/UFK1Xo6p4F1HGK1SZ6hOPEUUl+486ZHuU/WzlrKa1jzxMQx7dTXPdwjRoNn0Td6ex2WGj8AT0ezPjnCyoYz5L1DmhfevXfMbQFlviV/uWDrfwqKqlsYlk5qaSnsLJjhjk/KuG9iERqJdeeEpVkdd/unme2m9psaZ1si/1Wln4Us3Uq2ogfec9yRd/ktwxqIyMp2aubH9FJwOrnI9U4/erd1Jz4iQlSpspUdJEcX5IUvD5VTsdMHSvypcnT7v736SN226myyZ4lbOQzT+fZl7pftxPWznGrY+58h7bkLK9gZ6+cgat3S+2ZJvrpMr86+s2ur07HrPdyP7l9IArvqc3STtT3G47RAdXzeC+aX+psk2OvQdWVTvMPP3omF0s5i+ng/oY5mzj9utw8jxG2l4Hf7XeqHJ2BvlIeU2xlT3rpJYT2fxntbKeZfSU+XCXm61YJXLOStLHXrdN8tSspYkfMh1MNlkCpratvGuH9qa/G9JLCZTcd0oeL/zqJ+pVtkWopPyb5/a22qZsKSEUMWQBS4o9ztdJx2B6beRBUJungaxCyq6IVIxHUzL9i3dp4lfLoazP64U3qfjEVc4dR2WIlz3M4waXjKBzpExHbL8Oo2nLqmgabaCfT1xCZf+5iq7Vo63vVtHK70pFq2ztrKu4LJp6m+2ltfP+hSI/4jrjLWNjctaXuKSebq/3rbZOfqZd9j3zhzSU/SwSP/uepe/PZBHgOL3j3kCbuRoP+tnfBlrzB6IL7H3xvYWee24aLXm7igYoW/fQ2nLps9mP1ecxdKtiIyzW0UFmeY5wMcSWi5PucWd8lQ/YQ0fraMcXB3J2f2fl+7Tn060560jhuRePphGXuqcL2U26RQeoD3Z9XkgMh49+Rdt9YhBLR44495qbUnGbbfz1X/88rWz7F/vsMq+N0owYpM7hz7ZS1W9+7VU9LW847x3tNpRu/tZ36KdLfmiX3f5vC2h0fQ0N/+hd2v6RnW3cGNalqyrTHEwV074N1CMiU2WdLyOpOAuUCFY8LtupkZUM/1KCpuvqV7GdZZ9FIrJtFx3gsoG6ouHVap8qfO97NP3u51M7Y2i2sm3tbnx4EtHkt2jRBKVAVqax/hZaPnMYLbdq8XO6LTubN7Ls7quiP9Isms5+lKfBc2jGdT+gTTW8P9hpmRY3Z8t+5aOziWY/S0PvXqL2OYsT+14whwbKtttWxM+P04cpj+2hMdK+DbFl9UdC6ORJjoPfhdEiVO61GhMymSL9xV+lPi0Nlazjbr0ndBUVg8+38lL31KlTugmJQLmTu8zvGzZ5P0rSr9pOjAVEzf44Q0/hrDKurzJa6b2uZbQ1MYB+/KP70+KR/TvveZgi8RiNb6hVFqSJJNuPe1RjFTllqf3MlzSx8uuYbpwoabTESgkVi1bcGll9vE1/nUc06pJL6BRfu9Kamr+K7Sz7QybTFaN+QB+8/wiN5amgd7KGq9LJqAy/9j5D991NdP/Gaj6999Ca2+4SAsq2jE4oMpa2V1fx/rmWuZz1x9Kcl35D05S4vEnLJljiofzYwYh/D7v6IEu/UnXV8FXHya3UX+Z+zbP0cnQ5PVJOtExq2LHrbTG2h/ZXcVcmse2cfsSD7oOwuJF+N5j749vGoz92fzvnhiBTxyKmj6aZw+7du82FrpKojy3xJ371eaFjiKW/AV0Wnc3GRmv9ePF/qCmGU8Bbukwy/WxlxiBtIrEYxbudIZseyZKud6P9qTJyJol/7e/e7z2q9qWR5Mt+NJ6g8hZn7drDoPIn+ZqDVx3Ja+KxkH105MTwe9TW7qbbhkyjOQOvp1v6z6CK3jfTzO7fzrJvzWP5eo3UhSvyYZFtexhdN6eC1t01lJa95/LNJ/Srrn0xLhebqvY1u2j7qAuoTGKteZPe+cQpIz5xJz74Cj0QuZXue6m6DfWdtmI7zY+LhafdIefRUHqeNuk4OeaV/1VB48udfmTaI/qQnrlrDU381lUqNne5lL2zUccs/UrZ8vHjthFhG/t4ZBf1bePBydXf7OPk9KmjlslJG08kqKS0NOdDeDc1Nfk+pJ6fLfGnBDLFXsfQlWPI9WhPDLnsSFk8EU+LQWzLqCpxRneKn9FDPRLdu6t9yUtwnrxuYaF6+KE7bQ4iTOPix5VAaT5SLvVUG21DXtW2ZUdsiT9Jfu8tESt7zcrv5zCNvBz/7VnXilVK8rcFMR7m8bUL7Caprsvo06e3WrNq5sW5Jn7E+JPFFgEednjaL19Mq1eNoHtvHELXq5D5adRCWva0tYbEDnj0wKKi2vNG+Tya+8xEmjd+IderoKmjdJlTb+y/v021cyfS9W+IHf/6/F7h5LS39iVPkpOfbncuzV+10BX3WJq7ajWNtTQvrZ3b/oV3PknXDZbPB8eu6hsL7bl77qTrx38oTmnqE/tStibn8CM2PqRfTB9Cv5BGN/ySVpeLbb82FrPM/vhNxcVFR00yRo3H41TS1TpxTP28aNx4uv/BH5uK7Xyp52dL/IlffV4UQwzSgRjfLirRvQdv2W9m3rYncmr78sipNA6Xl56iK89opdiJ7HwRJMuWtpEylzrRxJ8kzUHteDzJ/E3d1viDDz6g326W+aU5bVm7Qo1wTDUSSqVj1CTTP1el7v2G0OCRl/EnTTdXLjYdAn+gpZc9QYNf+W+6Tn+J4BRiKwACr65aSXfMn027DnwdgDfLxfAB3enJpc/StTfOUBnFEMOT3/gbem75YvrTW68VmIMIoaUSZ105lW659V66Y+3/5PT5q1Ie6ekaMgzNlUZPmcXDPmdhL1ddd5koZteuJaycue2723SubfX5mvqU7Vw9L5bequkYzwTkAzeoJGta4lefF8UQg/Q9zoMKtWbFWqJOWX51Dz6sK0RT57K6plLKHfFRlT0ayrtc23HVVv7Er+Yg215JrrOyj46fliS6JEgeSAUiwEfQ7xgUyHOnN1vKJ2jtvho6b3BwQ9uavftI/OpjXgwx9Oh/Fm3bXUuXTr0hsPdE5badJH41B5NjESt7Gvi7j3JfY2IygnwQON0JHD18mLa8t5EaGhoC64rcSnzM+AnUl///gaRiiKF26xZa88hCkrsvBJW69z2Tpt23kM4ZPSany6Wx7o5Y/b7yYM7KKAQBEACBsAg8EeHpqXbuN2fU9fAKAiAAAkETSKavWaUWzYKOAv5AAARAwIeAXLIZ38y3dM2VrvnL/rmKC1Z2/Phx6tFDrvdAAgEQ6CwE1n3sfcW7jKzsK9g7Cwz0EwRA4PQkULRipe/hfnpiRdQgAAL5JgCxyjdR2AMBECgIAYhVQbDCKAiAQL4J2JcumAw3NyepOfUfKEx18p2f4B9JN5xqpDB857svsAcCIJAfAr5ixYvwfDcFeQ42yb2cw/IdbE/hDQRAoC0EinIaKL8TCkMg2wIMdUAABMIh4DuykptUBS0c1oiKgYTgO5zDAK8gAAJ+BHzFKpSpGDvFNNDv0KEcBDoXAX+xCml0I6M5/ehchwS9BQEQ8CLgK1ayyh30NJA9Wj5D8e2FCXkgAAJhE/AVK/m/qUGLlZ56huE77AMC/yAAAt4EivLbQO9QkQsCINCZCfiOrOJ8r+h4ae7/+pF3gLxeNahsoLovc+C+894ZGAQBEGg7gZPGqr5iVV9fH8qtWurq6qhXr17GwFEAAiDQuQjYYuV16z1ZO0ICARAAgSAJeGmR+LfFKu1/GurIWK3keickEAABEAiMgEGtfBfYC/VNIO75HtihhyMQ6BAEfMVKepnM410XRKQgVB3ivYNOgECgBOxpoPzH1Mwk1zmdrG/gBfaeVN/QmFn8Z+2frLf+q3M3/oYxXzb/rEDQCARAoCgJWEqUrUdtGlkVZY8QFAiAQAclkC1U0lFnZJVRrr4J5CdZs/L7184dlBi6BQIgEAIBk97YYpUZk9Yu1ir5eWBBfnJTqMX7zL5gHwRA4PQnYBQr3TV16UJqhKXz8vUKscoXSdgBgY5PwBYr09BLC4p+zSeSQtjMZ3ywBQIgEDwBkxbZYmUKyRKUwtx5AWJloo58EACBTAK2WHlduqDvK1WINau6r74uyDpYZgexDwIgcHoR8NYij28DRZiQQAAEQCAsAjINFB3SX/LpOFwjKysrs4LcqoWHQCQXcQaZTpxoDtIdfIEACBQJAdGgTB2S0Gyx8izlCo9vraOKS/pJ3UBTD/b20EMPBeoTzkAABMIlMOGG272VisOyxcpLycINm2jBggVhhwD/IAACARJ4Y9sR07jJJVam7wsDDDTTVTKZzMzCPgiAQAcnYLrRQSgjq8Glzjhub715SR/30urg70p0DwQ8CDjqkF5oi5Vx7JVe//+9J0LlFqjMfbcDjKzcNLANAp2EgEGtbLGKGirkG49bqPxsY2TlRwjlINDxCJi0yBYr0xJ89bEG2mH+hxN5IeVlf2xMbvqHNau8AIYREDitCHiPnGyxMqmZ9LFQP4u5ul+U3jjcYrQPsTqt3mEIFgTyQsCkRbZY5cVLO4xoocrVBNPAXHRQBgKdi4AtVqavCwWH3NMqn2lK/yi9fkhGVLmtYmSVmw9KQaDjEYga/0eDLVamoZfAaI35qEo7iF3TN0brjib5tz/+NjGyagdYVAWBDkEgSiYtssUq5zWhDfmlIILlTutqPRbSu2GB3c0I2yDQOQjEjbdRd4mV9wq8AMrnAvtrNdk/UDbZxzSwc7w90UsQcBMwLUk5YuWunbHdEvWfsmU0ycsupoF5wQgjIHBaETANm2yxiuacB4bT1xUrVoTjGF5BAARCISB3XTBpkYgYz8JaaWv1V1nBHaw7RROGlfA/OZUbtgSb6urqqFevXsE6hTcQAIFQCaz7+BCd3Sv73nl3HI2477oQaoxwDgIgAAKKgGmSZ08DTfNE0+I3uIIACIBAIQiYtMgWK9M8EWJViMMBmyAAAiYCJi2yxcp0ixiIlQkp8kEABApCwDC0ssXKpGYSTDLZQrFYtCBxwSgIgAAIuAl4a1Gra4Fd11bfD+odopP1DfxtYE+qb2h0MrEFAiAAAgUiYBhYucTKXcO1LdNA0+p8gWKFWRAAgU5MwKQ39jRQVwjnWvVOfGTQdRAAgTQCbi1yjZuckZW+U6i7UCzIbVxEwLDQnsYTOyAAAgUjYKlQuha516zSSwoWBgyDAAiAQC4CemSVWceZBmaWpPbVj4lldOV3pzxDe2SDAAiAQHsImMZNjlgZamiR0q/tcYq6IAACINBeAr4jK5NBS6T4vp4YWZkQIR8EQCAAAvbISi+wW8vpzjBLRAoL7AEcCbgAARBIEXD0x43EFqv0kZPIk5XqT35NO7Zv17uBvZaVlQXmC45AAASKh0C6Fjlx2WJ16Hj6Fepa20aMGGH8bxOOmfxvnThxIv9GYREEQKDoCXhrUdy5zup4ffa90aVXb35+LMTOHQrRN1yDAAiEQcBLiw5GThJ+nRzG0YBPEACBdhOAWLUbGRqAAAiEQQBiFQZ1+AQBEGg3AYhVu5GhAQiAQBgEIFZhUIdPEACBdhNQly5cVFnT7oZoAAIgAAJBEpDLqZwrQIP0DF8gAAIg0A4C/wdCZbBLn0py4AAAAABJRU5ErkJggg==[/img]

Сверху должна была появится строка с Offer_Vol Offer_Price Bid_Vol. которая выводила бы значения по инструменту.
 
http://prntscr.com/ovy4hm Изображение  
 
Добрый день.
Язык Lua регистр зависимый, из-за этого интерпретатор не может найти константу QTable_INT_TYPE, нужно использовать QTABLE_INT_TYPE.


   c1 = AddColumn(Table,1,"Offer Vol",true, QTABLE_INT_TYPE, 15)

 c2 = AddColumn(Table,2,"Offer Price",true, QTABLE_INT_TYPE, 15)

c3 = AddColumn(Table,3,"Bid Vol", true, QTABLE_INT_TYPE, 15)
  message(string.format("%s %s %s", c1, c2, c3))
Страницы: 1
Читают тему
Наверх