0001 rem UPKR promo
0002 rem tech demo for ZX 48+AY
0009 rem =RMDA= 20.10.2022
0011 border not pi: paper not pi: ink pi+sgn pi
0012 CLEAR val "24524" : LIST : randomize usr val "15619": REM : LOAD "screen" CODE 40000
0015 RANDOMIZE USR val "4e4"
0016 randomize usr val "15619": REM : LOAD "upkrdata" CODE 24525
0017 RANDOMIZE USR val "24525"