실수:수,합;
반복{ 합:=합+문을수(문자표0.칸내용읽어((문자표0.종칸수-1),수),0); 수:=수+1; } 까지(수>(문자표0.횡칸수-1));
에디트0.문자:=수를문(합);
주석을 달고 설명을 하다면 ^^..
실수:수,합; //Y축을 하나씩 늘려가면서, 얻을 '수' 변수와 합계를 얻을 '합' 변수입니다.
반복{ 합:=합+문을수(문자표0.칸내용읽어((문자표0.종칸수-1),수),0); //'합' 변수에 가장 오른쪽의 값을 넣습니다. //이때, 못읽었거나, 문자라면, 0을 더합니다. 즉, 아무 의미가 없죠. //'문자표0.칸내용읽어' 이 문자표의 칸의 내용을 읽는 명령어입니다. //'문자표0.종칸수' 는.. 문자표0의 X축의 계수를 구하는겁니다. 이것은, 좌표값이 아닌 //개수이기 때문에, -1 을 해줍니다. 좌표는 0부터 시작하니까요 ^^.. //'수' 는 Y축을 뜻합니다. 이 바로 아래 명령어에서.. '수' 변수를 +1 씩 더해주어서, //가장 오른쪽의 있는 모든 문자를 문을수 명령어로 숫자로 바꾸어서 싹 더하는거죠^^.. 수:=수+1; //방금 말했듯이, 모든 Y축 값을.. 더해주기 위해, +1 을 더해줍니다. } 까지(수>(문자표0.횡칸수-1)); //끝까지 더했다면, 멈춥니다.
에디트0.문자:=수를문(합); //에디트0 에 보여줍니다.
참고 : 종칸수 - X좌표의 갯수 뜻합니다. 횡칸수 - Y좌표의 갯수 뜻합니다.
에제소스는 첨부파일에있습니다. [예제에는 주석이 없습니다.] |