PicWin picture viewer

Small picwin script that browse after a photo and open it in mirc. When opened, you have a single menu option to close it. This mirc snippet is for educational purposes, you can implement whatever you want and to do with the code.

Postat de	Copyright	Categorie	Review user	Vizualizari	Data
BLKoldSUN	BLKoldSUN	media	Cod testat	477	2024-08-30 08:14:08

alias pic {
    var %file
    $iif( !$1,%file = $sfile(C:,Choose a photo to open :),%file = $1- )

    if (%file) {
    var %a $pic(%file).width $pic(%file).height

    $iif( $window(@PictureViewer),window -c @PictureViewer,window -haCipdo +d @PictureViewer -1 -1 %a )
    drawpic @PictureViewer 0 0 $shortfn(%file)
    }
}

menu @PictureViewer {
  CLose:/window -c @PictureViewer
}