random saying by flutschi
removelist 'randomSaying'
createlist 'randomSaying'
pushlist 'randomSaying' 'zero saying'
pushlist 'randomSaying' 'a saying'
pushlist 'randomSaying' 'two saying'
pushlist 'randomSaying' 'three saying'
pushlist 'randomSaying' 'four saying'
pushlist 'randomSaying' 'five saying'
pushlist 'randomSaying' 'six saying'
pushlist 'randomSaying' 'seven saying'
random 10
@setvar! randomNumber 0
if insysmsg 'Random: 1'
    @setvar! randomNumber 1
endif
if insysmsg 'Random: 2'
    @setvar! randomNumber 2
endif
if insysmsg 'Random: 3'
    @setvar! randomNumber 3
endif
if insysmsg 'Random: 4'
    @setvar! randomNumber 4
endif
if insysmsg 'Random: 5'
    @setvar! randomNumber 5
endif
if insysmsg 'Random: 6'
    @setvar! randomNumber 6
endif
if insysmsg 'Random: 7'
    @setvar! randomNumber 7
endif
if insysmsg 'Random: 8'
    @setvar! randomNumber 8
endif
if insysmsg 'Random: 9'
    @setvar! randomNumber 9
endif
if insysmsg 'Random: 10'
    @setvar! randomNumber 10
endif
foreach saying in randomSaying
    if randomNumber = index 
        say saying 6
        break
    endif
endfor








