Przykłady

Oto kilka przykładowych programów napisanych w Revomerze. Dodajmy, że są to przykłady testowe, ponieważ interpreter nie jest jeszcze w pełni gotowy.

Hi universe

Jest to pierwszy program w Revomerze, jaki udało się uruchomić. Miało to miejsce 1 września 2006 o godzinie 10.04. Program ten wypisuje na ekranie "HI UNIVERSE" i kończy swą pracę.

almukantarat~
nope~
null%
almukantarat~
come here $1, $1, $3
gifs 3~
hide $3
gifs 29~
hide $2
gifs 29~
hide $1
pos $0~
gifs 69~
pos $0~
gifs 83~
pos $0~
gifs 82~
pos $0~
gifs 69~
pos $0~
gifs 86~
pos $0~
gifs 73~
pos $0~
gifs 78~
pos $0~
gifs 85~
pos $0~
gifs 32~
pos $0~
gifs 73~
pos $0~
gifs 72~
hide $0
%

Losowanie

Program ten losuje litery od A do J.

almukantarat~
nope~
null%
almukantarat~
come here $2, $2, $4
gifs 3~
hide $4
gifs 21~
hide $2
pos $0~
gifs 74~
gifs 73~
gifs 72~
gifs 71~
gifs 70~
gifs 69~
gifs 68~
gifs 67~
gifs 66~
gifs 65~
shuffle $1, $2
hide $0
gifs 1~
hide $1
gifs 11~
hide $2
%

Mnożenie

Program mnoży dwie dodatnie liczby podane w komórkach pamięci $500 i $501. Podana poniżej wersja pracuje na 8-bitowych słowach maszynowych, co ogranicza wielkość możliwego do uzyskania iloczynu do 256.

Dodajmy, że program ten na razie trochę oszukuje, bo korzysta z tymczasowej komendy num do wyświetlania liczb - po prostu aby zakodować ją w Revomerze, potrzebne było mnożenie, a żeby przetestować działanie mnożenia, potrzebne było wyświetlanie i jakoś to musieliśmy rozwiązać :).

almukantarat~
mul_null%
almukantarat~
conf mul_null, n~
unless}$506#
????& $506, $507
in $507
in $506
@&%^" $508, $506
conf n, mul_null~
@&%^" $501, $508
@&%^" $501, $507
gifs 1~
hide $508
gifs 1~
hide $507
gifs 1~
hide $506
~].?&* $505, $503~
~].?&* $503, $504~
@&%^" $504, $503
~].?&* $503, $505~
~].?&* $505, $502~
~].?&* $502, $501~
@&%^" $501, $502
~].?&* $502, $505~
n%
almukantarat~
nope~
nope~
nope~
nope~
foo%
almukantarat~
come here $520, $521, $522
gifs 3~
hide $522
gifs 17~
hide $521
gifs 17~
hide $520
charm $66
gifs 110~
hide $66
gifs 0~
hide $504
@&%^" $509, $503
~].?&* $500, $503~
gifs 1~
hide $502
gifs 0~
hide $509
m%
almukantarat~
come here $500, $501, $502
gifs 3~
hide $502
gifs 14~
hide $501
gifs 14~
hide $500
num $504
charm $66
gifs 109~
hide $66
gifs 8~
hide $501
gifs 8~
hide $500
%
© Tomasz "Zyx" Jędrzejewski 2005 - 2008 | Wykonanych zapytań: 0 | Serwer wirtualny zapewnia