File Name

Click to restart

GIF Info

Created by:

Parent:

Children:

Upload in progress...

Hold on, we're doing the stuff....

You're GIF won't be around forever. It'll be available long enough to share it.

Please wait while we upload...

Please hold... processing

Uploading to Instagram

To convert your GIF video for Instagram, we recommend visiting Online-Convert.com After converting your video there, use your Instagram app to add your new video to your feed.

Replace this image

OR, choose from the list...

Upload a video to play in the background of your GIF.
We recommend videos/gifs to not be longer than 10 seconds.

Drag Video to Here

Drag image to position it

var IMX={img}
var mx=0
var my=0
var dir={dir}
create sprite from IMX as ii
  where
    x={x} y={y}
    center=auto
end
create routine as Start
  launch ii
  set mousedown=mdown
  set mouseup=mup
  set mousemove=mmove
  set mouseout=mup

set touchstart=tdown
  set touchend=tup
  set touchmove=tmove
end
create routine as mdown
  update var mx set=mouse.x
  update var my set=mouse.y
  update sprite ii set isdown=true
end

create routine as mup
  update sprite ii set isdown=false
end

create routine as mmove
  if (ii.isdown==true)
		//run function "console.log('dir="+dir+"')"
    if (dir=="b") // both
			var abx=mouse.x2-mouse.x1
			var aby=mouse.y2-mouse.y1
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
		elsif (dir=="v") // vertical
			var abx=0
			var aby=mouse.y2-mouse.y1
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
		else // 'h' horizontal
			var abx=mouse.x2-mouse.x1
			var aby=0
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
	  endif
  endif
end
create routine as tdown
  update var mx set=_touch.x
  update var my set=_touch.y
  update sprite ii set isdown=true
end

create routine as tup
  update sprite ii set isdown=false
end

create routine as tmove
  if (ii.isdown==true)
    if (dir=="b")
			var abx=_touch.x2-_touch.x1
			var aby=_touch.y2-_touch.y1
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
		elsif (dir=="v")
			var abx=0
			var aby=_touch.y2-_touch.y1
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
		else // 'h'
			var abx=_touch.x2-_touch.x1
			var aby=0
			insert into ii where alt=(sub
				create translation
					where x=(ii.x+abx) y=(ii.y+aby) speed=600
				end)
			run function "SetImagePosition("+(ii.x+abx)+","+(ii.y+aby)+")"
	  endif
  endif
end