DreamShell lua source code

[zaero]

Вот просмоторщик картинок следующих форматов: BMP,PNM,XPM,XCF,PCX,GIF,JPG,TIF,PNG,LBM. Умеет показывать физическое разрешение картинки и ее вес.

Код:

-- image viewer v0.1 by zaero
-- http://bbrclan.dc-swat.net.ru/dreamshell/
-- This version does not support that was for is planned
-- Коментарии не давал т.к. этот скрипт основан на примерах Свата.

if argv.n < 1 then
    print"\n==========================================="
    print"========Lua image viewer v0.1 by zaero====="
    print"==========================================="
    print"\n Flags:"
    print"      -i -- information on picture"
    print"      -o -- open file"
    print"      -v -- version"
    print" Usage:\n    view flag time(if need)"
    print" Exemple:\n    view -o /rd/image/logos/DSXT1.jpg 3000"
    print"    view -i image.jpg"
end

     SDL.SDL_BlitSurface = SDL.SDL_UpperBlit;

if argv[1]=="-v" then
     print"\nLua image viewer v0.1 by zaero, 1.12.2005";
end

function ShowIMG_xy(file, screen, x, y)
     local img_t, dest, slide, time  dest = SDL.SDL_Rect_new();
     img_t = SDL.IMG_Load(file);
           if img_t == nil then
              print("DS_ERROR: Couldn't load", file);
              return;
           end
     dest.x =x
     dest.y = y
     SDL.SDL_BlitSurface(img_t, NULL, screen, dest);
     SDL.SDL_Flip(screen);
     SDL.SDL_FreeSurface(img_t);
  end

function WhatTime(time)
     local time
         if argv[3] == nil then
              time = 3000
          else
              time = argv[3]
          end
     SDL.SDL_Delay(time)
end

if argv[1] == "-o" then
      DS.ds_draw_shutdown();
      SDL.SDL_Init(SDL.SDL_INIT_VIDEO);
      flags = SDL.bit_or(SDL.SDL_HWSURFACE, SDL.SDL_DOUBLEBUF);
      screen = SDL.SDL_SetVideoMode(640,480,16,flags);
      ShowIMG_xy(argv[2], screen, 0, 0)
      WhatTime(time);
      DS.ds_draw_init();
end

if argv[1] == "-i" then
     local width_im,  dest      
     width_im = SDL.IMG_Load(argv[2])
             if width_im == nil then
                print("DS_ERROR: Couldn't load", argv[2]);
                return;
            end
     print("-----alert--------------------------------")
     print("\nInformation on picture ",'"',argv[2],'"\n')
     print("-----end----------------------------------")
     print("\nWidth= ",width_im.w,"x",width_im.h)
     f = DS.fs_open(argv[2],DS.O_RDONLY)
     sizef = DS.fs_total(f);
     print("Size =",sizef)
end