五、車進二 、將進一
六、抽車炮退一、包進x
七、車退一、將退一
八、車進x
如包退y,
where y=x、車退(x+1),無棋
where y=x+1,車平四,無棋
where y<x、車退y,loop至可以
車平四,車平五,抽包為止
(包不能進)
——————
五、車進二 、將進一
六、抽車炮退一、包進x
七、車退一、將進一
八、車進x
如包退y,
where y=x,車退(x-1),無棋
where y=x-1,車平四,無棋
where y=x+1,包平六(危機解??)
where y<x+1,車退y,loop至可以
車平四,車平五,抽包為止
(包不能進)
[ 本帖最後由 dye 於 2007-6-25 11:54 編輯 ] |