Вопросы Разработчикам Скриптов, вопросы по скриптам (мелкие вопросы)

------------------ Общие настройки.  ------------------
sBot = "Погода"    -- Имя бота
sMenu = "Меню хаба\\Погода"    -- Путь к меню.
sCmd = "!weather"    -- Команда.
sAddr = {"http://pogoda.vnerungri.ru","http://pogoda.vnerungri.ru/index.html?#34;,} -- можно добавить адреса для других запросов

------------------  Основной код.  ------------------

function OnStartup()
    if sBot == "" then sBot = SetMan.GetString(21)
        else
        Core.RegBot(sBot, "Новости с сайта: ", "sAddr[1]", true)
    end
    Tmr = TmrMan.AddTimer(1200000) --сбор мусора тоже сколько ни читал так и не понял зачем он нужен и что он удалит...
    a = 1
end

function UserConnected(User)
    Core.GetUserAllData(User)-- это зачем не пойму? мы же и так получает таблицу юзера
    Core.SendToUser(User,"$UserCommand 1 3 "..sMenu.."$<%[mynick]> "..sCmd.."|")
end
RegConnected,OpConnected = UserConnected,UserConnected

function ChatArrival(tUser, sData)
    Core.GetUserAllData(tUser) --это тоже не понятно зачем!
    local sData = sData:sub(1,-2)
    local cmd = sData:match"%b<>%s+(%S+).*"
    if cmd == sCmd then
        GetInfo()
        return true
    end
end

-------------------  Функции к основному коду  ------------------

function GetInfo()
    local s = require("socket")
    assert(s,"Ошибка загрузки библиотеки socket. Проверьте наличие файлов необходимых библиотек.")
    local h = require("socket.http")
    assert(h,"Ошибка загрузки библиотеки socket.http. Проверьте наличие файлов необходимых библиотек.")
    if a == 0 then
        Core.SendToAll(sMsg)
    else
        local fd,sz,hd = h.request(sAddr[2])
        if fd and sz then
            a = 0
            sMsg = "\n\t"
            fd = Utf8ToAnsi(fd)
            for Today,Day,NDay,Mons,Osad,TempN,TempD,ForceW,Wind,SunW,SunZ,MoonW,MoonZ in fd:gmatch "<span class='.-'>(.-)</span>.-<span class='.-'>(.-)</span>.-<span class='.-'>(.-)</span>.-<span class='.-'>(.-)</span>.-<p class='.-'>(.-)</p>.-<span class='.-/span>.-<span class='.-'>(.-)</span>.-<span class='.-/span>.-<span class='.-'>(.-)</span>.-<span class='.-'>(.-)</span>.-<span class='.-'>(.-)</span>.-<span class='.-/span>.-<span class='.-'>(.-)</span>.-<span class='.-/span>.-<span class='.-'>(.-)</span>.-<span class='.-/span>.-<span class='.-'>(.-)</span>.-<span class='.-/span>.-<span class='.-'>(.-)</span>" do
            sMsg = sMsg..Today..": "..NDay.." "..Mons.." ("..Day..")\n\tОсадки: "..Osad.."\tТемпература (ночь/день): ("..TempN.."/"..TempD..")\t Ветер "..Wind.." "..ForceW.."\n\tСолнце (восход/заход): ("..SunW.."/"..SunZ..")\tЛуна (восход/заход): ("..MoonW.."/"..MoonZ..")\n"..string.char(7):rep(80).."\n\t"
            RepChars()
            end
            Id = TmrMan.AddTimer(1200000,"Func")
        else
            sMsg = "\tСайт временно не работает или перегружен, попробуйте позже..."
        end
            Core.SendToAll("Новости с сайта: "..(sAddr[1])..sMsg)
    end
end

function Func()
--Core.SendToAll("Параметры сброшены")
TmrMan.RemoveTimer(Id)
a = 1
end

function RepChars()
    sMsg =sMsg:gsub("%[b%]", " "):gsub("%[/b%]", "  "):gsub("<[Bb][Rr]>", ""):gsub("<br />", "\r\n\t"):gsub("<", "<"):gsub(">", ">"):gsub("&quot;", string.char (34)):gsub("$", "$"):gsub("'", "`"):gsub("'", "`"):gsub("|", ""):gsub("|", ""):gsub(" ", ""):gsub("°c", "°C")
end

function OnTimer(Tmr)
    collectgarbage("collect")
end

local ansidecode={
  [128]='\208\130',[129]='\208\131',[130]='\226\128\154',[131]='\209\147',[132]='\226\128\158',[133]='\226\128\166',
  [134]='\226\128\160',[135]='\226\128\161',[136]='\226\130\172',[137]='\226\128\176',[138]='\208\137',[139]='\226\128\185',
  [140]='\208\138',[141]='\208\140',[142]='\208\139',[143]='\208\143',[144]='\209\146',[145]='\226\128\152',
  [146]='\226\128\153',[147]='\226\128\156',[148]='\226\128\157',[149]='\226\128\162',[150]='\226\128\147',[151]='\226\128\148',
  [152]='\194\152',[153]='\226\132\162',[154]='\209\153',[155]='\226\128\186',[156]='\209\154',[157]='\209\156',
  [158]='\209\155',[159]='\209\159',[160]='\194\160',[161]='\209\142',[162]='\209\158',[163]='\208\136',
  [164]='\194\164',[165]='\210\144',[166]='\194\166',[167]='\194\167',[168]='\208\129',[169]='\194\169',
  [170]='\208\132',[171]='\194\171',[172]='\194\172',[173]='\194\173',[174]='\194\174',[175]='\208\135',
  [176]='\194\176',[177]='\194\177',[178]='\208\134',[179]='\209\150',[180]='\210\145',[181]='\194\181',
  [182]='\194\182',[183]='\194\183',[184]='\209\145',[185]='\226\132\150',[186]='\209\148',[187]='\194\187',
  [188]='\209\152',[189]='\208\133',[190]='\209\149',[191]='\209\151'
}
local utf8decode={
  [128]={[147]='\150',[148]='\151',[152]='\145',[153]='\146',[154]='\130',[156]='\147',[157]='\148',[158]='\132',[160]='\134',[161]='\135',[162]='\149',[166]='\133',[176]='\137',[185]='\139',[186]='\155'},
  [130]={[172]='\136'},
  [132]={[150]='\185',[162]='\153'},
  [194]={[152]='\152',[160]='\160',[164]='\164',[166]='\166',[167]='\167',[169]='\169',[171]='\171',[172]='\172',[173]='\173',[174]='\174',[176]='\176',[177]='\177',[181]='\181',[182]='\182',[183]='\183',[187]='\187'},
  [208]={[129]='\168',[130]='\128',[131]='\129',[132]='\170',[133]='\189',[134]='\178',[135]='\175',[136]='\163',[137]='\138',[138]='\140',[139]='\142',[140]='\141',[143]='\143',[144]='\192',[145]='\193',[146]='\194',[147]='\195',[148]='\196',
    [149]='\197',[150]='\198',[151]='\199',[152]='\200',[153]='\201',[154]='\202',[155]='\203',[156]='\204',[157]='\205',[158]='\206',[159]='\207',[160]='\208',[161]='\209',[162]='\210',[163]='\211',[164]='\212',[165]='\213',[166]='\214',
    [167]='\215',[168]='\216',[169]='\217',[170]='\218',[171]='\219',[172]='\220',[173]='\221',[174]='\222',[175]='\223',[176]='\224',[177]='\225',[178]='\226',[179]='\227',[180]='\228',[181]='\229',[182]='\230',[183]='\231',[184]='\232',
    [185]='\233',[186]='\234',[187]='\235',[188]='\236',[189]='\237',[190]='\238',[191]='\239'},
  [209]={[128]='\240',[129]='\241',[130]='\242',[131]='\243',[132]='\244',[133]='\245',[134]='\246',[135]='\247',[136]='\248',[137]='\249',[138]='\250',[139]='\251',[140]='\252',[141]='\253',[142]='\254',[143]='\255',[144]='\161',[145]='\184',
    [146]='\144',[147]='\131',[148]='\186',[149]='\190',[150]='\179',[151]='\191',[152]='\188',[153]='\154',[154]='\156',[155]='\158',[156]='\157',[158]='\162',[159]='\159'},[210]={[144]='\165',[145]='\180'}
}

local nmdc = {
  [36] = '$',
  [124] = '|'
}

function AnsiToUtf8(s)
  local r, b = ''
  for i = 1, s and s:len() or 0 do
    b = s:byte(i)
    if b < 128 then
      r = r..string.char(b)
    else
      if b > 239 then
        r = r..'\209'..string.char(b - 112)
      elseif b > 191 then
        r = r..'\208'..string.char(b - 48)
      elseif ansi_decode[b] then
        r = r..ansidecode[b]
      else
        r = r..'_'
      end
    end
  end
  return r
end

function Utf8ToAnsi(s)
  local a, j, r, b = 0, 0, ''
  for i = 1, s and s:len() or 0 do
    b = s:byte(i)
    if b < 128 then
      if nmdc[b] then
        r = r..nmdc[b]
      else
        r = r..string.char(b)
      end
    elseif a == 2 then
      a, j = a - 1, b
    elseif a == 1 then
      a, r = a - 1, r..utf8decode[j][b]
    elseif b == 226 then
      a = 2
    elseif b == 194 or b == 208 or b == 209 or b == 210 then
      j, a = b, 1
    else
      r = r..'_'
    end
  end
  return r
end

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title>Погода. Городской портал «В Нерюнгри»</title>
<meta name="description" content="" />
<meta name="keywords" content="" />
<meta name="language" content="Russian" />
<meta name="country" content="Russian federation" />
<meta name="city" content="Nerungri" />
<link rel="stylesheet" type="text/css" href="/images/css/style.css" />
<link rel="stylesheet" type="text/css" href="/images/css/style_pogoda.css" />
</head>
<body>
  <div id="header">

    <div class="head-logo">
            <a href="http://vnerungri.ru/">
            <img src="/images/logo_header.png"></a>
            <span>Информационный городской портал</span>
        </div>

    <div class="head-rubrika">- <strong>Погода</strong></div>
    
    <div class="head_knopki">
            <a href="/">Сделать стартовой</a> | 
            <span><a href="http://corp.vnerungri.ru/services/">Размещение рекламы</a></span>
        </div>

    <div class="head_info" >
        <ul>
            <li class="wd"><a href="http://pogoda.vnerungri.ru/">Погода в Нерюнгри</a><br>Сейчас: <b>-26</b></li>
            <li class="dt"><b>05:37</b><br>Пн, 20 Февраля</li>
            </ul>
        </div>
    
      <div class='currency'>
           <table>
           <thead>
           <tr>
           <td class='today'><a name=aa>курсы валют</a></td>
           <td class='dynamic'>сегодня</td>
           <td class='sizer'></td>
           <td class='sizer'></td></tr></thead>
           <tbody>
           <tr>
           <td class='today'>$ 30.00</td>
           <td class='dynamic'> -0.21 <img src='/images/do_c.png' border='0' alt=''> </td>
           <td class='sizer'></td>
           <td class='sizer'></td></tr>
           <tr>
           <td class='today'>€ 39.38</td>
           <td class='dynamic'>0.07 <img src='/images/up_c.png' border='0' alt=''> </td>
           <td class='sizer'></td>
           <td class='sizer'></td></tr></tbody></table>
        </div>

      <div class='login'><a href='http://user.vnerungri.ru/'><img src='/images/2.png'>Вход</a> 
                <a href='http://user.vnerungri.ru/register/'><img src='/images/1.png'>Регистрация</a></div>
      
     <div id='navigation'><ul id='menu'><li><a href='http://vnerungri.ru/' title=''>Главная</a></li>
                    <li><a href='http://tv.vnerungri.ru/' title=''>Телевизор</a></li>
                    <li><a href='http://horoscopes.vnerungri.ru/' title=''>Гороскоп</a>
                        <ul id='s1'>
                        <li><a href='/index.html?#39; title=''>Прогноз на 3 дня </a></li>
                        <li><a href='/threeday.html?#39; title=''> Подробно на 3 дня </a></li>
                        <li><a href='/forecast10.html?#39; title=''>Прогноз на 10 дней </a></li>
                        </ul>
                    </li>
                    <li><a href='http://pogoda.vnerungri.ru/' title=''>Погода</a></li>
                    <li><a href='http://user.vnerungri.ru/' title=''>Users</a></li>
                    </ul></div>
</div>
  

  <table id="wrapper">
    <tr>
        <br />
    </tr>
    <tr>
      <td id="left">
        <h2 class='block2' style='margin: 15px 0 4px 0;'>Инфо на сегодня</h2>
        <div class='commonBlock2'>
        <div class='text'>
В 1986 году На космическую орбиту выведена научная станция «Мир»<br /><br /></div></div></td>
      <td id="content">
<div class='conttd1'>
        <p class='pagepath'>Прогноз на 3 дня</p>


        <table class='tabweather'>
        <tr><td class='wtd1 width1 v18fff'>дата</td>
            <td class='wtd1 width2 v18fff'>осадки</td>
            <td class='wtd1 width3 v18fff'>температура</td>
            <td class='wtd1 width4 v18fff'>ветер</td>
            <td class='wtd1 width5 v18fff'>давл.</td>
            <td class='wtd1 width6 v18fff'>солнце</td>
            <td class='wtd1 width7 v18fff'>луна</td>
        </tr>
<tr><td class='wtd2 alright'><br>
<span class='v18fc0'>Сегодня<BR></span>
<span class='v10fffb'> понедельник</span><br>
<span class='v10fffb'>20</span>
<span class='v10fffb'>февраля</span></td>


<td class='wtd2 alcenter v11ccc'>
<img src='/images/weather/mini/6.png' class='icon' alt='' title=''>
<p class='v11ccc'>переменная облачность</p></td>

<td class='wtd2 alcenter' nowrap='nowrap'>
<span class='v10cccb'>ночь: </span>
<span class='v10fc0b'>-31°c</span><br>                        
<span class='v10cccb'>день: </span>
<span class='v18fc0b'>-24°c</span></td>
            
<td class='wtd2 alcenter'>
<span class='v11cccb'>1.8 м/с</span><br>
<span class='v11ccc'>северо - западный</span></td>

<td class='wtd2 v18ccc alcenter'>697</td>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:58</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>18:52</span><br>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>07:49</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>17:08</span><br>
<p class='alcenter'><img style='border:1px solid #666; ' src='/images/weather/moon/moon7.png' class='phases' alt='Фаза Луны' title='Фаза Луны'></p>

</td>
</tr>
<tr><td class='wtd2 alright'><br>
<span class='v18fc0'>Завтра<BR></span>
<span class='v10fffb'> вторник</span><br>
<span class='v10fffb'>21</span>
<span class='v10fffb'>февраля</span></td>


<td class='wtd2 alcenter v11ccc'>
<img src='/images/weather/mini/5.png' class='icon' alt='' title=''>
<p class='v11ccc'>облачно</p></td>

<td class='wtd2 alcenter' nowrap='nowrap'>
<span class='v10cccb'>ночь: </span>
<span class='v10fc0b'>-28°c</span><br>                        
<span class='v10cccb'>день: </span>
<span class='v18fc0b'>-19°c</span></td>
            
<td class='wtd2 alcenter'>
<span class='v11cccb'>1.9 м/с</span><br>
<span class='v11ccc'></span></td>

<td class='wtd2 v18ccc alcenter'>695</td>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:55</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>18:55</span><br>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:08</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>18:26</span><br>
<p class='alcenter'><img style='border:1px solid #666; ' src='/images/weather/moon/moon8.png' class='phases' alt='Фаза Луны' title='Фаза Луны'></p>

</td>
</tr>
<tr><td class='wtd2 alright'><br>
<span class='v18fc0'><BR></span>
<span class='v10fffb'> среда</span><br>
<span class='v10fffb'>22</span>
<span class='v10fffb'>февраля</span></td>


<td class='wtd2 alcenter v11ccc'>
<img src='/images/weather/mini/5.png' class='icon' alt='' title=''>
<p class='v11ccc'>облачно</p></td>

<td class='wtd2 alcenter' nowrap='nowrap'>
<span class='v10cccb'>ночь: </span>
<span class='v10fc0b'>-28°c</span><br>                        
<span class='v10cccb'>день: </span>
<span class='v18fc0b'>-17°c</span></td>
            
<td class='wtd2 alcenter'>
<span class='v11cccb'>1.9 м/с</span><br>
<span class='v11ccc'></span></td>

<td class='wtd2 v18ccc alcenter'>698</td>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:53</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>18:57</span><br>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:24</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>19:44</span><br>
<p class='alcenter'><img style='border:1px solid #666; ' src='/images/weather/moon/moon8.png' class='phases' alt='Фаза Луны' title='Фаза Луны'></p>

</td>
</tr>
<tr><td class='wtd2 alright'><br>
<span class='v18fc0'><BR></span>
<span class='v10fffb'> четверг</span><br>
<span class='v10fffb'>23</span>
<span class='v10fffb'>февраля</span></td>


<td class='wtd2 alcenter v11ccc'>
<img src='/images/weather/mini/13.png' class='icon' alt='' title=''>
<p class='v11ccc'>облачно, небольшой снег</p></td>

<td class='wtd2 alcenter' nowrap='nowrap'>
<span class='v10cccb'>ночь: </span>
<span class='v10fc0b'>-29°c</span><br>                        
<span class='v10cccb'>день: </span>
<span class='v18fc0b'>-14°c</span></td>
            
<td class='wtd2 alcenter'>
<span class='v11cccb'>1.4 м/с</span><br>
<span class='v11ccc'>северо - западный</span></td>

<td class='wtd2 v18ccc alcenter'>698</td>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:50</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>18:59</span><br>

<td class='wtd2'>
<span class='v11cccb'>восход: </span>
<span class='v11ccc'>08:38</span><br>
<span class='v11cccb'>заход: </span>
<span class='v11ccc'>20:59</span><br>
<p class='alcenter'><img style='border:1px solid #666; ' src='/images/weather/moon/moon9.png' class='phases' alt='Фаза Луны' title='Фаза Луны'></p>

</td>
</tr></table>



</td>
      <td id="right">
        <h2 class='block2' style='margin: 15px 0 4px 0;'>Погода за окном</h2>
        <div class='commonBlock2'>
            <img src='/images/weather/mini/n2.png' alt=''>
            <div class='temp'>-26°c</div>
            <div class='info'>Ветер: <span>5.0 м/с | северный</span></div>
            <div class='info'>Давление: <span>692 мм рт. ст.</span></div>            
        </div>
</td>
    </tr>
  </table>
  
  
  
  
  <div id="footer">
        <IMG src="/images/logo_footer.png">
        <SPAN>© 2012 Городской портал «В Нерюнгри»
        <ul>
            <li><a href="http://corp.vnerungri.ru/company/">О проекте</a></li>
            <li><a href="http://corp.vnerungri.ru/services/">Размещение рекламы</a></li>
            <!--<li><a href="/">Пользовательское соглашение</a></li>-->
            <li><a href="http://corp.vnerungri.ru/form/">Связаться с нами</a></li>
        </ul>
        </SPAN>
        <a style="float:right;margin:5px 10px;" href="/info.html?#34;><img src="/counter.jpg" width="88" height="31" border=0></a>
  </div>
</body>
</html>

string.format (formatstring, ···)
Возвращает параметры, передаваемые в функцию, отформатированные в соответствии первым параметром (который должен быть строкой). Строка формата должна строиться по тем же правилам, что и строка формата для семейства C функций printf. Отличие только в том, что опции/модификаторы *, l, L, n, p и h не поддерживаются, но имеется дополнительная опция q. Опция q позволяет вернуть строку в формате, безопасно воспринимаемом Lua интерпретатором: сама строка выводится в двойных кавычках, а все двойные кавычки, перевод строки, символы с кодом 0 и обратный слеш внутри строки экранируются обратным слешем (escaped). Например, вызов
     string.format('%q', 'a string with "quotes" and \n new line')
возвратит строку:

     "a string with \"quotes\" and \
      new line"
Опции c, d, E, e, f, g, G, i, o, u, X, и x должны использоваться только для числовых параметров, а q и s - для строковых.

Эта функция не принимает строковые параметры, содержащие символы с кодом 0, кроме параметров для формата, имеющего опцию q.

function UserConnected(tUser)
  local iHour, sMsg = tonumber(os.date"%H"), tUser.sNick..". Добро пожаловать на хаб!"
  if iHour >= 5 and iHour < 12 then
    Core.SendToUser(tUser, ("Доброе утро %s"):format(sMsg))
  elseif iHour >= 12 and iHour < 18 then
    Core.SendToUser(tUser, ("Добрый день %s"):format(sMsg))
  elseif iHour >= 18 and iHour <= 23 then
    Core.SendToUser(tUser, ("Добрый вечер %s"):format(sMsg))
  else
    Core.SendToUser(tUser, ("Доброй ночи %s"):format(sMsg))
  end
end
RegConnected, OpConnected = UserConnected, UserConnected