## viernes, 12 de junio de 2015

### LED is my new Hello World - OpenEuphoria Time

I started using OpenEuphoria a long time ago...when it was called RapidEuphoria...but...I stopped using as I started learning other languages...

Yesterday...all of a sudden...I realized that it is indeed a really cool language, so I wanted to refresh myself and what better than building my LED example one more time -;)

So...here it is -:)

LedNumbers.ex
```include get.e
include std/map.e
include std/convert.e
include std/sequence.e

sequence num
sequence snum
object onum
atom anum
map leds = new()
put(leds, 0, {" _  ","| | ","|_| "})
put(leds, 1, {"  ","| ","| "})
put(leds, 2, {" _  "," _| ","|_  "})
put(leds, 3, {"_  ","_| ","_| "})
put(leds, 4, {"    ","|_| ","  | "})
put(leds, 5, {" _  ","|_  "," _| "})
put(leds, 6, {" _  ","|_  ","|_| "})
put(leds, 7, {"_   "," |  "," |  "})
put(leds, 8, {" _  ","|_| ","|_| "})
put(leds, 9, {" _  ","|_| "," _| "})

num = prompt_string("Enter a number: ")
snum = breakup(num,1)
for i = 1 to 3 do
for j = 1 to length(num) do
anum = to_number(snum[j])
onum = map:get(leds,anum)
puts(1,onum[i])
end for
puts(1,"\n")
end for
puts(1,"\n")
```

Of course...you want to see it in action -:D

If you haven't already...give OpenEuphoria a try...it's really fun -;)

Greetings,

Blag.
Development Culture.