미관을 위해 간단한 형식을 설계했고, 팀은 오행부터 시작했다.
암담한가? 시작 라인? 로? 정수
시작 라인? =? 다섯；오；5
Sheet 1 인코딩에 사용할 별칭을 지정합니다.
암담한가? ST? 로? 워크시트
설정? ST? =? 용지 ("용지 1")
인원수와 그룹 수를 읽다.
암담한가? 팀? 사람? 로? 정수
팀? =? 성세포 (1, 2). 가치
사람? =? 성세포 (2, 2). 가치
뭐 때문에? 나? =? 시작 라인? 어디 가? 시작 라인? +? 팀? -응? 1
팀의 이름을 적어라
성세포 (나, 1). 가치? =? "팀?" -응? & amp? Str (나? -응? 시작 라인? +? 1)
다음? 나
Flag 는 위에서 아래로 1 인 뱀 모양을 생성하는 데 사용됩니다. 마이너스 1 과 같고, 그 반대도 마찬가지다.
암담한가? 깃발? 로? 정수
깃발? =? 1
이것은 컨트롤 막대의 매개변수입니다.
암담한가? 현재 콜? 로? 정수
현재 콜? =? 2
인사 번호입니다. Do 루프에서 한 번에 하나씩 추가합니다.
암담한가? CurrentPerson? 로? 정수
CurrentPerson? =? 1
숫자를 채울 때마다 for 루프의 시작 값과 끝 값입니다.
암담한가? S,? E? 로? 정수
하다
만약? 깃발? =? 1? 그리고 나서
S? =? 1
E? =? 그룹
기타
S? =? 그룹
E? =? 1
끝? 만약
숫자 입력을 시작하다
뭐 때문에? J? =? S? 어디 가? E? 한 걸음? 깃발
성세포 (startLine)? +? J? -응? 1,? CurrentCol) 을 참조하십시오. 가치? =? 현재 사람
CurrentPerson? =? CurrentPerson? +? 1
다음? J.
열을 채운 후 변수 값을 조정합니다.
현재 콜? =? 현재 콜? +? 1
깃발? =? (-1)? *? 깃발
만약? CurrentPerson? & gt? 사람? 그리고는요? 종료? 잠수함
고리
끝? 잠수함