0definta-z:screen1:deffna(i)=int(rnd(-time)*i):deffno(a$,a)=asc(mid$(a$,a,1)):f=