이진 시퀀스를 문자로 변환해서 출력하는 간단한 프로그램입니다.
01->1+:0\v>0p020p0 vp01+g01!p00:%-1*99+1g0< 0p02+1< |-";"g<0vgg01g00<tokigun.>6# 8# *#<-\2* +20g:7-| >1+10p0^>:";"-!#@_:"0"-!#^_:"1"-!#^_$>0^#p020,$< ; start of sequence (sequence) ; end of sequence
이 코드는 코드 공간에서 ;로 시작하는 첫 행을 찾아서 그 다음 행부터 ;가 나올 때까지 나오는 모든 0과 1을 문자로 변환합니다. 따라서 실제로 사용하기 위해서는 위의 (sequence) 부분을 실제 이진 시퀀스로 바꿔 줘야 합니다. 편의상 한 줄에 80개 이상의 문자가 올 경우 처음 80개만을 사용합니다. 예를 들면 다음과 같이 쓸 수 있습니다.
01->1+:0\v>0p020p0 vp01+g01!p00:%-1*99+1g0< 0p02+1< |-";"g<0vgg01g00<tokigun.>6# 8# *#<-\2* +20g:7-| >1+10p0^>:";"-!#@_:"0"-!#^_:"1"-!#^_$>0^#p020,$< ; start of sequence 01010 100011011110 1101011TOKIGUN!0110 1001011 0011101110101 011011100101 001101 11 01000111010101100100011010010 1101111 ; end of sequence
실행을 하기 위해서는 Befunge-93/98 인터프리터가 필요합니다. 예를 들어서 tkbf93을 사용한다고 가정할 경우, 이 프로그램은 다음과 같이 실행할 수 있습니다.
$ tkbf93 bin2char.bf TokigunStudio
