.CHARSET 1251 ; Ôàéë 3-16 .ORG 0 A0: ; ñ àäðåñà 39 M A <-> GSB A41 M 7 <-> M 8 RM A GSB A41 M 4 <-> M 5 RM 8 * M 0 RM 7 RM 4 * M 1 RM 7 RM 5 * RM 8 RM 4 * + GSB A41 M 2 <-> RM 9 * RM 0 + RM 2 RM 1 + R/S GOTO A0 A41: ; ñ àäðåñà 2 , 8 , 27 M C RM 9 - F X>=0 A60 RM C RM 9 / M D K RM D RM D RM 9 * RM C <-> - RM D GOTO A62 A60: ; ñ àäðåñà 44 CX RM C A62: ; ñ àäðåñà 58 RTN .END