鐃緒申鐃竣ワ申鐃緒申鐃緒申潺鵐宛鐃緒申鐃緒申BF-BASIC'n鐃緒申

鐃塾はよか鐃獣わ申鐃緒申

鐃巡が鐃緒申鐃緒申鐃塾わ申覆鐃叔わ申鐃緒申鐃緒申鐃叔駈申離廛鐃緒申鐃緒申鐃淳ング醐申鐃緒申箸鐃緒申鐃緒申蕁� 鐃巡た鐃緒申複鐃緒申鐃叔￥申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申覆鐃塾になってわ申鐃緒申隼廚鐃緒申泙鐃緒申鐃�?

鐃竣わ申鐃出わ申鐃駿てわ申鐃術随申鐃緒申鐃緒申鐃緒申鐃銃ワ申鐃獣ワ申鐃叔わ申鐃獣わ申鐃緒申鐃熟器申鐃緒申鐃緒申鐃銃易でわ申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申ALGOL鐃熟の醐申鐃曙が鐃緒申鐃緒申鐃緒申鐃緒申鐃術随申鐃薯スワ申鐃獣ワ申鐃緒申鐃楯誌申鐃緒申鐃緒申茲�申砲覆辰鐃緒申鐃緒申箸如鐃� 鐃術随申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃�鐃夙わ申鐃緒申鐃緒申粒鐃叔逸申鐃緒申媛辰鐃緒申鐃銃わ申鐃殉わ申鐃殉わ申鐃緒申鐃緒申 C鐃叔￥申鐃緒申鐃緒申鐃緒申鐃緒申鐃術随申鐃舜のポワ申鐃藷タわ申鐃緒申鐃緒申佑鐃緒申屬鐃緒申討劼匹鐃緒申椶砲鐃緒申辰鐃緒申蘓器申圓鐃渋随申鐃緒申鐃緒申箸任鐃緒申腓�申鐃� 鐃緒申鐃緒申法鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申竸鐃緒申鬟好鐃緒申奪鐃緒申鐃緒申屬鐃緒申鐃緒申箸鐃� 鐃銃居申鐃銃び出わ申鐃緒申鐃緒申能鐃祝なってわ申鐃殉わ申鐃殉わ申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申泙鐃緒申蘓器申垉磴�申鐃緒申任鐃緒申鐃� 鐃緒申鐃緒申鐃獣ワ申鐃緒申鐃緒申鐃夙わ申魯離鐃緒申鐃緒申鐃塾ワ申鐃緒申鐃緒申鐃緒申鐃宿もう鐃夙わ申鐃緒申鐃緒申里痢鐃� 頭鐃緒申鐃醇が鐃緒申鐃藷がらが鐃獣わ申鐃緒申発鐃緒申鐃緒申鐃緒申鐃祝なっわ申鐃緒申鐃夙わ申鐃緒申鐃塾は￥申誰鐃盾が鐃出醐申鐃緒申鐃銃わ申鐃緒申鐃緒申鐃叔わ申鐃緒申

鐃緒申鐃緒申忘廼鐃塾プワ申鐃緒申鐃緒申潺鵐宛鐃緒申鐃叔は￥申鐃緒申鐃瞬ワ申鐃緒申鐃緒申鐃夙を何もか鐃緒申辧鐃緒申廚鐃緒申屬鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申蝓� 鐃緒申鐃曙が鐃殉わ申鐃初心鐃峻泣か鐃緒申鐃塾鰹申念鐃叔わ申鐃緒申 鐃楯ワ申鐃緒申鐃緒申多鐃術わ申鐃暑こ鐃夙につなわ申鐃獣てわ申鐃殉わ申鐃緒申鐃緒申? 鐃楯ワ申鐃藷タわ申鐃緒申覆鐃�鐃緒申鐃緒申鐃緒申鐃獣わ申? 鐃緒申鐃緒申鐃�C鐃塾ポワ申鐃藷タにわ申鐃緒申鐃緒申旅鐃淑醐申鐃緒申鐃獣てわ申鐃緒申箸鐃緒申孫垰鐃緒申鐃緒申鐃緒申奪鐃緒申鐃緒申覆鐃緒申箸鐃緒申鐃� 鐃緒申鐃緒申呂鐃緒申襪縁申鐃宿￥申鐃緒申鐃夙関件申鐃緒申鐃緒申鐃藷がらが鐃緒申箸劼匹鐃緒申椶砲鐃緒申鐃緒申箸鐃緒申鐃緒申鐃緒申鐃緒申鐃楯ワ申鐃藷タと呼ぼわ申鐃緒申鐃緒申鐃夙と呼ぼわ申鐃緒申同鐃緒申鐃緒申鐃夙￥申鐃緒申鐃殉でわ申1鐃緒申鐃緒申鐃塾ワ申鐃緒申鐃塾逸申鐃緒申鐃緒申砲鐃緒申討鐃緒申鐃出よか鐃獣わ申鐃塾わ申鐃緒申鐃楯ワ申鐃緒申(鐃緒申鐃緒申)鐃緒申導鐃緒申鐃緒申鐃緒申襪鰹申箸如鐃� 鐃緒申鐃緒申的鐃緒申鐃縦逸申能鐃熟わ申必鐃竣になってわ申鐃殉っわ申鐃塾でわ申鐃緒申

