INCLUDE canvas.bac INCLUDE canvas-plugin-nanosvg.bac svg$ = " \ \ \ " SUB Two_Types LOCAL type=0 TYPE static int INK(255,255,255,255) CLS INK(0,0,0,255) SELECT type CASE 0 NANOSVG_IMAGE_FILE("broom.svg", 320, 240, FALSE) CASE 1 NANOSVG_IMAGE_FILE("broom.svg", 320, 240, TRUE) CASE 2 NANOSVG_IMAGE_PTR(svg$, 320, 240, FALSE) CASE 3 NANOSVG_IMAGE_PTR(svg$, 320, 240, TRUE) ENDSELECT INCR type IF type = 4 THEN type = 0 ENDSUB WINDOW("SVG image", 640, 480) CALLBACK(1000, Two_Types) WAITKEY