로또 6/45 용으로 숫자를 생성하는 간단한 유틸리티입니다. 아마도 처음으로 Funge로 심각하게 만들어 본 프로그램이 아닐까 싶군요. 참고로 서명으로도 사용합니다 :p
6v v< +1_v#< >:#v_>:95*-#v_$@>"z"- ^ ^ <1 >v >:7g^ >1v >v + >-06>:|>1-\4*#v?2v "\ 7 p^>$$$^v<tokigun\>3v z> :1v ^$$$$$20040321<\+<>"" $^>+.1+v >95*%:7g"z"- #^_
Befunge-93/98 인터프리터가 있으면 간단하게 실행할 수 있습니다. 이 프로그램은 어떤 다른 입력도 필요 없이 실행하면 바로 숫자 6개만 딸랑 출력하고 끝납니다. 아래는 tkbf93을 사용할 때의 실행 방법을 나타낸 것입니다.
$ tkbf93 lotto.bf 8 13 21 29 41 43
이 프로그램에서는 하나의 숫자를 생성하기 위해서 6번 ? 명령을 호출한 후 (4096가지 가능성) 그 결과를 45로 나눈 나머지를 사용합니다. 실제로 각각의 숫자가 나올 확률은 1만 92/4096(2.24609%)이고 나머지 숫자는 모두 91/4096(2.22168%)이고, 이 값은 실제 45개의 숫자 중 하나의 숫자를 뽑을 확률인 2.22222%과 거의 일치합니다.