鐃緒申鐃緒申匹鐃緒申鐃緒申鐃緒申鐃�鐃緒申鐃瞬ワ申鐃緒申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申念鐃熟￥申鐃竣ワ申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃瞬わ申鐃緒申張鐃緒申鐃緒申泪蠅�申鐃緒申鐃緒申鐃緒申鵑△鐃�鐃夙わ申鐃緒申鐃緒申念鐃緒申他鐃淑らず鐃緒申鐃夙わ申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃緒申鐃竣ワ申鐃緒申鐃緒申泙呂鐃緒申鐃緒申鐃緒申鵑△襯�申鐃緒申泪鐃塾常申鐃瞬わ申鐃縦逸申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃淑わ申鐃緒申个覆鐃淑わ申鐃塾でわ申鐃緒申鐃緒申鐃緒申蓮鐃緒申廛鐃緒申鐃緒申鐃緒申鐃淑ｏ申鐃緒申戮髻△鐃緒申鐃緒申箸濆鐃緒せ鐃塾随申鐃緒申鐃緒申鐃緒申鐃縦まわ申愎鐃緒申愎鐃重�申鐃緒申鐃緒申辰鐃緒申鐃緒申襪鰹申箸砲覆鐃殉わ申鐃緒申

鐃緒申鐃殉つわ申鐃緒申鐃緒申OO鐃緒申鐃緒申任蓮鐃�鐃楯ワ申鐃緒申侫鐃緒申鐃緒申鐃�鐃夙わ申鐃緒申鐃緒申能鐃祝わ申鐃� 適鐃術わ申鐃緒申鐃緒申続鐃緒申鐃緒申鐃緒申孫垰鐃緒申坊鐃殉わ申里任鐃緒申鐃緒申蕁� 鐃竣ワ申鐃緒申鐃緒申鐃塾ワ申鐃緒申鐃緒申鐃緒申鐃宿むこ鐃緒申(鐃緒申的鐃淑駕申鐃緒申)鐃熟まわ申鐃殉わ申鐃緒申鐃緒申砲覆辰討鐃緒申泙辰討鐃緒申泙鐃緒申鐃� C鐃淑どでは￥申鐃緒申鐃緒申愎鐃緒申離鐃緒申鐃緒申鐃緒申鐃緒申匹鐃楯￥申鐃緒申的鐃塾関随申鐃緒申鐃緒申匹鐃宿ん下位へと件申鐃緒申覆鐃銃わ申鐃緒申鐃出わ申鐃緒申鐃緒け鐃叔わ申鐃緒申鐃緒申 OO鐃緒申鐃緒申任蓮鐃� 鐃緒申鐃藷スワ申鐃藷スフワ申鐃緒申鐃緒申匹覆匹鐃緒申飮鐃緒申鐃緒申鐃銃わ申鐃暑オ鐃瞬ワ申鐃緒申鐃緒申鐃夙のメソ鐃獣ドわ申鐃銃ばわ申討鐃緒申鐃緒申蕁� 鐃緒申鐃塾ワ申鐃瞬ワ申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃緒申鐃緒申討鐃緒申鐃夙わ申鐃緒申鐃殉わ申鐃縮っわ申鐃宿わ申必鐃竣わ申鐃緒申鐃緒申泙鐃緒申鐃� 鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃縮っわ申鐃宿む、鐃縦まり、鐃宿の実行パワ申鐃緒申鐃縮ってわ申鐃緒申鐃緒申鐃処た鐃緒申鐃緒申探鐃暑こ鐃夙は￥申単鐃祝実行緒申鐃緒申匹鐃叔わ申鐃緒申鐃塾わ申鐃緒申戮動鐃緒申鐃重�申鐃緒申颪靴鐃緒申鐃塾でわ申鐃緒申鐃緒申鐃緒申鐃緒申匹鐃緒申鐃緒申鐃緒申鐃緒申鐃獣わ申探鐃緒申鐃緒申鐃銃わ申鐃緒申鐃瞬ワ申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃春緒申鐃� 鐃叔ワ申鐃緒申鐃緒申僖鐃緒申鐃緒申鐃�鐃淑んぞ使わ申鐃銃わ申鐃緒申鐃所す鐃緒申函鐃� 鐃緒申鐃緒申砲鐃緒申鐃緒申鐃緒申鐃縦刻申鐃塾刻申了呂泙鐃叔わ申鐃緒申

