100 SCREEN1:color 15,1,1:width 32:defint a-z:keyoff:key1,"screen0"+chr$(13):r=rn