창조유저그룹-커즈닷컴

소스자료실
- 창조 소스를 공유하는 곳입니다. 첨부가능 확장자는 *.zip,*.rar,*.arj,*.exe,*.jpg,*.png,*.gif,*.cuf,*.nhp,*.nhw 입니다.

LIST ALL

Posted by 성인e

2008-06-09 13:48:06, Hit : 6322

반복문 속도를 줄이려고 해봤는데요...

File #1 : a.zip (861.9 KB) Download : 193

Post URL : http://cugz.sjworks.net/bbs/zboard.php?id=pds_sc&no=598

안돼는 이유가 뭔지;;
소스 올릴게요.

중요 코드는 아래것인데;

//
실수:그림높이,이런;
만일(부정 내그림.그림.그림존재) { 나가;}
메모0.내용.추가("<table width="+수문(34)+수를문(내그림.그림.폭)+수문(34)+" border="+수문(34)+"0"+수문(34)+" cellpadding="+수문(34)+"0"+수문(34)+" cellspacing="+수문(34)+"0"+수문(34)+"><tr>");
눈금계0.최대:=내그림.그림.높이;
//
실수:색깔,그림폭;
실수:빨,초,파;
반복
{
이런:=내그림.그림.폭;
눈금계0.눈금위치:=그림높이;
사건메모.내용.지워;
반복
{
만일(이런<10000)
{
만일(이런<1000)
    {
만일(이런<100)
   {
   만일(이런<10)
     {
  반복
    {
    색깔 := 내그림.그림.배경.점제어(그림폭,그림높이,-1);
    선택색.색상 := 색깔;
    빨 := bAND(색깔,255);
    초 := bAND(shr(색깔,8),255);
    파 := bAND(shr(색깔,16),255);
    빨강값.문자 := 수를문(빨);
          초록값.문자 := 수를문(초);
          파랑값.문자 := 수를문(파);
          에디트0.문자:=사용자함수0.십을십육(빨)+사용자함수0.십을십육(초)+사용자함수0.십을십육(파);
    메모0.내용.추가("<td bgcolor="+수문(34)+"#"+에디트0.문자+수문(34)+"width="+수문(34)+"1"+수문(34)+" height="+수문(34)+"1"+수문(34)+"></td>");
    그림폭:=그림폭+1;
    이런:=이런-1;
    같이실행해;
    }까지(이런<1);
  }
  아니면
    {
    //사건연결해(제길,"클릭했을때",분할10.내용.전체문자);
    반복
            {
   사건메모.내용.추가(분할10.내용.전체문자);
            이런:=이런-10;
            }까지(이런<10);
    }
   }
   아니면
     {
  //사건연결해(제길,"클릭했을때",분할100.내용.전체문자);
     반복
          {
    사건메모.내용.추가(분할100.내용.전체문자);
          이런:=이런-100;
          }까지(이런<100);
     }
   }
    아니면
   {
   //사건연결해(제길,"클릭했을때",분할1000.내용.전체문자);
   반복
        {
  사건메모.내용.추가(분할1000.내용.전체문자);
        이런:=이런-1000;
        }까지(이런<1000);
   }
}
아니면
{
//사건연결해(제길,"클릭했을때",분할10000.내용.전체문자);
반복
    {
사건메모.내용.추가(분할10000.내용.전체문자);
    이런:=이런-10000;
    }까지(이런<10000);
}
}까지(이런<1);
사건연결해(제길,"클릭했을때",사건메모.내용.전체문자);
제길.눌러;
//
//
메모0.내용.추가("</tr>"+수문(13)+수문(10)+" <tr>");
그림높이:=그림높이+1;
같이실행해;
}까지(내그림.그림.높이<그림높이);
메모0.내용.추가("</tr>"+수문(13)+수문(10)+"</table>");
메모0.내용.파일저장해(경로+"test.html");
문자창보여("ㅇㅅㅇ");