;================== ;LOOPING ;================== CODE_SEG SEGMENT ASSUME CS:CODE_SEG ORG 100H START:MOV CX,10 LONCAT:MOV DL,'9' MOV AH,02H INT 21H LOOP LONCAT INT 20H CODE_SEG ENDS END START ;=================== ;LOOPING2 ;=================== CODE_SEG SEGMENT ASSUME CS:CODE_SEG ORG 100H START: JMP MULAI TEXT_INPUT DB 'JUMLAH LOOPING=$' TEXT_NAMA DB 13,10,'NDARU$' TEXT_NOULANG DB 13,10,'TIDAK ULANG$' MULAI: MOV AH,09H MOV DX,OFFSET TEXT_INPUT INT 21H MOV AH,01H INT 21H MOV CH,0 MOV CL,AL SUB CL,30H CMP CL,0 JZ LONCAT ULANG: MOV AH,09H MOV DX,OFFSET TEXT_NAMA INT 21H LOOP ULANG INT 20H LONCAT: MOV DX,OFFSET TEXT_NOULANG MOV AH,09H INT 21H INT 20H CODE_SEG ENDS END START