OpenEuphoria

RE: Live Tutoria?

• Posted by Lynn Kilroy <leks_transportation at hotmail.com> Jan 22, 2006
• 562 views

> Here is an example:
> 
> }}}
<eucode>
> include get.e
> 
> function Input()
>     sequence string_in -- a place to store our string
>     integer key -- the next key in the buffer
> 
>     string_in = {} -- empty sequence/string
>     key = wait_key() -- get the first key
>     while key != 13 do
>         puts(1, key) -- echo the key to the screen
>         string_in &= key -- add the key onto the string
>         key = wait_key() -- get another key
>     end while
> 
>     return string_in
> end function
> 
> sequence new_string
> new_string = Input()
> 
> puts(1, new_string)
> </eucode>
{{{

>

Sequence is the Euphoria equivilant of the Array, correct?  And it 
really has no real type, and &= tells Euphoria to place the value of the 
var on the right of the &= in to the next element in the sequence on the 
left, correct?

So I added it with some little tidbits and ended up with a dump.

D:\LEKSSOFT\EUPHORIA\SOURCE\LEARNING\..\..\include\clrlcte.e:4 in
procedure ColorLocatePrintTextOnly() 
type_check failure, Text is 72'H' 
    FGC = 14
    BGC = 1
    Row = 1
    Col = 1
    Text = 72'H'

... called from D:\LEKSSOFT\EUPHORIA\SOURCE\LEARNING\LEARNING.EX:21 


Global & Local Variables

 C:\Progra~1\Euphoria\include\get.e:
    input_file = <no value>
    input_string = <no value>
    string_next = <no value>
    ch = <no value>

 C:\Progra~1\Euphoria\include\graphics.e:
    BLUE = 1
    CYAN = 3
    RED = 4
    BROWN = 6
    BRIGHT_BLUE = 9
    BRIGHT_CYAN = 11
    BRIGHT_RED = 12
    YELLOW = 14

 C:\Progra~1\Euphoria\include\misc.e:
    pretty_end_col = <no value>
    pretty_chars = <no value>
    pretty_start_col = <no value>
    pretty_level = <no value>
    pretty_file = <no value>
    pretty_ascii = <no value>
    pretty_indent = <no value>
    pretty_ascii_min = <no value>
    pretty_ascii_max = <no value>
    pretty_line_count = <no value>
    pretty_line_max = <no value>
    pretty_dots = <no value>
    pretty_fp_format = <no value>
    pretty_int_format = <no value>
    pretty_line = <no value>

 D:\LEKSSOFT\EUPHORIA\SOURCE\LEARNING\LEARNING.EX:
    Text = {72'H'}
    Key = 72'H'

Tell me what I'm doing wrong?

Love & Friendship & Blessed Be!
Lynn Erika Kilroy

> 
> Of course you could just use gets(), see 
> http://www.rapideuphoria.com/lib_e_g.htm#gets example 2.
> 
> 
> Try using the web interface directly to the Forum 
> http://www.listfilter.com/EUforum it works very well, much better than 
> Topica.
> 

I hate random passwords.

Love & Friendship & Blessed Be!
Lynn Erika Kilroy