Announcement

Collapse
No announcement yet.

Question about Vidimage.4dg

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Question about Vidimage.4dg

    This code from the Picaso ViSi samples (reproduced below) works on my display, but I'm not sure why because I can't figure out where the values for iimage1 and ivideo1 come from. I know they're supposed to be indexes into the image list pointed to by hndl, but they're not defined or set anywhere. The list itself (in VIDIMA~1.dat) contains "image1" and "video1".

    Code:
    #inherit "4DGL_16bitColours.fnc" #inherit "VisualConst.inc" #inherit "VIDIMAGE_edConst.inc" func main()//    Uncomment the following if uSD images used.    putstr("Mounting...\n");    var disk, hndl;    if (!(disk:=file_Mount()))        while(!(disk :=file_Mount()))            putstr("Drive not mounted...");            pause(200);            gfx_Cls();            pause(200);        wend    endif    gfx_Cls();    gfx_TransparentColour(0x0020);    gfx_Transparency(ON);     hndl := file_LoadImageControl("VIDIMA~1.dat", "VIDIMA~1.gci", 1);      // image1 1.0 generated 2/19/2013 1:10:27 PM    img_Show(hndl,iimage1) ;    pause(5000);    var frame;    repeat         for (frame := 0; frame <= 604; frame++)         // video1 1.0 generated 2/19/2013 1:12:57 PM            img_SetWord(hndl, ivideo1, IMAGE_INDEX, frame) ; // where frame is 0 to 604            img_Show(hndl,ivideo1) ;            pause(10) ;        next     foreverendfunc

  • #2


    Never mind. I figured it out.

    Comment

    Working...
    X