鐃緒申鐃巡、鐃殉わ申鐃緒申鐃緒申任癲�申鐃緒申屮鐃緒申鐃緒申鐃緒申箸離瓮緒申奪匹鐃緒申鐃緒申薀刻申箸鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申里鐃緒申鐃緒申鐃緒申鐃曙、鐃術常申鐃舜件申鐃盾ソ鐃緒申鐃緒申鐃緒申砲鐃緒申鐃緒申鐃夙居申鐃述わ申鐃緒申討鐃緒申鐃出￥申鐃殉わ申鐃緒申鐃緒申鐃宿わ申鐃緒申鐃夙わ申鐃叔わ申鐃緒申任鐃緒申腓�申鐃� 鐃緒申鐃緒申鐃緒申鐃緒申鐃竣ワ申鐃夙ワ申鐃緒申鐃竣ベ￥申鐃緒申鐃緒申OO鐃緒申鐃緒申任蓮鐃� 鐃緒申鐃初ス鐃緒申鐃緒申鐃緒申鐃塾わ申鐃緒申鐃緒申鐃緒申譴削申鐃緒申孫垰鐃緒申砲悗鐃緒申悗鐃緒申儔鐃緒申鐃緒申鐃緒申蠅刻申鐃塾でわ申鐃緒申

鐃殉わ申鐃緒申鐃緒申暴颪い鐃緒申茲�申法鐃緒申鐃緒申鐃緒申鐃緒申鐃塾ワ申鐃瞬ワ申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃緒申鐃緒申鐃淑常申鐃瞬わ申鐃緒申弔鐃緒申鐃� 鐃緒申鐃塾醐申鐃緒申鐃緒申颪靴鐃緒申里任鐃緒申鐃緒申鐃� 鐃緒申鐃緒申任皀�申屮鐃緒申鐃緒申鐃緒申箸亮鐃所う鐃緒申鐃緒申屬鐃� 鐃緒申鐃初ス鐃塾フワ申鐃緒申鐃緒申匹箸鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申里鐃緒申鐃緒申鐃緒申鐃緒申討鐃緒申鐃緒申鐃殉わ申鐃縦逸申鐃叔わ申鐃暑か鐃盾し鐃緒申泙鐃緒申鐃� 鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申砲鐃獣ては￥申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃緒申竜鐃叔緒申如鐃� 単鐃淑わ申鐃緒申鐃緒申鐃緒申鐃緒申竸鐃緒申里弔鐃緒申鐃緒申辰鐃緒申鐃塾わ申鐃緒申鐃縦の間にわ申鐃緒申鐃瞬わ申鐃緒申鐃� 鐃緒申鐃瞬ワ申鐃緒申鐃緒申鐃夙とわ申鐃銃逸申鐃緒申鐃銃わ申鐃殉っわ申鐃所し鐃殉わ申鐃緒申鐃緒申鐃緒申任蓮鐃緒申匹鐃緒申望鐃緒申屬鐃緒申鐃緒申鐃緒申鐃銃わ申鐃緒申里鐃緒申鐃緒申辰僂鐃緒か鐃緒申泙鐃緒申鐃�

鐃緒申鐃塾はよか鐃獣わ申鐃縦￥申

鐃夙￥申鐃緒申鐃緒申弔鐃緒申鐃獣佳�申鐃緒申襪�申覆鐃緒申里鐃緒申鐃祝￥申鐃緒申鐃緒申発鐃緒申鐃緒申鐃緒申鐃曙が鐃緒申BF-BASIC'n鐃竣でわ申鐃緒申

