BlaZed (Все сообщения пользователя)

function cut_zero(str)
  local num=tonumber(str)
  local zero=string.byte("0",1)
  local point=string.byte(".",1)
  if(string.find(num,'%.')) then -- Имеется точка в числе
    for n=string.len(num),1,-1 do -- Перебор справа налево
      if(string.byte(num,n)==point) then return string.sub(num,1,n-1) end
      if(string.byte(num,n)~=zero)  then return string.sub(num,1,n) end
    end
  end
  return num
end

  trans_time=dt.hour*10000+dt.min*100+dt.sec -- время отправки транзакции HHMMSS
  trans_id_count=(trans_id_count+1)%100 -- счетчик транзакций, от 0 до 99 и по кругу
  trans_id=1000*trans_time+100*robot_id+trans_id_count -- Уникальный идентификатор транзакций

class_code="SPBFUT"
sec_code="SiH1"
function main()
  clock1=0
  is_run=true
  while is_run do
    sleep(100)
  end
end
function OnStop()
  is_run=false
  return 100
end
function OnParam(c_code,s_code)
  if(c_code==class_code)and(s_code==sec_code)then
    clock2=os.clock()
    message("delta="..clock2-clock1.."sec")
    clock1=clock2
  end
end

v={}
function OnCalculate(index)
  if(v[index]==nil)then
    if(T(index).hour==9)and(T(index).min==0)or(index==1)then v[index]=0
    else
      if O(index-1)<C(index-1) then v[index]=v[index-1]+V(index-1) end
      if O(index-1)>C(index-1) then v[index]=v[index-1]-V(index-1) end
      if O(index-1)==C(index-1)then v[index]=v[index-1] end
    end
  end
  return v[index]
end

function main()
  a=0
  is_run = true
  while is_run do
    a=a+1
  end
end