まず、Web上では機種依存文字である丸数字は使用しない方がいいです。
以下のような感じでしょうか。
screen 3, 300, 200, 2, 0, 240
screen 0, 300, 200, , 0, 0
syscolor 15
boxf
objsize 88, 21
objmode 1
button "OK", *bt
stop
*bt
gsel 3, 2
redraw 0
syscolor 15
boxf
color 0, 0, 0
redraw 1
pos 0, 0
rand = rnd(10)
on rand gosub *l0, *l1, *l2, *l3, *l4, *l5, *l6, *l7, *l8, *l9
stop
*l0
mes "rand = 0 : " + rand
return
*l1
mes "rand = 1 : " + rand
return
*l2
mes "rand = 2 : " + rand
return
*l3
mes "rand = 3 : " + rand
return
*l4
mes "rand = 4 : " + rand
return
*l5
mes "rand = 5 : " + rand
return
*l6
mes "rand = 6 : " + rand
return
*l7
mes "rand = 7 : " + rand
return
*l8
mes "rand = 8 : " + rand
return
*l9
mes "rand = 9 : " + rand
return
実際には書くルーチンで同じ処理を行うなら分岐させる意味がないのですが。