alias picinwin {
  echo -a window region loaded? $fs::dll(LoadRegion, $1-)
  window -pd +d @pic 0 0 $pic($1-).width $pic($1-).height
  drawpic @pic 0 0 $1-
  fs::dll SetRegion $window(@pic).hwnd
  timer 1 5 window -c @pic
}

;; stupid example if u want to create a fullscreen game

alias f***ample {
  window -adp +d @example 0 0 800 600
  fs::FullScreen 800x600 @example
  f***ample_fill
  .timer 1 10 fs::Reset
  .timer 1 11 window -c @example
}

alias f***ample_fill {
  var %i = 0
  while (%i < 100) {
    .timer -m 1 $calc(%i * 100) drawdot -r @example $rgb($r(0,255),$r(0,255),$r(0,255)) $r(10,50) $r(0,800), $r(0,600)
    inc %i
  }
}

;; this is why i developed this dll :o)

alias -l fs::dll {
  if ($isid) { return $dll(fullscreen.dll,$1,$2-) }
  else { dll fullscreen.dll $1- }
}
alias fs::PrepareWindow {
  if ($window($1-)) {
    if ($window($1-).state == maximized) {
      set %fs::maximized $true
      window -r $1-
    }
    return $true
  }
  return $false
}
alias fs::FullScreen {
  if ($fs::PrepareWindow($2-) == $true) {
    fs::dll Fullscreen $+ $iif($1 != 0, $1) $window($2-).hwnd
  }
}
alias fs::Reset {
  if (%fs::maximized == $true) {
    .timer 1 1 window -x $+(",$1-,")
    unset %fs::maximized
  }
  fs::dll Reset
}
alias inFullscreen return $fs::dll(inFullscreen)

menu status,channel,query {
  -
  Fullscreen
  .$iif($inFullscreen,$style(2)) Enable
  ..640x480:/fs::FullScreen 640x480 $active
  ..800x600:/fs::FullScreen 800x600 $active
  ..320x200x16:{ fs::dll SetWidth 320 | fs::dll SetHeight 200 | fs::dll SetBits 16 | fs::dll SetFrequency 60 | fs::FullScreen 0 $active }
  .$iif(!$inFullscreen,$style(2)) Disable:/fs::Reset $active
}