uses revtech,revinit,arkanoid,revdat;
var f:file;
    a:pointer;
    n:word;
begin
readglobalindex;
initpointers;
load;
end.