/*
    barsunduk
    06 / 2011
    Lib_vip -    
    VIP - Vector Image Pascal (  ,  -    )
*/

//   - ,   - 
    function vip2image(code: String): image;
// ,     
    procedure drawvip(code: string; x, y: integer);

//  ,      (  ):
    public static int getalpha(int col)
    public static int getred(int col)
    public static int getgreen(int col)
    public static int getblue(int col)
    public static int argb2int(int alpha, int red, int green, int blue)
    public static String scopy(String s, int offset, int count)
    public static String sdelete(String s, int offset, int count)
    public static String trim(String s)
    public static String i2h(int i) {
    public static void bmpcolorint(int col)
    public static void bmpcolorhex(String col)
    public static void bmpfree()
    public static void bmpcreate(int w, int h)
    public static void bmpsetscreen()
    public static Image bmpgetimage()
    public static void bmpsetimage(Image img)
    public static void bmpdraw(int x, int y)
    public static void bmpdrawsolid(int x, int y)
    public static int pixmix(int forecolor, int backcolor)
    public static void bmpsetpixel(int x, int y, int col)
    public static int bmpgetpixel(int x, int y)
    public static void bmpplot(int x, int y, int col)
    public static int bmpwidth()
    public static int bmpheight()
    public static void bmpline(int x1, int y1, int x2, int y2)
    public static void bmprect(int x, int y, int w, int h)
    public static void bmpfillrect(int x, int y, int w, int h)
    private static int stp(int a, int b, int i)
    public static void bmpbezier(int x1, int y1, int x2, int y2, int x3, int y3)
    public static void bmpbow(int x1, int y1, int x2, int y2, int x3, int y3)
    public static void bmpellipse(int x, int y, int w, int h)
    public static void bmpfillellipse(int x, int y, int w, int h)
    //   (   shr 16)
    public static int cos(int a) {
    //   (   shr 16)
    public static int sin(int a)
    public static int abs(int a)
    public static void bmparc(int x, int y, int w, int h, int a1, int a2)
    public static void bmpfill(int x, int y)
    public static void bmprepcol(int col, int newcol)
    public static void bmpcls(int col)
    public static void bmptransp(int x, int y)
    public static void bmpresize(int w, int h)

    public static String _coms = "new|plot|fill|line|rect|fillrect|bow|color|cls|ellipse|fillellipse|repcol|transp|arc";
    public static String _ton = "(";
    public static String _toff = ")";
    public static int _tdiv = 0x2C;

    public static String strget(String s, int index)
    public static String strgetdiv(String s, int index, int divider)
    public static int strcount(String s)
    public static int str2int(String s)
    public static void vip2bmp(String code)
