![]() ![]() _cout(' -> Are you sure? Select y/Y for yes, n/N for no: ',0)Ĭase -> You must enter y/Y or n/N. ![]() _cout('Write speed set to '&$gg_sc_iWriteSpeed) _cout("Enter the writing speed (10 is recommended!). ![]() _cout(' -> Do you want to always show the line number? select y for yes, n for no: ',0) _cout('The text of $sTitle is: '&$sTitle) _cout('The string value of $sTitle is: '&$sTitle,2) _cout('Enter 1.1 to show variables, 1.2 to edit them, 1.3 to exit this mode:') #SCITE SCOUT CODE#HomeOptions ( ) EndFunc #EndRegion While Sleep ( 10 ) _Console _ProcessRegisteredInputs ( _cin ( 1 ) ) WEnd #cs OLD CODE HomeOptions ( ) EndFunc #EndRegion #Region ChangeConsoleSettings_* Func HomeOptions _ChangeConsoleSettings ( ) _Console _UnRegisterAllInputs ( ) _cout ( 'HomeOptions_ChangeConsoleSettings.', 1 ) _cout ( 'q = exit', 1 ) _Console _RegisterInput ( 'q' ,HomeOptions _ChangeConsoleSettings _exit ) EndFunc Func HomeOptions _ChangeConsoleSettings _exit ( ) :' ) $sText = _cin ( 1, ) _cout ( '' ) MsgBox ( 0, 'The text is', $sText ) EndFunc Func HomeOptions _PrintOrEditVars _Option _1d3 ( ) _cout ( 'Exited' ) HomeOptions ( ) Func HomeOptions ( ) _cout ( '1 = print/edit variables, 2 = change console settings' ), 3 = clean the console, 4 = exit') _Console _UnRegisterAllInputs ( ) _Console _RegisterInput ( '1' ,HomeOptions _PrintOrEditVars ) _Console _RegisterInput ( '2' ,HomeOptions _ChangeConsoleSettings ) EndFunc #Region HomeOptions_PrintOrEditVars_* Func HomeOptions _PrintOrEditVars ( ) _cout ( ' -> print/edit variables:', 1 ) _cout ( 'Enter 1.1 to show variables, 1.2 to edit them, 1.3 to exit this mode:' ) _Console _UnRegisterAllInputs ( ) _Console _RegisterInput ( '1.1' ,HomeOptions _PrintOrEditVars _Option _1d1 ) _Console _RegisterInput ( '1.2' ,HomeOptions _PrintOrEditVars _Option _1d2 ) _Console _RegisterInput ( '1.3' ,HomeOptions _PrintOrEditVars _Option _1d3 ) EndFunc OPTIONS: Func HomeOptions _PrintOrEditVars _Option _1d1 ( ) _cout ( 'The string value of $sTitle is: ' & $sTitle, 2 ) _cout ( 'The string value of $sText is:' ) _cout ( $sText, 2 ) EndFunc Func HomeOptions _PrintOrEditVars _Option _1d2 ( ) _cout ( 'Enter some text for $sTitle: ', 0 ) $sTitle = _cin ( ) _cout ( 'The text of $sTitle is: ' & $sTitle ) _cout ( 'Enter some text for $sText. ![]() Expand collapse popup #include 'SciTE 3' HotKeySet ( '', 'Exit1' ) _ConsoleClean ( ) ~ Exit Local $sTitle = 'Hello World!' Local $sText = 'Hello!' & 'This is some saved text.' & 'You can change me if you want!' ~ _cout('Hello! what do you want to do now?') ~ _cout('1 = print/edit variables, 2 = change console settings, 3 = clean the console, 4 = exit') ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |