logo字母,这个问题有什么好的解决方案？
问题描述：
遇到logo字母这个问题怎么办？车友们有没有什么好的办法吗？
答
不好意思，我只会第1.2.5题。
1.TO A :W
IF EMPTY? :W [OP "]
IF NUMBER? FIRst :W [OP WORD FIRST :W A BF :W][OP A BF :W]
END (注意：:W是一个字)
2.TO B :L :NL1 :NL2
IF EMPTY? :L [(SHOW :NL1 :NL2)STOP]
IF NUMBER? FIRST :L[B BF :L SE :NL1 FIRST :L :NL2][B BF :L :NL1 SE :NL2 FIRST :L]
END (注意：执行时:NL1和:NL2都给空表，:L是一个单表)
TO E :W :Z
IF EMPTY? :W [OP :Z]
IF noT NUMBER? FIRST :W [OP WORD :Z (F :W ")]
OP E BF :W WORD FIRST :W :Z
END
TO F :W :Z
IF EMPTY? :W [OP :Z]
IF NUMBER? FIRST :W [OP WORD :Z (E :W ")]
OP F BF :W WORD FIRST :W :Z
END (注意：可以执行E也可以执行F，:Z给的值是空字。过程E和F是互相调用，不分主、子)
我在电脑上试过了，100%正确！
祝您学习进步!
1.TO A :W
IF EMPTY? :W [OP "]
IF NUMBER? FIRst :W [OP WORD FIRST :W A BF :W][OP A BF :W]
END (注意：:W是一个字)
2.TO B :L :NL1 :NL2
IF EMPTY? :L [(SHOW :NL1 :NL2)STOP]
IF NUMBER? FIRST :L[B BF :L SE :NL1 FIRST :L :NL2][B BF :L :NL1 SE :NL2 FIRST :L]
END (注意：执行时:NL1和:NL2都给空表，:L是一个单表)
TO E :W :Z
IF EMPTY? :W [OP :Z]
IF noT NUMBER? FIRST :W [OP WORD :Z (F :W ")]
OP E BF :W WORD FIRST :W :Z
END
TO F :W :Z
IF EMPTY? :W [OP :Z]
IF NUMBER? FIRST :W [OP WORD :Z (E :W ")]
OP F BF :W WORD FIRST :W :Z
END (注意：可以执行E也可以执行F，:Z给的值是空字。过程E和F是互相调用，不分主、子)
我在电脑上试过了，100%正确！
祝您学习进步!