서브루틴 끝 IP

. 지역 변수 IP 세그먼트, 텍스트 유형, "0"

. 지역 변수 I, 정수 유형.

. 지역 변수 IP, 텍스트 유형

IP 분할 = 텍스트 분할(#IP, #새줄,)

. 루프 헤더 계산(배열 멤버 수(IP 나누기), I)

IP = 텍스트 오른쪽(IP 나누기[i]), 텍스트 길이(IP 나누기[I])-2)

IP = 텍스트 왼쪽(IP, 텍스트 찾기(IP, "h", false)-2)< /p>

IP = 텍스트 바꾸기(IP, 텍스트 (IP, "", 거짓) 찾기, 1, ":")

편집 상자 1. 텍스트 추가(IP + # 개행 문자)

. 카운팅 주기 꼬리()