Something I made in 15 minutes. Has a simple start up program, as a beining of a game.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    Print "Welcome."
print "Please input a name"
suspend for key
cls
input ">";MainCh$
cls
print "Welcome, ";MainCh$;", please make a charater."
Chooseaclass:
input "Would you like to be a knight(input 1) or a archer(input 2).>";Classchoice#
cls
if Classchoice#=1 then knight(1)
if Classchoice#=2 
archer(2)
else 
goto Chooseaclass
endif
adventure:
end

function knight(1)
Health#=100
Fatigue#=0
attack#=10
range#=1
print "Stats are, Health ";Health#;", Fatige ";Fatigue#;", Attack";attack#;", Range";range#;"."
endfunction 1

function archer(2)
Health#=75
Fatigue#=0
attack#=5
range#=2
print "Stats are, Health ";Health#;", Fatige ";Fatigue#;", Attack";attack#;", Range";range#;"."
endfunction 2