1. Euphoria rocks!

When it comes to programming languages, Euphoria is a cut above.
Euphoria.ex:
-- Flash! Written for Euphoria by matt1278 at juno.com
-- Also written for QBasic and written and compiled for QuickBASIC
include graphics.e
include get.e
integer a
clear_screen()
a=1
while 1 do
a=a+1
if a>15 then
a=1
end if
text_color(a)
position(10,30)
puts(1,"Euphoria!")
if get_key()!=-1 then
position(10,28)
text_color(BRIGHT_CYAN+BLINKING)
puts(1,"Euphoria rocks!")
if wait_key() then
end if
exit
end if
end while
abort(0)

new topic     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu