Как-то от нечего делать написал такую фигнюшку, хотелось бы узнать у профессионалов, я дурак или псих ?
Код:ORG #8000 LD DE,#4000 RAND LD HL,#0103 LD A,H ADD L RLCA LD H,A ADD L RLCA LD L,A LD (RAND+1),HL POS LD BC,#0000 AND 3 CP 1 JR Z,R1 CP 2 JR Z,R2 CP 3 JR Z,R3 DEC DE LD A,D OR E CP 0 RET Z JR RAND OK_ LD (POS+1),BC LD A,#BF SUB B RET C CALL #22B0 LD B,A INC B LD A,#01 RRCA DJNZ ($-1) LD B,A LD A,(HL) OR B LD (HL),A LD A,#7F IN A,(#FE) BIT 0,A JR NZ,RAND RET R1 LD A,B ADD 192 RRA LD B,A LD A,C ADD 127 RRA LD C,A JR OK_ R2 SRL B SRL C JR OK_ R3 SRL B LD A,C ADD 255 RRA LD C,A JR OK_





Ответить с цитированием
Размещение рекламы на форуме способствует его дальнейшему развитию 
