v#=39923
s#=1000
t#=1


do
cls
Print "Guardedcharlie is a fucking wanker:", v#
v#= v#+t#
wait s#
if mouseclick()=1 then s#= s#-100
if mouseclick()=1 then t#= t#+10000
loop