探したんですけど、見つかりませんでした。
とりあえず簡単な物を貼っておきますね。
(お役にたてなくて申し訳ございません。)
a=10
screen 0,250,100
*atest
redraw 0
clrobj
color 255,255,255:boxf
title "スピンボタン(仮)"
objmode 2
pos 0,0
font "Meyrio",20 //又は メイリオ
input a,100,30
pos 100,0
objsize 50,17
font "",15
button goto"↑",*up
button goto"↓",*down
stop
*up
a+1
goto *atest
stop
*down
a-1
goto *atest
stop
見つかったらお教えします。