Pascal для PIC микроконтроллеров

[ZhilDV]

Всем привет!
Я потихоньку перехожу на MicroPascal. Встретил при переходе некоторые трудности. Профи, помогите!
В ассемблере PIC есть прекрасная команда retlw 0xXX с помощью которой возможно элементарно добыть (call) некоторую константу прямо из памяти программ. A вот как это сделать в MicroPascal'е?!?!?

Профи, выручайте!!!!

[spasbyspas]

case num of // for common cathode 7-seg. display
0 : result := %11000000;
1 : result := %11111001;
2 : result := %10100100;
3 : result := %10110000;
4 : result := %10011001;
5 : result := %10010010;
6 : result := %10000010;
7 : result := %11111000;
8 : result := %10000000;
9 : result := %10010000;
10: result := %11111111; // nothing
11: result := %10111111; // -
end; //case end

[ZhilDV]

Ну, да! Конечно же ты прав! Ассемблер просто уже хорошо въелся в сознание. Очевидного не увидел.

Спасибо, открыл глаза!!!