@yosgspecさんが投稿したコード一覧 | ページ 4 | Codetter（こーどったー）

sdim longRange@Chess,,5,5
longRange@Chess(0,0)="＼","　","｜","　","／"
longRange@Chess(0,1)="　","＼","｜","／","　"
longRange@Chess(0,2)="―","―","＊","―","―"
longRange@Chess(0,3)="　","／","｜","＼","　"

#cmpopt varinit 1

#const global dispX 640
#const global dispY 480
#const global keyLeft 37

; ラッパーモジュール
; Variant.as
#ifndef Variant
#ifndef VariantAliasOff
	#define global vDim dim@Variant

; 【動的型配列コンテナ】VarArrayモジュール
; VarArray.as
#ifndef VarArray
#ifndef VarArrayAliasOff
	#define global vaCount count@VarArray

Sub hoge(ByRef a)
	set a=CreateObject("Scripting.Dictionary")
	a.Add "a","changed"
End Sub

;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