/ ZXDev/Lib/NewSupercode: + procedures EKRAN1, EKRAN2, EKRAN3, EKRAN4.