Codetter（こーどったー）

;https://yukicoder.me/problems/no/253
(let (
	(numMin 10)
	(numMax 1000000001)
)

'https://yukicoder.me/problems/no/253
Module Program
	Sub Main
		Dim numMin=10
		Dim numMax=1000000001

;https://yukicoder.me/problems/no/253
#runtime "hsp3cl"

numMin=10
numMax=1000000001

;https://yukicoder.me/problems/no/246
(let (
	(numMin 1)
	(numMax 1000000001))
	(loop

'https://yukicoder.me/problems/no/246
Module Program
	Sub Main
		Dim numMin=1
		Dim numMax=1000000001

;https://yukicoder.me/problems/no/246
#runtime "hsp3cl"

numMin=1
numMax=1000000001

//https://yukicoder.me/submissions/292157 を移植
const rl=require("readline").createInterface(process.stdin,process.stdout);

const g=function*(){
	var numMin=1;

//https://yukicoder.me/submissions/292157 を移植
const rl=require("readline").createInterface(process.stdin,process.stdout);
const readline=()=>new Promise(r=>rl.once("line",s=>r(s)));

(async function(){

#include "HSP3utf.as"
#include "kernel32.as"
#define WM_MOUSEMOVE                    0x0200

	screen 0, 1600, 900

#define CLSID_FileOpenDialog "{DC1C5A9C-E88A-4dde-A5A1-60F82A20AEF7}"
#define IID_IFileOpenDialog "{d57c7288-d4ad-4768-be02-9d969532d960}"
#usecom IFileOpenDialog IID_IFileOpenDialog CLSID_FileOpenDialog
#comfunc IFileOpenDialog_QueryInterface 0 int, int
#comfunc IFileOpenDialog_Show 3 int