BF-BASIC'n鐃熟￥申鐃瞬醐申鐃緒申彁鐃緒申鐃緒申奮悗鐃緒申鐃竣と醐申鐃緒申鐃緒申Alan Turing 鐃緒申鐃粛案わ申鐃緒申鐃叔わ申廛鐃淳テワ申鐃瞬な件申鐃塾駕申鐃循マワ申鐃緒申両鐃祝￥申鐃緒申鐃緒申80年鐃緒申痢鐃緒申廛鐃緒申鐃緒申鐃淳ング醐申鐃緒申箸鐃緒申鐃緒申鐃�BASIC鐃緒申鐃獣わ申鐃緒申鐃緒申鐃� 雰鐃熟居申鐃緒申反鐃叔わ申鐃緒申鐃緒申鐃緒申鐃緒申任鐃緒申鐃� 鐃緒申鐃緒申鐃獣ワ申鐃緒申辧鐃緒申廚皀�申屮鐃緒申鐃緒申鐃緒申箸鐃楯ワ申鐃緒申侫鐃緒申鐃緒申鐃盾ク鐃緒申鐃緒申鐃緒申鐃緒申發�申鐃殉わ申鐃緒申鐃夙わ申錣縁申蘓器申圓砲箸辰董鐃緒申惱鐃緒申鐃緒申鐃緒申鐃殉にわ申鐃淑わ申鐃夙わ申鐃緒申鐃緒申味鐃叔￥申鐃緒申鐃塾よう鐃淑醐申鐃緒申砲禄鐃緒申廚憤鐃縮ｏ申鐃緒申鐃緒申鐃夙誌申漏凌鐃緒申鐃緒申討鐃緒申泙鐃緒申鐃�

鐃緒申鐃銃￥申鐃緒申鐃緒申鐃緒申鐃竣ワ申鐃緒申鐃緒申潺鵐宛鐃緒申鐃緒申鐃獣わ申鐃夙わ申鐃祝は￥申鐃殉わ申鐃緒申Hello World!鐃竣わ申表鐃緒申鐃緒申鐃緒申鐃銃みる、鐃夙わ申鐃緒申鐃塾わ申鐃緒申鐃緒申鐃所ー鐃叔わ申鐃順う鐃緒申 BF-BASIC'n鐃叔￥申鐃緒申Hello World!鐃緒申鐃緒申表鐃緒申鐃緒申鐃緒申鐃緒申廛鐃緒申鐃緒申鐃緒申離鐃緒申鐃緒申鐃緒申楼焚鐃緒申里茲�申砲覆鐃殉わ申鐃緒申

鐃緒申鐃楯ぽぽぽぽぽぽぽぽわ申鐃銃わ申里个棔鐃緒申鐃楯ぽぽぽぽぽぽぽわ申鐃俊なばびわ申鐃緒申鐃緒申
鐃出ぼ￥申鐃緒申檗鐃緒申鵑垢櫃櫃櫃櫃櫃櫃櫃鐃緒申討鐃塾ばぼ￥申鐃緒申櫃櫃櫃櫃鐃緒申咾覆个咾鐃緒申鐃緒申鐃�
鐃出ぼ￥申鐃緒申櫃檗鐃緒申鐃楯ぽぽぽぽぽぽぽ￥申鐃緒申檗鐃緒申鐃楯ぽぽぽ￥申鐃藷すてわ申里咾覆个咾鐃緒申鐃緒申鐃�
鐃緒申鐃楯ぽぽぽぽぽぽぽわ申鐃銃わ申里个棔鐃緒申鐃楯ぽぽぽわ申鐃俊なばびわ申鐃緒申鐃緒申
鐃出ぼ￥申鐃緒申檗鐃緒申鵑垢櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃鐃緒申討鐃塾ばぼ￥申鐃緒申櫃櫃櫃櫃櫃鐃緒申咾覆个咾鐃緒申鐃緒申鐃�
鐃出ぼ￥申鐃緒申檗鐃緒申鵑垢櫃櫃櫃櫃櫃櫃櫃櫃鐃緒申討鐃塾ばぼ￥申鐃緒申櫃櫃櫃鐃緒申咾覆个咾鐃緒申鐃緒申鐃�
鐃出ぼ￥申鐃緒申檗鐃緒申鐃楯ぽぽぽ￥申鐃緒申咾咾咾咾咾咾檗鐃緒申鐃俊びびびびびびびぽ￥申鐃緒申
鐃緒申鐃銃わ申里咾覆个咾鐃緒申鐃緒申鵑垢櫃櫃櫃櫃櫃櫃櫃櫃鐃緒申討鐃塾ばぼ￥申鐃緒申櫃櫃櫃櫃鐃緒申咾覆个咾鐃緒申鐃緒申鐃�
鐃出ぼ￥申鐃緒申櫃檗鐃緒申鵑垢討鐃塾びなばびわ申鐃緒申鐃緒申櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃檗鐃緒申鐃�

鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申里鐃縮居申鐃叔はわ申鐃緒申泙鐃緒申鐃緒申鐃�BF-BASIC'n鐃緒申鐃竣わ申鐃緒申法鐃� 鐃緒申鐃遵ー鐃緒申鵐哀泪鐃緒申鐃緒申鐃緒申鐃塾プワ申鐃緒申鐃緒申潺鵐宛鐃緒申鐃叔わ申鐃緒申Brainfuck鐃緒申鐃瞬べ￥申鐃緒申鐃獣件申鐃竣わ申味鐃春わ申鐃緒申鐃宿加わ申鐃緒申鐃緒申里任鐃緒申鐃�

Brainfuck鐃祝つわ申鐃銃の駕申鐃緒申呂鐃緒申鐃緒申蕕�申錣�申鐃巡す鐃緒申鐃叔わ申鐃順う鐃緒申

K.INABA鐃緒申鐃緒申痢鐃�鐃緒申鐃緒申鐃緒申覆鐃緒申鐃� @ 鐃粛刻申鐃緒申鐃緒申鐃緒申鐃緒申鐃竣わ申Brainf*ck鐃塾ペ￥申鐃緒申鐃緒申

http://www.kmonos.net/alang/etc/brainfuck.php

Wikipedia鐃叔わ申鐃緒申鐃緒申鐃熟わ申鐃緒申鐃初。

http://ja.wikipedia.org/wiki/Brainfuck

鐃緒申鐃緒申鐃緒申鐃瞬べ￥申鐃緒申鐃獣件申鐃竣わ申Wikipedia鐃叔わ申鐃緒申鐃緒申鐃熟わ申鐃緒申鐃初。

http://ja.wikipedia.org/wiki/%E3%81%B9%E3%83%BC%E3%81%97%E3%81%A3%E5%90%9B

鐃瞬べ￥申鐃緒申鐃獣件申鐃竣わ申雰鐃熟居申鐃緒申弔鐃緒申鐃淑ら、鐃瞬わ申鐃塾みわ申鐃緒申廚里鐃緒申鐃緒申鐃塾ペ￥申鐃緒申鐃塾ほわ申鐃緒申鐃処い鐃緒申鐃盾し鐃緒申泙鐃緒申鐃�

http://www.tanomi.com/shop/jyuchu/items01064.html

Brainfuck鐃緒申BF-BASIC'n鐃塾ト￥申鐃緒申鐃緒申鐃緒申弍鐃緒申佞鐃緒申楼焚鐃緒申里茲�申砲覆鐃殉わ申鐃緒申

Brainfuck	BF-BASIC'n
>	鐃緒申
<	鐃出ぼ￥申鐃緒申
+	鐃緒申
-	鐃緒申
.	鐃楯￥申鐃緒申
,	鐃緒申鐃緒申鐃緒申鐃�
[	鐃緒申鐃銃わ申鐃�
]	鐃淑ばびわ申鐃緒申鐃緒申

