REVO7000TypeIn @nYn9  UNoto Sans,unicode  cREVGeneral breakpointstates breakpointsbreakpointconditions scalefactor? @n: Insert code pon mouseUp if field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" is not empty then put cr after field "Script" \ of group "Editor" of card "Main" of stack "revNewScriptEditor 1" put the text of field "speed" into tSpeed repeat for each character x in the clipboardData wait for tSpeed seconds with messages put x after field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" set the vscroll of field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" to (the effective textheight of field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1") \ * (the number of lines in field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1") set the hscroll of field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" to (the formattedwidth of line -1 of field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" - the width of field "Script" of group "Editor" of card "Main" of stack "revNewScriptEditor 1" +40) send "reapplyPreferences" to group "Editor" of card "Main" of stack "revNewScriptEditor 1" end repeat end mouseUp (0  cREVGeneral scripteditorvscrollscripteditorselection821  Label Field Mdx  cREVGeneral tablefalse cRevTable  cellFormatfalsemaxColumnCountcellEditfalse Speed: '  Scrollbaripon scrollbarLineInc pNewPosition add -0.01 to field "speed" end scrollbarLineInc on scrollbarLineDec pNewPosition add 0.01 to field "speed" end scrollbarLineDec O    focusBorder horizontal cREVGeneral scripteditorvscrollscripteditorselection130 speed)`OPd  cREVGeneral tablefalse cRevTable  cellFormatfalsemaxColumnCountcellEditfalse  0.001 ' revOnline | RunRev