?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
uroof: cosmetix
[urasm.git] / samples / getkey / GetKey.zas
blob3b340f0b971675a8716c88fecedbc358e0e581a3
1   org 32768
2   include <open-main-screen.zas>
3
4   ei
5 loop:
6   call GetKey
7   rst  #10
8   ld   b,8:halt:djnz $-1
9   jr   loop
10
11   include <GetKey.zas>
UrAsm -- Z80 cross-assembler for ZX Spectrum