BF-BASIC'n鐃塾ワ申鐃緒申鐃緒申鐃熟わ申鐃緒申鐃初。

  1: #include <stdio.h>
  2: #include <string.h>
  3: #include <stdlib.h>
  4: #include <ctype.h>
  5: #include <assert.h>
  6: 
  7: typedef struct {
  8:     int bf;
  9:     char *basicn;
 10: } Conv;
 11: 
 12: static Conv st_conv[] = {
 13:     {'>', "鐃緒申"},
 14:     {'<', "鐃出ぼ￥申鐃緒申"},
 15:     {'+', "鐃緒申"},
 16:     {'-', "鐃緒申"},
 17:     {'.', "鐃楯￥申鐃緒申"},
 18:     {',', "鐃緒申鐃緒申鐃緒申鐃�"},
 19:     {'[', "鐃緒申鐃銃わ申鐃�"},
 20:     {']', "鐃淑ばびわ申鐃緒申鐃緒申"},
 21: };
 22: 
 23: typedef struct {
 24:     int bf_code;
 25:     int address;
 26: } BfCode;
 27: 
 28: static BfCode st_bf_code[10000];
 29: static int st_code_count;
 30: 
 31: static int
 32: compare_conv(const void *a, const void *b)
 33: {
 34:     return strlen(((Conv*)b)->basicn) - strlen(((Conv*)a)->basicn);
 35: }
 36: 
 37: static void
 38: sort_conv_table(Conv *table, int table_count)
 39: {
 40:     qsort(table, table_count, sizeof(Conv), compare_conv);
 41: }
 42: 
 43: static void
 44: read_source(FILE *fp)
 45: {
 46:     unsigned char line[4096];
 47:     int i;
 48:     int j;
 49:     int code_idx = 0;
 50:     int stack[256];
 51:     int sp = 0;
 52: 
 53:     while ((fgets(line, 4096, fp)) != NULL) {
 54:         for (i = 0; line[i] != '\0'; ) {
 55:             if (isspace(line[i])) {
 56:                 i++;
 57:                 continue;
 58:             }
 59: 
 60:             for (j = 0; j < sizeof(st_conv)/sizeof(Conv); j++) {
 61:                 int len = strlen(st_conv[j].basicn);
 62:                 if (!strncmp(&line[i], st_conv[j].basicn, len)) {
 63:                     st_bf_code[code_idx].bf_code = st_conv[j].bf;
 64: 
 65:                     if (st_conv[j].bf == '[') {
 66:                         stack[sp] = code_idx;
 67:                         sp++;
 68:                     } else if (st_conv[j].bf == ']') {
 69:                         st_bf_code[stack[sp-1]].address = code_idx;
 70:                         st_bf_code[code_idx].address = stack[sp-1];
 71:                         sp--;
 72:                         if (sp < 0) {
 73:                             fprintf(stderr, "bracket mismatch\n");
 74:                             exit(2);
 75:                         }
 76:                     }
 77:                     code_idx++;
 78:                     i += len;
 79:                     break;
 80:                 }
 81:             }
 82:             if (j == sizeof(st_conv)/sizeof(Conv)) {
 83:                 fprintf(stderr, "syntax error\n");
 84:                 exit(2);
 85:             }
 86:         }
 87:     }
 88:     if (sp != 0) {
 89:         fprintf(stderr, "bracket mismatch\n");
 90:         exit(2);
 91:     }
 92: 
 93:     st_code_count = code_idx;
 94: }
 95: 
 96: static void
 97: interpret(void)
 98: {
 99:     int pc;
100:     int array[65536];
101:     int p = 0;
102: 
103:     for (pc = 0; pc < st_code_count; pc++) {
104:         switch (st_bf_code[pc].bf_code) {
105:         case '>':
106:             p++;
107:             break;
108:         case '<':
109:             p--;
110:             break;
111:         case '+':
112:             array[p]++;
113:             break;
114:         case '-':
115:             array[p]--;
116:             break;
117:         case '.':
118:             putchar(array[p]);
119:             break;
120:         case ',':
121:             array[p] = getchar();
122:             break;
123:         case '[':
124:             if (!array[p]) {
125:                 pc = st_bf_code[pc].address;
126:             }
127:             break;
128:         case ']':
129:             pc = st_bf_code[pc].address - 1;
130:             break;
131:         default:
132:             assert(0);
133:         }
134:     }
135: }
136: 
137: 
138: int
139: main(int argc, char **argv)
140: {
141:     FILE *in_fp;
142: 
143:     sort_conv_table(st_conv, sizeof(st_conv)/sizeof(Conv));
144: 
145:     if (argc == 2) {
146:         in_fp = fopen(argv[1], "r");
147:         if (in_fp == NULL) {
148:             fprintf(stderr, "%s not found.\n", argv[1]);
149:             exit(1);
150:         }
151:     } else {
152:         fprintf(stderr, "Usage:%s filename\n", argv[0]);
153:         exit(1);
154:     }
155: 
156:     read_source(in_fp);
157:     interpret();
158: 
159:     return 0;
160: }

Windows鐃緒申鐃緒申鐃渋行件申鐃緒申鐃熟わ申鐃緒申鐃初。

bfbasicn.lzh

