실수:수;
ㅎ창:창;

진리:창존재;
수:=0;
반복
{ 
  창존재:=창생성여부("메모장"+수를문(수)); 
  수:=수+1;
}까지(창존재=거짓);
수:=수-1;
창 := 생성해(ㅎ창,"", "메모장"+수를문(수));
//창.창양식 := ㅊㅇ창틀무;
창.위치크기바꿔(200, 200, 150, 170);


//---------------------- 여기까지는 무한생성 잘되네요..

ㅎ객체: 창이동;
창이동 := 창;

//------------------- 이거 안먹혀용 외일까요? 뭐를 잘못했을까요?
//사건연결해(창이동, "마우스버튼을 누를때", "눌림:=참;마우스:=X;마우스1:=Y;");
//사건연결해(창이동, "마우스버튼을 뗄때", "눌림:=거짓;");
//사건연결해(창이동, "마우스를 움직일때", "만일(눌림=참){ 메모장"+수를문(수)+".위치크기바꿔(마우스좌표X-마우스,마우스좌표Y-마우스1,메모장"+수를문(수)+".폭,메모장"+수를문(수)+".높이);}");

창.보여;


///////////////////////소스 포함합니다..