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

   function   main ()
is_run =  true 
row_color =  15 

t_id  =   AllocTable ()
 AddColumn (t_id,  0 ,  "0" ,  true , QTABLE_STRING_TYPE,  15 )
 AddColumn (t_id, row_color, tostring(row_color),  true , QTABLE_STRING_TYPE, 11 )

   t  =   CreateWindow (t_id)
    SetWindowPos (t_id,  0 ,  0 ,  500 ,  500 )

     for  i  =   1 ,  15   do 
       InsertRow (t_id, i)      
    end 
   
       for  k =  1 , 15   do 
          SetCell (t_id, k,  0 , tostring(k)) 
       end       


 while  is_run  do 

          for  k =  1 , 15   do 
    SetColor (t_id, k, row_color,  RGB ( 0 , 255 , 0 ),  RGB ( 0 , 0 , 0 ),  RGB ( 255 , 255 , 255 ),  RGB ( 0 , 0 , 0 )) --Crash here 
       end 
 sleep ( 500 )
 end 
 end 
  

   local  k  =  10local s  =   100 

 for  i  =   1 ,  10000000   do 
    k, s  =   math.max (k, s),  math.min (k, s)
    k, s  =  k * i, s * i
    k, s  =   math.min (k, s),  math.max (k, s)
 end   

   local  math_max  =  math.max
 local  math_min  =  math.min

 local  k  =   10 
 local  s  =   100 

 for  i  =   1 ,  10000000   do 
    k, s  =  math_max(k, s), math_min(k, s)
    k, s  =  k * i, s * i
    k, s  =  math_min(k, s), math_max(k, s)
 end