鐃銃種サ鐃緒申廛襯緒申鐃緒申鐃�

鐃渋は常申乃鵑欧鐃�hello, world.鐃熟￥申 K.INABA鐃緒申鐃緒申離據鐃緒申鐃緒申離鐃緒申鐃緒申鐃緒申鮓気砲鐃緒申鐃緒申鐃塾なのでわ申鐃緒申鐃緒申鐃巡が鐃緒申分鐃叔書いわ申hello, world.(K&R鐃緒申鐃緒申鐃緒申鐃祝緒申鐃緒申鐃緒申鐃緒申奪鐃緒申鐃緒申鐃緒申鐃淑醐申鐃緒申砲鐃緒申鐃�)鐃緒申鐃緒申鐃緒申鐃淑わ申泙鐃緒申鐃緒申鐃�

鐃緒申鐃楯ぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽわ申鐃銃わ申里个棔鐃緒申鐃楯ぽぽぽぽぽわ申鐃俊なばびわ申鐃緒申鐃緒申
鐃出ぼ￥申鐃緒申櫃櫃櫃櫃櫃櫃櫃櫃檗鐃緒申鐃俊びびぽ￥申鐃緒申櫃櫃櫃櫃櫃櫃櫃檗鐃緒申鐃楯￥申鐃緒申
鐃楯ぽぽぽ￥申鐃藷すぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽぽわ申鐃銃わ申里鐃緒申櫃櫃个棔鐃緒申鐃俊なばびわ申鐃緒申鐃緒申
鐃緒申鐃楯ぽぽぽぽぽぽぽぽぽぽぽぽ￥申鐃緒申咾咾咾咾咾咾咾咾咾咾咾咾檗鐃緒申鐃�
鐃出ぼ￥申鐃緒申个棔鐃緒申鐃楯ぽぽぽぽぽぽぽぽ￥申鐃緒申咾咾咾咾咾咾咾咾檗鐃緒申鐃楯ぽぽぽ￥申鐃緒申
鐃俊びびびびびぽ￥申鐃緒申咾咾咾咾咾咾咾咾檗鐃緒申鵑垢鐃緒申櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃櫃檗鐃緒申鐃�

鐃緒申鐃殉わ申鐃緒申鐃緒申鐃獣わ申鐃熟醐申半鐃緒申単調鐃叔￥申

鐃夙わ申鐃緒申鐃叔￥申鐃渋のとわ申鐃緒申Brainfuck鐃塾ト￥申鐃緒申鐃緒申鐃緒申峇鐃緒申鐃緒申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃塾わ申鐃縮に誌申鐃緒申鐃緒申呂任呂覆鐃緒申鐃� 萌鐃緒申鐃夙わ申鐃緒申鐃緒申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申鐃淑醐申鐃緒申鐃塾わ申2ch鐃緒申由鐃叔醐申鐃緒申鐃緒申鐃緒申鐃緒申鐃夙わ申鐃緒申鐃緒申泙鐃緒申鐃� (鐃叔駈申探鐃緒申鐃緒申鐃緒申鐃宿醐申鐃縦わ申鐃緒申泙鐃緒申鐃叔わ申鐃緒申)鐃緒申他鐃祝わ申同鐃粛の誌申澆呂鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申襪鰹申箸任鐃緒申腓�申鐃�

鐃殉わ申鐃緒申鐃獣わ申鐃緒申鐃緒申鐃緒申鐃熟わ申鐃獣てみわ申鐃緒申鐃夙でわ申鐃緒申鐃緒申鐃術器申鐃銃￥申鐃瞬ワ申鐃淑駕申鐃塾よう鐃祝削申鐃緒申鐃舜わ申鐃緒申函鐃�

static Conv st_conv[] = {
  {'>', "鐃緒申"},
  {'<', "鐃緒申鐃竣わ申!!"},
  {'+', "鐃緒申"},
  {'-', "鐃循わ申鐃緒申"},
  {'.', "鐃述でぶわ申"},
  {',', "鐃緒申鐃緒申鐃熟もう鐃緒申鐃叔わ申鐃緒申 "},
  {'[', "鐃緒申鐃緒申鐃�!!"},
  {']', "鐃緒申鐃駿わ申!!"},
};

鐃遵記鐃緒申hello, world.鐃竣はわ申鐃緒申鐃淑わ申泙鐃緒申鐃�

鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃緒申鐃緒申鐃�!!
鐃緒申鐃竣わ申!!
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃循わ申鐃緒申
鐃緒申鐃駿わ申!!
鐃緒申鐃竣わ申!!
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申
鐃述でぶわ申
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃述でぶわ申
鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃緒申鐃緒申鐃�!!
鐃緒申鐃緒申鐃緒申
鐃緒申鐃竣わ申!!
鐃循わ申鐃緒申
鐃緒申鐃駿わ申!!
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申
鐃述でぶわ申
鐃緒申鐃竣わ申!!
鐃緒申鐃竣わ申!!
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申
鐃述でぶわ申
鐃緒申鐃緒申鐃緒申
鐃述でぶわ申
鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申
鐃述でぶわ申
鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申鐃循わ申鐃緒申
鐃述でぶわ申
鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申鐃緒申
鐃述でぶわ申

鐃殉わ申鐃緒申鐃淑駕申鐃塾よう鐃緒申鐃瞬わ申鐃緒申鐃緒申鐃緒申弌鐃�

static Conv st_conv[] = {
    {'>', "鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!"},
    {'<', "燃鐃緒申鐃縦わ申鐃緒申曚疋辧鐃緒申鐃�!!"},
    {'+', "鐃緒申鐃緒申"},
    {'-', "無鐃緒申"},
    {'.', "鐃緒申!"},
    {',', "鐃緒申鐃緒申鐃緒申鐃緒申"},
    {'[', "鐃緒申鐃殉わ申鐃塾種申鐃塾ワ申鐃緒申佞蓮鐃�"},
    {']', "鐃竣とわ申鐃緒申!"},
};

鐃緒申鐃緒申鐃淑わ申泙鐃緒申鐃�

鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!
鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃緒申
鐃緒申鐃殉わ申鐃塾種申鐃塾ワ申鐃緒申佞蓮鐃叔鰹申鐃緒申弔鐃緒申鐃循どヒ￥申鐃緒申!!鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃緒申
鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!無鐃縮」とわ申鐃緒申!
燃鐃緒申鐃縦わ申鐃緒申曚疋辧鐃緒申鐃�!!鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初ァ!
無鐃緒申無鐃緒申無鐃縮ワ申!
鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初ァ!鐃緒申!
鐃緒申鐃初オ鐃初オ鐃初ァ!鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!
鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃緒申
鐃緒申鐃殉わ申鐃塾種申鐃塾ワ申鐃緒申佞蓮屬佞襪�申襪常申蓮鐃緒申鐃�!鐃緒申鐃初オ鐃緒申燃鐃緒申鐃縦わ申鐃緒申曚疋辧鐃緒申鐃�!!無鐃縮」とわ申鐃緒申!
鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初ァ!
無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃縮ワ申!
燃鐃緒申鐃縦わ申鐃緒申曚疋辧鐃緒申鐃�!!燃鐃緒申鐃縦わ申鐃緒申曚疋辧鐃緒申鐃�!!鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初ァ!
無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃縮ワ申!
鐃緒申鐃初オ鐃初オ鐃初ァ!
無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃縮ワ申!
無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃緒申無鐃縮ワ申!
鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!
鐃春るえ鐃暑ぞ鐃熟￥申鐃緒申!
鐃緒申鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初オ鐃初ァ!

鐃初イ鐃緒申鐃藷スにつわ申鐃緒申

鐃緒申BF-Basic'n鐃竣わ申鐃緒申鐃緒申椒據鐃緒申鐃緒申乃鵑欧鐃緒申鐃緒申戮討離廛鐃緒申鐃緒申鐃緒申鐃� 鐃術器申鐃銃￥申鐃瞬ワ申里離薀わ申鐃緒申鵐垢蓮鐃� NYSL Version 0.9982鐃夙わ申鐃殉わ申鐃緒申

鐃緒申鐃緒申鐃循わ申鐃緒申里癲�申儡鐃緒申董鐃緒申屮鐃薯差わ申鐃舜わ申鐃銃種申鐃緒申鐃緒申鐃夙わ申鐃銃醐申鐃緒申鐃緒申鐃緒申里鐃� 鐃緒申鐃緒申鐃祝種申由鐃叔わ申鐃緒申

鐃緒申鐃塾誌申鐃緒申 | 鐃述とつ常申離據鐃緒申鐃緒申鐃緒申鐃緒申 | 鐃夙ップペ￥申鐃緒申鐃緒申鐃緒申鐃