For Beginners & Professional Hackers

home *** CD-ROM | disk | FTP | other *** search

/ For Beginners & Professional Hackers / cd.iso / docum / astf.doc / lang.doc < prev next >

Wrap

Text File | 1990-04-26 | 170.7 KB | 3,960 lines

Ç¡¡«Γáµ¿∩ ä¿á½«ú«óá∩ ß¿ßΓÑ¼á »α«úαá¼¼¿α«óá¡¿∩ ÇßΓα«öÄÉÆ ¡á íáºÑ ∩ºδ¬á öÄÉÆ-83 «Γ¡«ß¿Γß∩ ¬ ¬½áßßπ »α«í½Ñ¼¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¡«ú« «íÑß»ÑτÑ¡¿∩, »αÑñ¡áº¡áτÑ¡¡«ú« ñ½∩ αáºαáí«Γ¬¿ »α«úαá¼¼¡δσ ß¿ßΓÑ¼ Φ¿α«¬«ú« ¡áº¡áτÑ¡¿∩ - áóΓ«¼áΓ¿º¿α«óá¡¡δσ αáí«τ¿σ ¼ÑßΓ, ñ¿á½«ú«óδσ ß¿ßΓÑ¼ ¿ Γ.ñ. é ñá¡¡«¼ ñ«¬π¼Ñ¡ΓÑ »α¿ó«ñ¿Γß∩ «»¿ßá¡¿Ñ óσ«ñ¡«ú« ∩ºδ¬á ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ. äá¡¡δ⌐ ∩ºδ¬ »αÑñßΓáó½∩ÑΓ ß«í«⌐ αáßΦ¿αÑ¡¿Ñ ∩ºδ¬á öÄÉÆ-83 ßÑαó¿ß¡δ¼¿ ßαÑñßΓóá¼¿. é ∩ºδ¬ ó¬½ετÑ¡δ ß½«óá, »αÑñ¡áº¡áτÑ¡¡δÑ ñ½∩ «αúá¡¿ºáµ¿¿ ¼¡«ú««¬«¡¡«ú« »«½∞º«óáΓÑ½∞ß¬«ú« ¿¡ΓÑαΣÑ⌐ßá, ¼¡«ú«ºáñáτ¡«⌐ αáí«Γδ, ¿¡ΓÑαΣÑ⌐ßá ß «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼«⌐, ¿ß»«½∞º«óá¡¿∩ ó«º¼«ª¡«ßΓÑ⌐ á»»áαáΓπαδ »Ñαß«¡á½∞¡δσ ¬«¼»∞εΓÑα«ó, ß«ó¼ÑßΓ¿¼δσ ß ¼áΦ¿¡á¼¿ ßÑ¼Ñ⌐ßΓóá IBM PC. æ«ñÑαªá¡¿Ñ 1. éóÑñÑ¡¿Ñ ............................................ 2. ÄíΘÑÑ «»¿ßá¡¿Ñ ∩ºδ¬á ................................ 3. æΓÑ¬ ñá¡¡δσ ¿ »«ßΓΣ¿¬ß¡á∩ ¡«Γáµ¿∩ ................... 4. Ä»Ñαáµ¿¿ ¡áñ ßΓÑ¬«¼ ................................. 5. ä«ßΓπ» ¬ »á¼∩Γ¿ ..................................... 6. Çα¿Σ¼ÑΓ¿τÑß¬¿Ñ «»Ñαáµ¿¿ ............................. 7. ï«ú¿τÑß¬¿Ñ «»Ñαáµ¿¿ ................................. 8. Ä»Ñαáµ¿¿ ßαáó¡Ñ¡¿∩ .................................. 9. æΓαπ¬Γπαδ π»αáó½Ñ¡¿∩ ................................ 10. éó«ñ ñá¡¡δσ ......................................... 11. éδó«ñ ¿¡Σ«α¼áµ¿¿ .................................... 12. Ä»αÑñÑ½∩εΘ¿Ñ ß½«óá .................................. 13. Å«½∞º«óáΓÑ½∞ß¬¿⌐ «¬«¡¡δ⌐ ¿¡ΓÑαΣÑ⌐ß .................. 14. Éáí«Γá ß ó¡ÑΦ¡Ñ⌐ »á¼∩Γ∞ε ............................ 15. ô»αáó½Ñ¡¿Ñ óδó«ñ«¼ ¡á ñ¿ß»½Ñ⌐ ....................... 16. ê¡ΓÑα»αÑΓáµ¿∩ ¿ ¬«¼»¿½∩µ¿∩ .......................... 17. Éáí«Γá ß« ß½«óáα∩¼¿ ................................. 18. ê¡ΓÑα»αÑΓáµ¿∩ óσ«ñ¡«ú« »«Γ«¬á ....................... 19. Äíαáí«Γ¬á »αÑαδóá¡¿⌐ ................................ 20. ê¡ΓÑαΣÑ⌐ß ß Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐ äÄæ ................... 21. ÅÑαÑτÑ¡∞ ßßδ½«τ¡δσ ñ«¬π¼Ñ¡Γ«ó ....................... Åα¿½«ªÑ¡¿Ñ 1. â½«ßßáα¿⌐ ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ ............... 1. éóÑñÑ¡¿Ñ æ¿ßΓÑ¼á ÇßΓα«öÄÉÆ «Γ¡«ß¿Γß∩ ¬ ¬½áßßπ »α«í½Ñ¼¡«-«α¿Ñ¡Γ¿α«óá¡¡«ú« »α«úαá¼¼¡«ú« «íÑß»ÑτÑ¡¿∩, »αÑñ¡áº¡áτÑ¡¡«ú« ñ½∩ αáºαáí«Γ¬¿ »α«úαá¼¼¡δσ ß¿ßΓÑ¼ Φ¿α«¬«ú« ¡áº¡áτÑ¡¿∩ - ñ¿á½«ú«óδσ ß¿ßΓÑ¼, áóΓ«¼áΓ¿º¿α«óá¡¡δσ αáí«τ¿σ ¼ÑßΓ ¿ Γ.». æ¿ßΓÑ¼á »αÑñ¡áº¡áτÑ¡á ñ½∩ φ¬ß»½πáΓáµ¿¿ ¡á »Ñαß«¡á½∞¡δσ ¬«¼»∞εΓÑαáσ, ß«ó¼ÑßΓ¿¼δσ ß ¼áΦ¿¡á¼¿ ßÑ¼Ñ⌐ßΓóá IBM PC. éσ«ñ¡δ¼ ∩ºδ¬«¼ ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ ∩ó½∩ÑΓß∩ ∩ºδ¬ öÄÉÆ. ƒºδ¬ öÄÉÆ »αÑñßΓáó½∩ÑΓ ß«í«⌐ αáºó¿Γδ⌐ ∩ºδ¬ »α«úαá¼¼¿α«óá¡¿∩, »αÑñ¡áº¡áτÑ¡¡δ⌐ ñ½∩ ß«ºñá¡¿∩ ß¿ßΓÑ¼¡«ú« ¿ »α¿¬½áñ¡«ú« »α«úαá¼¼¡«ú« «íÑß»ÑτÑ¡¿∩. ÇßΓα«öÄÉÆ ∩ó½∩ÑΓß∩ αÑá½¿ºáµ¿Ñ⌐ ßΓá¡ñáαΓá ∩ºδ¬á öÄÉÆ-83 [1], αáºαáí«Γá¡¡«ú« ó 1983 ú«ñπ, ¿ »«¼¿¼« ßαÑñßΓó, «»αÑñÑ½∩Ñ¼δσ ñá¡¡δ¼ ßΓá¡ñáαΓ«¼, ó¬½ετáÑΓ ó ßÑí∩ ¡áí«α αáßΦ¿αÑ¡¿⌐, »αÑñ¡áº¡áτÑ¡¡δσ ñ½∩ áóΓ«¼áΓ¿ºáµ¿¿ ß«ºñá¡¿∩ »α«í½Ñ¼¡«-«α¿Ñ¡Γ¿α«óá¡¡δσ ß¿ßΓÑ¼ αáº½¿τ¡«ú« ¡áº¡áτÑ¡¿∩. 2. ÄíΘÑÑ «»¿ßá¡¿Ñ ∩ºδ¬á ƒºδ¬ öÄÉÆ «α¿Ñ¡Γ¿α«óá¡ ¡á ñ¿á½«ú«óπε αáí«Γπ. Äß¡«ó¡δ¼ »«¡∩Γ¿Ñ¼ ∩ºδ¬á ∩ó½∩ÑΓß∩ "ß½«ó«" (¿¡«úñá ¡áºδóáÑ¼«Ñ öÄÉÆ-ß½«ó«¼ ¿½¿ öÄÉÆ-«»αÑñÑ½Ñ¡¿Ñ¼). èáªñ«¼π öÄÉÆ-ß½«óπ ß««ΓóÑΓßΓóπÑΓ ¡Ñ¬«Γ«α«Ñ óδ»«½¡∩Ñ¼«Ñ ñÑ⌐ßΓó¿Ñ (¬«¼á¡ñá). çá»¿ß∞ Γá¬«⌐ ¬«¼á¡ñδ ß«ßΓ«¿Γ ¿º ¼¡Ñ¼«¡¿τÑß¬«ú« «í«º¡áτÑ¡¿∩ - ¿¼Ñ¡¿ ß½«óá - ó ¬áτÑßΓóÑ ¬«Γ«α«ú« ¼«ªÑΓ ß½πª¿Γ∞ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ »α«¿ºó«½∞¡δσ ß¿¼ó«½«ó, ¡Ñ ß«ñÑαªáΘá∩ »α«íÑ½«ó. ä½¿¡á ¿¼Ñ¡¿ ¡Ñ ñ«½ª¡á »αÑóδΦáΓ∞ 31 ß¿¼ó«½á. Åα«úαá¼¼á ¡á öÄÉÆÑ, ó ßó«ε «τÑαÑñ∞, »αÑñßΓáó½∩ÑΓ ß«í«⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ öÄÉÆ-ß½«ó, αáºñÑ½∩Ñ¼δσ ¼Ñªñπ ß«í«ε »α«¿ºó«½∞¡δ¼ τ¿ß½«¼ »α«íÑ½«ó ¿½¿ ß¿¼ó«½«ó »ÑαÑσ«ñá ¡á ¡«óπε ßΓα«¬π. æ½«óá »α¿ óδ»«½¡Ñ¡¿¿ ¼«úπΓ «í¼Ñ¡¿óáΓ∞ß∩ ñá¡¡δ¼¿, ß¡¿¼á∩ áαúπ¼Ñ¡Γδ ¿ «ßΓáó½∩∩ αÑºπ½∞ΓáΓδ ¡á ßΓÑ¬Ñ ñá¡¡δσ. æΓá¡ñáαΓ ∩ºδ¬á öÄÉÆ-83 »αÑñπß¼áΓα¿óáÑΓ ¡áí«α ß½«ó ñ½∩ ¼á¡¿»π½¿α«óá¡¿∩ φ½Ñ¼Ñ¡Γá¼¿ ßΓÑ¬á ñá¡¡δσ, óδ»«½¡Ñ¡¿∩ áα¿Σ¼ÑΓ¿τÑß¬¿σ ¿ ½«ú¿τÑß¬¿σ «»Ñαáµ¿⌐, ñ«ßΓπ»á ¬ «»ÑαáΓ¿ó¡«⌐ ¿ ó¡ÑΦ¡Ñ⌐ »á¼∩Γ¿, óó«ñá ¿ óδó«ñá ¿¡Σ«α¼áµ¿¿ ¡á ó¡ÑΦ¡¿Ñ πßΓα«⌐ßΓóá, ß½«óá ñ½∩ «»αÑñÑ½Ñ¡¿∩ ¡«óδσ »«¡∩Γ¿⌐ ¿ ñα. éδτ¿ß½¿ΓÑ½∞¡á∩ ¼«ñÑ½∞ öÄÉÆ-ß¿ßΓÑ¼δ ó¬½ετáÑΓ ó ßÑí∩ áñαÑß¡«Ñ »α«ßΓαá¡ßΓó« «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿ «íΩÑ¼«¼ 64è íá⌐Γ, ó¡ÑΦ¡Ñ⌐ (φ¬αá¡¡«⌐) »á¼∩Γ¿ ¡á ñ¿ß¬áσ «íΩÑ¼«¼ ñ« 32è í½«¬«ó αáº¼Ñα«¼ »« 1è íá⌐Γ ¬áªñδ⌐ ¿ ΓÑα¼¿¡á½á. é »αÑñÑ½áσ áñαÑß¡«ú« »α«ßΓαá¡ßΓóá öÄÉÆ-ß¿ßΓÑ¼δ αáß»«½áúáÑΓß∩ ß½«óáα∞ öÄÉÆ-«»αÑñÑ½Ñ¡¿⌐, ßΓÑ¬ ñá¡¡δσ, ßΓÑ¬ ó«ºóαáΓ«ó, íπΣÑα ñ½∩ óó«ñá ΓÑ¬ßΓá ß ΓÑα¼¿¡á½á ¿ íπΣÑα ñ½∩ «í¼Ñ¡«ó ß ó¡ÑΦ¡Ñ⌐ »á¼∩Γ∞ε. æΓÑ¬ ñá¡¡δσ ¿ß»«½∞ºπÑΓß∩ ñ½∩ »ÑαÑñáτ¿ »áαá¼ÑΓα«ó ¿ αÑºπ½∞ΓáΓ«ó ¼Ñªñπ óδ»«½¡∩Ñ¼δ¼¿ ß½«óá¼¿. æΓÑ¬ ñá¡¡δσ αáß»«½áúáÑΓß∩ ó ßΓáαΦ¿σ áñαÑßáσ «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿ ¿ αáßΓÑΓ ó ¡á»αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó. ¥½Ñ¼Ñ¡Γá¼¿ ßΓÑ¬á ∩ó½∩εΓß∩ ñóπσíá⌐Γ«óδÑ º¡áτÑ¡¿∩, ¬«Γ«αδÑ ¼«úπΓ Γαá¬Γ«óáΓ∞ß∩ öÄÉÆ-ß½«óá¼¿ αáº½¿τ¡δ¼ «íαáº«¼ - ¡á»α¿¼Ñα, ¬á¬ µÑ½δÑ τ¿ß½á ß« º¡á¬«¼, »«½«ª¿ΓÑ½∞¡δÑ áñαÑßá «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿, 16-αáºα∩ñ¡δÑ ñó«¿τ¡δÑ º¡áτÑ¡¿∩. æΓÑ¬ ó«ºóαáΓ«ó ¿¼ÑÑΓ ßΓαπ¬Γπαπ, á¡á½«ú¿τ¡πε ßΓαπ¬ΓπαÑ ßΓÑ¬á ñá¡¡δσ ¿ ¿ß»«½∞ºπÑΓß∩ öÄÉÆ-ß¿ßΓÑ¼«⌐ «ß«íδ¼ «íαáº«¼ »α¿ óδ»«½¡Ñ¡¿¿ öÄÉÆ-»α«úαá¼¼. ìáτá½∞¡πε τáßΓ∞ áñαÑß¡«ú« »α«ßΓαá¡ßΓóá ºá¡¿¼áÑΓ ß½«óáα∞, ß«ñÑαªáΘ¿⌐ öÄÉÆ-«»αÑñÑ½Ñ¡¿∩ ó« ó¡πΓαÑ¡¡Ñ¼ ó¿ñÑ (ß½«óáα¡δÑ ßΓáΓ∞¿) ¿ αáº½¿τ¡δÑ ñá¡¡δÑ. æ½«óáα∞ »« ¼ÑαÑ »«»«½¡Ñ¡¿∩ ¿ßσ«ñ¡«ú« ¡áí«αá ß½«ó öÄÉÆ-ß¿ßΓÑ¼δ αáßΓÑΓ ó ßΓ«α«¡π πóÑ½¿τÑ¡¿∩ áñαÑß«ó. é ßΓáαΦ¿σ áñαÑßáσ »á¼∩Γ¿ öÄÉÆ-ß¿ßΓÑ¼δ αáß»«½áúáεΓß∩ Γá¬ªÑ íπΣÑα ñ½∩ »«ßΓα«τ¡«ú« óó«ñá ΓÑ¬ßΓá ß ΓÑα¼¿¡á½á (Ñú« αáº¼Ñα ß«ßΓáó½∩ÑΓ 80 íá⌐Γ (1 ßΓα«¬á ΓÑ¬ßΓá ¡á ñ¿ß»½ÑÑ) ¿ íπΣÑα ñ½∩ «í¼Ñ¡á ß ñ¿ß¬«ó«⌐ »á¼∩Γ∞ε «íΩÑ¼«¼ 1è íá⌐Γ. 3. æΓÑ¬ ñá¡¡δσ ¿ »«ßΓΣ¿¬ß¡á∩ ¡«Γáµ¿∩. öÄÉÆ-ß½«óá »α¿ óδ»«½¡Ñ¡¿¿ «í¼Ñ¡¿óáεΓß∩ ñá¡¡δ¼¿ τÑαÑº ßΓÑ¬. èáªñ«Ñ ß½«ó«, ΓαÑíπεΘÑÑ óσ«ñ¡δσ áαúπ¼Ñ¡Γ«ó, ß¡¿¼áÑΓ ¿σ ß« ßΓÑ¬á ¿ ó«ºóαáΘáÑΓ óδαáíáΓδóáÑ¼δÑ º¡áτÑ¡¿∩ ¡á Γ«¼ ªÑ ßΓÑ¬Ñ. ìá½¿τ¿Ñ á»»áαáΓ¡«ú« ßΓÑ¬á ó ¼¿¬α«»α«µÑßß«αÑ i8086/i8088 »«ºó«½∩ÑΓ ½Ñú¬« αÑá½¿º«óáΓ∞ αáí«Γπ ß« ßΓÑ¬«¼ ñá¡¡δσ ó öÄÉÆ-ß¿ßΓÑ¼Ñ. æΓÑ¬«óδ⌐ ¼Ñσá¡¿º¼ »ÑαÑñáτ¿ ¿¡Σ«α¼áµ¿¿ ÑßΓÑßΓóÑ¡¡δ¼ «íαáº«¼ «»αÑñÑ½∩ÑΓ ¿ß»«½∞ºπÑ¼πε ó ∩ºδ¬Ñ öÄÉÆ ºá»¿ß∞ óδτ¿ß½Ñ¡¿⌐, á ¿¼Ñ¡¡«, »«ßΓΣ¿¬ß¡πε ¿½¿ «íαáΓ¡πε »«½∞ß¬πε ºá»¿ß∞. é »«ßΓΣ¿¬ß¡«⌐ ºá»¿ß¿ «»Ñαá¡ñδ »αÑñΦÑßΓóπεΓ ¼¡Ñ¼«¡¿τÑß¬«¼π «í«º¡áτÑ¡¿ε «»Ñαáµ¿¿, ¿ óδτ¿ß½Ñ¡¿∩ »α«ó«ñ∩Γß∩ »«ß½Ññ«óáΓÑ½∞¡« ß½Ñóá ¡á»αáó«. é »«ßΓΣ¿¬ß¡«⌐ ºá»¿ß¿ ¡ÑΓ ß¬«í«¬, ¿ ¡Ñ πτ¿ΓδóáÑΓß∩ »α¿«α¿ΓÑΓ «»Ñαáµ¿⌐. ì¿ªÑ ñ½∩ »α¿¼Ñαá »α¿óÑñÑ¡ α∩ñ áα¿Σ¼ÑΓ¿τÑß¬¿σ óδαáªÑ¡¿⌐, ºá»¿ßá¡¡δσ ó Γαáñ¿µ¿«¡¡«⌐ ºá»¿ß¿ ¿ ó ó¿ñÑ »«ßΓΣ¿¬ß¡δσ óδαáªÑ¡¿⌐. Äíδτ¡á∩ ºá»¿ß∞ Å«ßΓΣ¿¬ß¡á∩ ºá»¿ß∞ 3+7 3 7 + a*x+b a x * b + (3+a)/2+b-1 3 a + 2 / b + 1 - Éáßß¼«Γα¿¼ ñ½∩ »α¿¼Ñαá »α«µÑßß óδτ¿ß½Ñ¡¿∩ öÄÉÆ-ß¿ßΓÑ¼«⌐ »«ß½Ññ¡Ñú« ¿º »α¿óÑñÑ¡¡δσ óδαáªÑ¡¿⌐. 1. ìá ßΓÑ¬ ñá¡¡δσ »«¼ÑΘáÑΓß∩ µÑ½«τ¿ß½Ñ¡¡«Ñ º¡áτÑ¡¿Ñ 3. 2. éδ»«½¡∩ÑΓß∩ ß½«ó« ß ¿¼Ñ¡Ñ¼ "a". ÅαÑñ»«½áúáÑΓß∩, τΓ« φΓ« ß½«ó« óδαáíáΓδóáÑΓ ¡á ßΓÑ¬Ñ ¡Ñ¬«Γ«α«Ñ τ¿ß½«ó«Ñ º¡áτÑ¡¿Ñ (¡á»α¿¼Ñα, "a" ¼«ªÑΓ íδΓ∞ «í«º¡áτÑ¡¿Ñ¼ µÑ½«τ¿ß½Ñ¡¡«⌐ ¬«¡ßΓá¡Γδ). 3. éδ»«½¡∩ÑΓß∩ ß½«ó« "+" - «»Ñαáµ¿∩ ß½«ªÑ¡¿∩. æ½«ó« "+" ß¬½áñδóáÑΓ ñóá óÑασ¡¿σ º¡áτÑ¡¿∩ ßΓÑ¬á ñá¡¡δσ, »«¼ÑΘá∩ ó¼ÑßΓ« ¡¿σ αÑºπ½∞ΓáΓ ß½«ªÑ¡¿∩. 4. ìá ßΓÑ¬ »«¼ÑΘáÑΓß∩ º¡áτÑ¡¿Ñ 2. 5. æ½«ó« "/" »α«¿ºó«ñ¿Γ «»Ñαáµ¿ε µÑ½«τ¿ß½Ñ¡¡«ú« ñÑ½Ñ¡¿∩ ñóπσ óÑασ¡¿σ φ½Ñ¼Ñ¡Γ«ó ßΓÑ¬á, »«¼ÑΘá∩ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ óδ»«½¡Ñ¡¿∩ «»Ñαáµ¿¿. 6. æ½«ó« "b" »α¿ óδ»«½¡Ñ¡¿¿ »«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¡Ñ¬«Γ«α«Ñ τ¿ß½«ó«Ñ º¡áτÑ¡¿Ñ. 7. éδ»«½¡∩ÑΓß∩ «»Ñαáµ¿∩ ß½«ªÑ¡¿∩ (ß¼. ». 3) 8. ìá ßΓÑ¬ »«¼ÑΘáÑΓß∩ º¡áτÑ¡¿Ñ 1. 9. éδ»«½¡∩ÑΓß∩ «»Ñαáµ¿∩ óδτ¿Γá¡¿∩. é αÑºπ½∞ΓáΓÑ óδ»«½¡Ñ¡¿∩ π¬áºá¡¡«⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ñÑ⌐ßΓó¿⌐ ¡á ßΓÑ¬Ñ ñá¡¡δσ «ßΓáÑΓß∩ ¡Ñ¬«Γ«α«Ñ º¡áτÑ¡¿Ñ, ∩ó½∩εΘÑÑß∩ αÑºπ½∞ΓáΓ«¼ óδτ¿ß½Ñ¡¿∩ áα¿Σ¼ÑΓ¿τÑß¬«ú« óδαáªÑ¡¿∩. é öÄÉÆ-ß¿ßΓÑ¼Ñ »α¿¡∩Γ« ß½ÑñπεΘÑÑ ß«ú½áΦÑ¡¿Ñ: Ñß½¿ »α¿ óδ»«½¡Ñ¡¿¿ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß½«ó, ¡Ñ¬«Γ«α«Ñ ß½«ó« ¡Ñ «í¡áαπª¿óáÑΓß∩ ó ß½«óáαÑ öÄÉÆ-ß¿ßΓÑ¼δ, Γ« ñÑ½áÑΓß∩ »«»δΓ¬á αáßß¼áΓα¿óáΓ∞ ñá¡¡«Ñ ß½«ó« ¬á¬ ºá»¿ß∞ τ¿ß½«ó«ú« ½¿ΓÑαá½á. Åα¿ φΓ«¼ πτ¿ΓδóáÑΓß∩ ΓÑ¬πΘÑÑ «ß¡«óá¡¿Ñ ß¿ßΓÑ¼δ ßτ¿ß½Ñ¡¿∩, ¬«Γ«α«Ñ ¼«ªÑΓ ¼Ñ¡∩Γ∞ß∩ ó ºáó¿ß¿¼«ßΓ¿ «Γ ΓαÑíπÑ¼«ú« Σ«α¼áΓá óó«ñá ¿½¿ óδó«ñá τ¿ßÑ½. Åα¿ πß»ÑΦ¡«¼ á¡á½¿ºÑ τ¿ß½á Ñú« ¼áΦ¿¡¡«Ñ »αÑñßΓáó½Ñ¡¿Ñ »«¼ÑΘáÑΓß∩ ¡á óÑασπΦ¬π ßΓÑ¬á ñá¡¡δσ, ó »α«Γ¿ó¡«¼ ß½πτáÑ öÄÉÆ-ß¿ßΓÑ¼«⌐ óδñáÑΓß∩ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ. é »«ß½ÑñπεΘ¿σ αáºñÑ½áσ »α¿ó«ñ¿Γß∩ ¬αáΓ¬«Ñ «»¿ßá¡¿Ñ «ß¡«ó¡δσ ßΓá¡ñáαΓ¡δσ ß½«ó ∩ºδ¬á öÄÉÆ-83 ¿ »αáó¿½á ¿σ ¿ß»«½∞º«óá¡¿∩. Å«½¡«Ñ «»¿ßá¡¿Ñ ß½«ó ß π¬áºá¡¿Ñ¼ áαúπ¼Ñ¡Γ«ó, αÑºπ½∞ΓáΓ«ó ¿ ßÑ¼á¡Γ¿¬¿ óδ»«½¡Ñ¡¿∩ »α¿ó«ñ¿Γß∩ ó »α¿½«ªÑ¡¿¿ 1. ä½∩ «»¿ßá¡¿∩ ß½«ó ¿ß»«½∞ºπÑΓß∩ ºá»¿ß∞ ß½ÑñπεΘÑú« ó¿ñá: name stack-1 --- stack-2 ºñÑß∞ name - ¿¼∩ ß½«óá; stack-1 - ß«ßΓ«∩¡¿Ñ ßΓÑ¬á ñ« óδ»«½¡Ñ¡¿∩ ß½«óá (Γ«τ¡ÑÑ ú«ó«α∩, óÑασ¡¿σ Ñú« φ½Ñ¼Ñ¡Γ«ó, ¬«Γ«αδÑ ¿ß»«½∞ºπεΓß∩ ß½«ó«¼ name ó ¬áτÑßΓóÑ óσ«ñ¡δσ »áαá¼ÑΓα«ó); stack-2 - ß«ßΓ«∩¡¿Ñ ßΓÑ¬á »«ß½Ñ óδ»«½¡Ñ¡¿∩ ß½«óá name. éÑασ¡ÑÑ º¡áτÑ¡¿Ñ ó ß»¿ß¬Ñ φ½Ñ¼Ñ¡Γ«ó ßΓÑ¬á ¡áσ«ñ¿Γß∩ ß»αáóá. Æá¬, ¡á»α¿¼Ñα, «»¿ßá¡¿Ñ «»Ñαáµ¿¿ ß½«ªÑ¡¿∩ óδú½∩ñ¿Γ ß½ÑñπεΘ¿¼ «íαáº«¼: + n1 n2 --- n ß½«ªÑ¡¿Ñ n=n1+n2 ¥½Ñ¼Ñ¡Γδ ßΓÑ¬á ó ºáó¿ß¿¼«ßΓ¿ «Γ Γ«ú«, ¬á¬ «¡¿ Γαá¬ΓπεΓß∩ ΓÑ¼¿ ¿½¿ ¿¡δ¼¿ öÄÉÆ-ß½«óá¼¿, «í«º¡áτáεΓß∩ ß½ÑñπεΘ¿¼ «íαáº«¼: addr - áñαÑß ó «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿ - »«½«ª¿ΓÑ½∞¡«Ñ τ¿ß½« ó ñ¿á»«º«¡Ñ 0-65535 b - 8-αáºα∩ñ¡«Ñ º¡áτÑ¡¿Ñ (íá⌐Γ). æΓáαΦ¿Ñ 8 í¿Γ«ó ß½«óá - ¡π½ÑóδÑ. c - ß¿¼ó«½ ó ¬«ñÑ ASCII. d - 32-í¿Γ«ó«Ñ µÑ½«Ñ τ¿ß½« ß« º¡á¬«¼, ¡á ßΓÑ¬Ñ ñá¡¡δσ »αÑñßΓáó½∩ÑΓß∩ ñóπ¼∩ φ½Ñ¼Ñ¡Γá¼¿. f - ½«ú¿τÑß¬«Ñ º¡áτÑ¡¿Ñ; 0 = FALSE, -1 = TRUE n - 16-αáºα∩ñ¡«Ñ µÑ½«Ñ τ¿ß½« ß« º¡á¬«¼ ó ñ¿á»áº«¡Ñ «Γ -32768 ñ« +32768. u - 16-αáºα∩ñ¡«Ñ τ¿ß½« íÑº º¡á¬á ó ñ¿á»áº«¡Ñ «Γ 0 ñ« 65535. ud - 32-αáºα∩ñ¡«Ñ τ¿ß½« íÑº º¡á¬á 4. Ä»Ñαáµ¿¿ ¡áñ ßΓÑ¬«¼ è ñá¡¡«⌐ úαπ»»Ñ «»Ñαáµ¿⌐ «Γ¡«ß∩Γß∩ ß½«óá, »α«¿ºó«ñ∩Θ¿Ñ ñÑ⌐ßΓó¿∩ ¡áñ φ½Ñ¼Ñ¡Γá¼¿ ßΓÑ¬á, ¿ ¡Ñ ¿º¼Ñ¡∩εΘ¿Ñ º¡áτÑ¡¿∩ ßá¼¿σ φ½Ñ¼Ñ¡Γ«ó. DUP n --- n n ñπí½¿α«óá¡¿Ñ óÑασπΦ¬¿ ßΓÑ¬á DROP n --- ßíα«ß óÑασ¡Ñú« φ½Ñ¼Ñ¡Γá ßΓÑ¬á OVER n1 n2 --- n1 n2 n1 ñπí½¿α«óá¡¿Ñ óΓ«α«ú« ßóÑασπ φ½Ñ¼Ñ¡Γá ßΓÑ¬á ROT n1 n2 n3 --- n2 n3 n1 µ¿¬½¿τÑß¬á∩ »ÑαÑßΓá¡«ó¬á ΓαÑσ óÑασ¡¿σ φ½Ñ¼Ñ¡Γ«ó SWAP n1 n2 --- n2 n1 »ÑαÑßΓá¡«ó¬á ñóπσ óÑασ¡¿σ φ½Ñ¼Ñ¡Γ«ó ßΓÑ¬á PICK nk ... n1 n0 k --- nk ... n1 n0 nk ñπí½¿α«óá¡¿Ñ k-ú« ßóÑασπ φ½Ñ¼Ñ¡Γá ROLL nk nk-1 ... n1 n0 k --- nk-1 ... n1 n0 nk µ¿¬½¿τÑß¬á∩ »ÑαÑßΓá¡«ó¬á k óÑασ¡¿σ φ½Ñ¼Ñ¡Γ«ó ä½∩ αáí«Γδ ß 32-αáºα∩ñ¡δ¼¿ τ¿ß½á¼¿ ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ «»Ñαáµ¿¿ ¡áñ φ½Ñ¼Ñ¡Γá¼¿ ßΓÑ¬á: 2DUP d --- d d ñπí½¿α«óá¡¿Ñ ñó«⌐¡«ú« º¡áτÑ¡¿∩ 2DROP d --- ßíα«ß óÑασ¡Ñú« ñó«⌐¡«ú« º¡áτÑ¡¿∩ 2OVER d1 d2 --- d1 d2 d1 ñπí½¿α«óá¡¿Ñ óΓ«α«ú« ßóÑασπ ñó«⌐¡«ú« º¡áτÑ¡¿∩ 2ROT d1 d2 d3 --- d2 d3 d1 µ¿¬½¿τÑß¬á∩ »ÑαÑßΓá¡«ó¬á ΓαÑσ óÑασ¡¿σ ñó«⌐¡δσ º¡áτÑ¡¿⌐ 2SWAP d1 d2 --- d2 d1 »ÑαÑßΓá¡«ó¬á ñóπσ óÑασ¡¿σ ñó«⌐¡δσ º¡áτÑ¡¿⌐ ä½∩ »«óδΦÑ¡¿∩ φΣΣÑ¬Γ¿ó¡«ßΓ¿ «»Ñαáµ¿¿ ¡áñ φ½Ñ¼Ñ¡Γá¼¿ ßΓÑ¬á ñá¡¡δσ αÑá½¿ºπεΓß∩, ¬á¬ »αáó¿½«, ¡Ñ»«ßαÑñßΓóÑ¡¡« ó ¼áΦ¿¡¡«¼ ¬«ñÑ ¿ ¡Ñ »αÑñπß¼áΓα¿óáεΓ ¬«¡Γα«½∩ ºá «Φ¿í«τ¡δ¼¿ ß¿Γπáµ¿∩¼¿, Γá¬¿¼¿ ¬á¬ »ÑαÑ»«½¡Ñ¡¿Ñ ¿½¿ «»πßΓ«ΦÑ¡¿Ñ ßΓÑ¬á ñá¡¡δσ. 5. ä«ßΓπ» ¬ »á¼∩Γ¿ ä½∩ ºá»¿ß¿ ¿ τΓÑ¡¿∩ ñá¡¡δσ ¿º «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿, óσ«ñ∩ΘÑ⌐ ó áñαÑß¡«Ñ »α«ßΓαá¡ßΓó« öÄÉÆ-ß¿ßΓÑ¼δ ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ ß½«óá: @ addr --- n τΓÑ¡¿Ñ ß½«óá n »« áñαÑßπ addr C@ addr --- b τΓÑ¡¿Ñ íá⌐Γá b »« áñαÑcπ addr ! n addr --- ºá»¿ß∞ ß½«óá n »« áñαÑßπ addr C! b addr --- ºá»¿ß∞ íá⌐Γá b »« áñαÑßπ addr ä½∩ ñ«ßΓπ»á ¬ 32-αáºα∩ñ¡δ¼ τ¿ß½á¼, σαá¡∩Θ¿¼ß∩ ó »á¼∩Γ¿, ¿¼ÑεΓß∩ ß½«óá: 2@ addr --- d τΓÑ¡¿Ñ ñó«⌐¡«ú« τ¿ß½á »« áñαÑßπ addr 2! d addr --- ºá»¿ß∞ ñó«⌐¡«ú« τ¿ß½á »« áñαÑßπ addr Åα¿ αáº¼ÑΘÑ¡¿¿ ó »á¼∩Γ¿ ñó«⌐¡δσ º¡áτÑ¡¿⌐ ó ¼Ñ¡∞Φ¿σ áñαÑßáσ αáß»«½áúáεΓß∩ ßΓáαΦ¿Ñ 16 αáºα∩ñ«ó ñó«⌐¡«ú« τ¿ß½á, ó í«½∞Φ¿σ áñαÑßáσ - ¼½áñΦ¿Ñ 16 αáºα∩ñ«ó. ä½∩ αáí«Γδ ß »«ß½Ññ«óáΓÑ½∞¡δ¼¿ πτáßΓ¬á¼¿ »á¼∩Γ¿ ¼«úπΓ íδΓ∞ ¿ß»«½∞º«óá¡δ ¬«¼á¡ñδ »ÑαÑßδ½¬¿ ñá¡¡δσ: CMOVE addr1 addr2 n --- »ÑαÑßδ½¬á n íá⌐Γ«ó ß áñαÑßá addr1 »« áñαÑßπ addr2 CMOVE> addr1 addr2 n --- »ÑαÑßδ½¬á n íá⌐Γ«ó ß áñαÑßá addr1 »« áñαÑßπ addr2 ó ¡á»αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó éδ»«½¡Ñ¡¿Ñ φΓ¿σ ß½«ó αáº½¿τáÑΓß∩ Γ«½∞¬« Γ«úñá, ¬«úñá «í½áßΓ¿ ¿ßΓ«τ¡¿¬á ¿ »«½πτáΓÑ½∩ »ÑαÑ¬αδóáεΓß∩. ä½∩ ñ«ßΓπ»á ¬ ñá¡¡δ¼ ó «»ÑαáΓ¿ó¡«⌐ »á¼∩Γ¿ ó¡Ñ «ß¡«ó¡«ú« ßÑú¼Ñ¡Γá öÄÉÆ-ß¿ßΓÑ¼δ, ¿¼ÑεΓß∩ ß½ÑñπεΘ¿Ñ ß½«óá: @L n addr --- n1 τΓÑ¡¿Ñ ß½«óá n1 »« áñαÑßπ n:addr C@L n addr --- b τΓÑ¡¿Ñ íá⌐Γá b »« áñαÑßπ n:addr !L n n1 addr --- ºá»¿ß∞ ß½«óá n »« áñαÑßπ n1:addr C!L b n adr --- ºá»¿ß∞ íá⌐Γá b »« áñαÑßπ n:addr CMOVEL n1 addr1 n2 addr2 n --- »ÑαÑßδ½¬á n íá⌐Γ«ó ß áñαÑßá n1:addr1 »« áñαÑßπ n2:addr2 ó ¡á»αáó½Ñ¡¿¿ πóÑ½¿τÑ¡¿∩ áñαÑß«ó CMOVEL> n1 addr1 n2 addr2 n --- »ÑαÑßδ½¬á n íá⌐Γ«ó ß áñαÑßá n1:addr1 »« áñαÑßπ n2:addr2 ó ¡á»αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó MOVEL n1 addr1 n2 addr2 n --- »ÑαÑßδ½¬á n ß½«ó ß áñαÑßá n1:addr1 »« áñαÑßπ n2:addr2 6. Çα¿Σ¼ÑΓ¿τÑß¬¿Ñ «»Ñαáµ¿¿ æΓá¡ñáαΓ«¼ ∩ºδ¬á öÄÉÆ »αÑñπß¼áΓα¿óáεΓß∩ ß½ÑñπεΘ¿Ñ áα¿Σ¼ÑΓ¿τÑß¬¿Ñ «»Ñαáµ¿¿ ¡áñ 16-αáºα∩ñ¡δ¼¿ µÑ½δ¼¿ τ¿ß½á¼¿ ß« º¡á¬«¼. 6.1 äóπσ¼ÑßΓ¡δÑ «»Ñαáµ¿¿ + n1 n2 --- n ßπ¼¼á n=n1+n2 - n1 n2 --- n αáº¡«ßΓ∞ n=n1-n2 * n1 n2 --- n »α«¿ºóÑñÑ¡¿Ñ n=n1*n2 / n1 n2 --- n µÑ½«τ¿ß½Ñ¡¡«Ñ τáßΓ¡«Ñ «Γ ñÑ½Ñ¡¿∩ n1/n2 MOD n1 n2 --- n «ßΓáΓ«¬ «Γ ñÑ½Ñ¡¿∩ n1/n2 /MOD n1 n2 --- n3 n4 n4 - τáßΓ¡«Ñ «Γ ñÑ½Ñ¡¿∩ n1/n2, n3 - «ßΓáΓ«¬ «Γ ñÑ½Ñ¡¿∩ n1/n2 6.2 Äñ¡«¼ÑßΓ¡δÑ «»Ñαáµ¿¿ ABS n --- n1 áíß«½εΓ¡á∩ óÑ½¿τ¿¡á NEGATE n --- n1 º¡áτÑ¡¿Ñ ß «íαáΓ¡δ¼ º¡á¬«¼ n1=-n 1+ n --- n1 πóÑ½¿τÑ¡¿Ñ ¡á 1 - n1=n+1 1- n --- n1 π¼Ñ¡∞ΦÑ¡¿Ñ ¡á 1 - n1=n-1 2+ n --- n1 πóÑ½¿τÑ¡¿Ñ ¡á 2 - n1=n+2 2- n --- n1 π¼Ñ¡∞ΦÑ¡¿Ñ ¡á 2 - n1=n-2 2* n --- n1 π¼¡«ªÑ¡¿Ñ ¡á 2 - n1=n*2 2/ n --- n1 ñÑ½Ñ¡¿Ñ ¡á 2 - n1=n/2 Åα¿ ß½«ªÑ¡¿¿, óδτ¿Γá¡¿¿ ¿ π¼¡«ªÑ¡¿¿ ó ß½πτáÑ ó«º¡¿¬¡«óÑ¡¿∩ »ÑαÑ»«½¡Ñ¡¿∩ αáºα∩ñ¡«⌐ ßÑΓ¬¿ ¿ß»«½∞ºπεΓß∩ ¼½áñΦ¿Ñ 16 αáºα∩ñ«ó »«½πτÑ¡¡«ú« αÑºπ½∞ΓáΓá, Γ.Ñ. αÑºπ½∞ΓáΓ íÑαÑΓß∩ »« ¼«ñπ½ε 65536. ¥Γ« »«ºó«½∩ÑΓ »«½πτáΓ∞ «ñ¿¡á¬«óδÑ αÑºπ½∞ΓáΓδ óδ»«½¡Ñ¡¿∩ «»Ñαáµ¿⌐ ¡Ñºáó¿ß¿¼« «Γ Γ«ú«, ¬á¬ Γαá¬ΓπεΓß∩ «»Ñαá¡ñδ - ¬á¬ τ¿ß½á ß« º¡á¬«¼ ó ñ¿á»áº«¡Ñ «Γ -32768 ñ« +32767 ¿½¿ ¬á¬ τ¿ß½á íÑº º¡á¬á ó ñ¿á»áº«¡Ñ «Γ 0 ñ« 65535. é «»Ñαáµ¿∩σ ñÑ½Ñ¡¿∩ /, MOD, ¿ /MOD «»Ñαá¡ñδ αáßß¼áΓα¿óáεΓß∩ ¬á¬ τ¿ß½á ß« º¡á¬«¼. é ∩ºδ¬Ñ öÄÉÆ ¿ß»«½∞ºπÑΓß∩ ñÑ½Ñ¡¿Ñ ß ¡¿ª¡Ñ⌐ úαá¡¿µÑ⌐: «ßΓáΓ«¬ ¿¼ÑÑΓ º¡á¬ ñÑ½¿ΓÑ½∩ ¿½¿ αáóÑ¡ ¡π½ε, á τáßΓ¡«Ñ «¬απú½∩ÑΓß∩ ñ« í½¿ªá⌐ΦÑú« µÑ½«ú«, ¡Ñ »αÑóδΦáεΘÑú« τáßΓ¡«Ñ. Åα¿ óδ»«½¡Ñ¡¿¿ ñÑ½Ñ¡¿∩ ó«º¼«ª¡« ó«º¡¿¬¡«óÑ¡¿Ñ «Φ¿í«τ¡δσ ß¿Γπáµ¿⌐ - ñÑ½Ñ¡¿Ñ ¡á ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ ¿ »ÑαÑ»«½¡Ñ¡¿Ñ, ó«º¡¿¬áεΘÑÑ »α¿ ñÑ½Ñ¡¿¿ -32768 ¡á -1. Äñ¡«¼ÑßΓ¡δÑ «»Ñαáµ¿¿ ABS ¿ NEGATE ¿ú¡«α¿απεΓ »ÑαÑ»«½¡Ñ¡¿Ñ »α¿ º¡áτÑ¡¿¿ «»Ñαá¡ñá, αáó¡«¼ -32768, ó«ºóαáΘá∩ »α¿ φΓ«¼ ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá ¡«½∞. Ä»Ñαáµ¿¿ 1+, 1-, 2+, 2-, 2*, 2/ ó¬½ετÑ¡δ ó ∩ºδ¬ óó¿ñπ ¿σ τáßΓ«ú« ¿ß»«½∞º«óá¡¿∩ ¿ αÑá½¿º«óá¡δ ¡á¿í«½ÑÑ φΣΣÑ¬Γ¿ó¡δ¼ «íαáº«¼. ä½∩ »«óδΦÑ¡¿∩ Γ«τ¡«ßΓ¿ óδτ¿ß½Ñ¡¿⌐ ó ∩ºδ¬ ó¬½ετÑ¡δ ß½«óá: */ n1 n2 n3 --- n τáßΓ¡«Ñ «Γ (n1*n2)/n3 */MOD n1 n2 n3 --- n4 n5 n5 τáßΓ¡«Ñ «Γ (n1*n2)/n3, n4 «ßΓáΓ«¬ «Γ (n1*n2)/n3 Åα¿ óδ»«½¡Ñ¡¿¿ ñá¡¡δσ ß½«ó »α«¼ÑªπΓ«τ¡δ⌐ αÑºπ½∞ΓáΓ n1*n2 óδτ¿ß½∩ÑΓß∩ ß ñó«⌐¡«⌐ Γ«τ¡«ßΓ∞ε, ¿ »α¿ ñÑ½Ñ¡¿¿ ¡á n3 ¿ß»«½∞ºπεΓß∩ óßÑ 32 αáºα∩ñá. Ä¬«¡τáΓÑ½∞¡δÑ αÑºπ½∞ΓáΓδ »αÑñßΓáó½∩εΓß∩ ó ó¿ñÑ 16-αáºα∩ñ¡δσ τ¿ßÑ½. Å«¼¿¼« 16-αáºα∩ñ¡«⌐ áα¿Σ¼ÑΓ¿¬¿ ó ∩ºδ¬ öÄÉÆ ó¬½ετáÑΓß∩ ¡áí«α «»Ñαáµ¿⌐ ¡áñ 32-αáºα∩ñ¡δ¼¿ µÑ½δ¼¿ τ¿ß½á¼¿. ä¿á»áº«¡ »αÑñßΓáó½Ñ¡¿∩ ñó«⌐¡δσ τ¿ßÑ½ ß«ßΓáó½∩ÑΓ «Γ -2147483648 ñ« +2147483647 (íÑº πτÑΓá º¡á¬á - «Γ 0 ñ« 4294967295). Åα¿ αáº¼ÑΘÑ¡¿¿ ¡á ßΓÑ¬Ñ ñá¡¡δσ ñó«⌐¡«Ñ τ¿ß½« ºá¡¿¼áÑΓ ñóá φ½Ñ¼Ñ¡Γá: óÑασ¡¿⌐ ß«ñÑαª¿Γ ßΓáαΦ¿Ñ αáºα∩ñδ τ¿ß½á, ¡¿ª¡¿⌐ - ¼½áñΦ¿Ñ αáºα∩ñδ. Æá¬¿¼ «íαáº«¼ ñó«⌐¡«Ñ τ¿ß½« ¡á ßΓÑ¬Ñ ¼«ªÑΓ íδΓ∞ »αÑ«íαáº«óá¡« ¬ «íδτ¡«⌐ Γ«τ¡«ßΓ¿ «»Ñαáµ¿Ñ⌐ DROP. ÉáßΦ¿αÑ¡¿Ñ ñ½∩ ñó«⌐¡δσ τ¿ßÑ½ ó¬½ετáÑΓ ß½ÑñπεΘ¿⌐ ¡áí«α ß½«ó: D+ d1 d2 --- d ßπ¼¼á d=d1+d2 D- d1 d2 --- d αáº¡«ßΓ∞ d=d1-d2 DABS d --- d áíß«½εΓ¡á∩ óÑ½¿τ¿¡á d1=abs(d) DNEGATE d --- d τ¿ß½« ß «íαáΓ¡δ¼ º¡á¬«¼ d1=-d é ñá¡¡πε αÑá½¿ºáµ¿ε öÄÉÆ-ß¿ßΓÑ¼δ ó¬½ετÑ¡δ Γá¬ªÑ «»Ñαáµ¿¿: D* d u --- d »α«¿ºóÑñÑ¡¿Ñ d1=d*u D/ d u --- d τáßΓ¡«Ñ d1=d/u (ºñÑß∞ u - 16-αáºα∩ñ¡«Ñ µÑ½«Ñ τ¿ß½« íÑº º¡á¬á) DMAX d1 d2 --- d ¼á¬ß¿¼π¼ d=max(d1,d2) DMIN d1 d2 --- d ¼¿¡¿¿¼π¼ d=min(d1,d2) ê¼ÑÑΓß∩ Γá¬ªÑ α∩ñ ß½«ó ñ½∩ óδ»«½¡Ñ¡¿∩ áα¿Σ¼ÑΓ¿τÑß¬¿σ «»Ñαáµ¿⌐ ß «»Ñαá¡ñá¼¿ αáº½¿τ¡«⌐ Γ«τ¡«ßΓ¿: UM* u1 u2 --- ud 32-αáºα∩ñ¡«Ñ »α«¿ºóÑñÑ¡¿Ñ ud=u1*u2 UM/MOD ud u1 --- u2 u3 u3 - τáßΓ¡«Ñ «Γ ñÑ½Ñ¡¿∩ ud/u1 u2 - «ßΓáΓ«¬ «Γ ñÑ½Ñ¡¿∩ ud/u1 7. ï«ú¿τÑß¬¿Ñ «»Ñαáµ¿¿ ï«ú¿τÑß¬¿Ñ «»Ñαáµ¿¿ ¿ß»«½∞ºπεΓ ó ¬áτÑßΓóÑ «»Ñαá¡ñ«ó 16-αáºα∩ñ¡δÑ ñó«¿τ¡δÑ τ¿ß½á. éδ»«½¡∩εΓß∩ ½«ú¿τÑß¬¿Ñ «»Ñαáµ¿¿ ó öÄÉÆÑ »«αáºα∩ñ¡«, ¡áñ óßÑ¼¿ 16 αáºα∩ñá¼¿ «»Ñαá¡ñ«ó: AND n1 n2 --- n ½«ú¿τÑß¬«Ñ ê (¬«¡Ωε¡¬µ¿∩) n=n1 AND n2 OR n1 n2 --- n ½«ú¿τÑß¬«Ñ êïê (ñ¿ºΩε¡¬µ¿∩) n=n1 OR n2 XOR n1 n2 --- n ¿ß¬½ετáεΘÑÑ êïê n=n1 XOR n2 NOT n --- n1 ½«ú¿τÑß¬«Ñ ìà («Γα¿µá¡¿Ñ) n1=NOT n ä½∩ ½«ú¿τÑß¬¿σ ¬«¡ßΓá¡Γ êæÆêìÇ ¿ ïÄå£ ó öÄÉÆÑ »α¿¡∩Γδ ßΓá¡ñáαΓ¡δÑ »αÑñßΓáó½Ñ¡¿∩: TRUE - »αÑñßΓáó½∩ÑΓß∩ τ¿ß½«¼ ß 1 ó« óßÑσ αáºα∩ñáσ, Γ.Ñ. φ¬ó¿óá½Ñ¡Γ¡« -1 ¿½¿ 65535; FALSE - »αÑñßΓáó½∩ÑΓß∩ ¡π½Ñóδ¼ º¡áτÑ¡¿Ñ¼. 8. Ä»Ñαáµ¿¿ ßαáó¡Ñ¡¿∩ Ä»Ñαáµ¿¿ ßαáó¡Ñ¡¿∩ ß¡¿¼áεΓ ß« ßΓÑ¬á ßó«¿ «»Ñαá¡ñδ ¿ «ßΓáó½∩εΓ ¡á ßΓÑ¬Ñ ½«ú¿τÑß¬¿Ñ º¡áτÑ¡¿∩ TRUE ¿½¿ FALSE (-1 ¿½¿ 0) ó ºáó¿ß¿¼«ßΓ¿ «Γ αÑºπ½∞ΓáΓá ßαáó¡Ñ¡¿∩. é öÄÉÆÑ ¿¼ÑεΓß∩ ß½ÑñπεΘ¿Ñ ß½«óá ñ½∩ «»Ñαáµ¿⌐ ßαáó¡Ñ¡¿∩. < n1 n2 --- f n1 ¼Ñ¡∞ΦÑ n2 = n1 n2 --- f n1 αáó¡« n2 > n1 n2 --- f n1 í«½∞ΦÑ n2 <= n1 n2 --- f n1 ¼Ñ¡∞ΦÑ ½¿í« αáó¡« n2 >= n1 n2 --- f n1 í«½∞ΦÑ ½¿í« αáó¡« n2 <> n1 n2 --- f n1 ¡Ñ αáó¡« n2 ä½∩ ßαáó¡Ñ¡¿∩ 16-αáºα∩ñ¡δσ τ¿ßÑ½ íÑº º¡á¬á (¡á»α¿¼Ñα, ñ½∩ ßαáó¡Ñ¡¿∩ áñαÑß«ó ó ñ¿á»áº«¡Ñ «Γ 0 ñ« 65535) ¿ß»«½∞ºπεΓß∩ ß½«óá: U< u1 u2 --- f u1 ¼Ñ¡∞ΦÑ u2 U> u1 u2 --- f u1 í«½∞ΦÑ u2 éó¿ñπ τáßΓ«ú« ¿ß»«½∞º«óá¡¿∩ ó «ß¡«ó¡«⌐ ¡áí«α öÄÉÆ-ß½«ó ó¬½ετÑ¡δ «ñ¡«¼ÑßΓ¡δÑ «»Ñαáµ¿¿ ßαáó¡Ñ¡¿∩ ß ¡π½Ñ¼: 0< n --- f n ¼Ñ¡∞ΦÑ 0 0= n --- f n αáó¡« 0 0> n --- f n í«½∞ΦÑ 0 ÉáßΦ¿αÑ¡¿Ñ ñ½∩ τ¿ßÑ½ ñó«⌐¡«⌐ Γ«τ¡«ßΓ¿ ó¬½ετáÑΓ ß½ÑñπεΘ¿Ñ «»Ñαáµ¿¿ ßαáó¡Ñ¡¿∩ 32-αáºα∩ñ¡δσ τ¿ßÑ½: D0= d --- f d αáó¡« 0 D< d1 d2 --- f d1 ¼Ñ¡∞ΦÑ d2 D= d1 d2 --- f d1 αáó¡« d2 D<= d1 d2 --- f d1 ¼Ñ¡∞ΦÑ ½¿í« αáó¡« d2 D>= d1 d2 --- f d1 í«½∞ΦÑ ½¿í« αáó¡« d2 D<> d1 d2 --- f d1 ¡Ñ αáó¡« d2 DU< ud1 ud2 --- f ud1 ¼Ñ¡∞ΦÑ ud2 (ßαáó¡Ñ¡¿Ñ ñ½∩ ñó«⌐¡δσ τ¿ßÑ½ íÑº º¡á¬á) 9. æΓαπ¬Γπαδ π»αáó½Ñ¡¿∩ æΓαπ¬Γπαδ π»αáó½Ñ¡¿∩ ¿ß»«½∞ºπεΓß∩ ó ∩ºδ¬Ñ öÄÉÆ, Γá¬ ªÑ ¬á¬ ¿ ó ñαπú¿σ ∩ºδ¬áσ »α«úαá¼¼¿α«óá¡¿∩ ñ½∩ «αúá¡¿ºáµ¿¿ πß½«ó¡«ú« ¿ ¼¡«ú«¬αáΓ¡«ú« óδ»«½¡Ñ¡¿∩ Σαáú¼Ñ¡Γ«ó öÄÉÆ-»α«úαá¼¼. Äß«íÑ¡¡«ßΓ∞ε ∩ºδ¬á öÄÉÆ ∩ó½∩ÑΓß∩ Γ«, τΓ« π»αáó½∩εΘ¿Ñ ßΓαπ¬Γπαδ αÑá½¿ºπεΓß∩ ó ó¿ñÑ ßΓá¡ñáαΓ¡δσ «»αÑñÑ½Ñ¡¿⌐, ó¬½ετáÑ¼δσ ó ß½«óáα∞ öÄÉÆ-ß¿ßΓÑ¼δ. Æá¬¿¼ «íαáº«¼, ¡áí«α π»αáó½∩εΘ¿σ ßΓαπ¬Γπα ¼«ªÑΓ íδΓ∞ »α¿ ¡Ñ«íσ«ñ¿¼«ßΓ¿ ¿º¼Ñ¡Ñ¡ ¿½¿ ñ«»«½¡Ñ¡. ô»αáó½∩εΦ¿Ñ ßΓαπ¬Γπαδ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ Γ«½∞¬« ó¡πΓα¿ «»αÑñÑ½Ñ¡¿⌐ ¿ ¡Ñ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ó αÑª¿¼Ñ ¿¡ΓÑα»αÑΓáµ¿¿. Ä¡¿ αÑá½¿ºπεΓß∩ ó ó¿ñÑ ¬«¼»¿½¿απεΘ¿σ ß½«ó ß »α¿º¡á¬«¼ ¡Ñ¼Ññ½Ñ¡¡«ú« ¿ß»«½¡Ñ¡¿∩. Åα¿ óδº«óÑ φΓ¿ ß½«óá »«α«ªñáεΓ ó Σ«α¼¿απÑ¼«⌐ ß½«óáα¡«⌐ ßΓáΓ∞Ñ ¬«ñ ñ½∩ »α«óÑα¬¿ πß½«ó¿⌐ óδ»«½¡Ñ¡¿∩ Σαáú¼Ñ¡Γ«ó öÄÉÆ-»α«úαá¼¼δ ¿ ¡Ñ«íσ«ñ¿¼δσ ¬«¼á¡ñ »ÑαÑσ«ñá. çá»¿ß∞ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα ¡á öÄÉÆÑ ñ«½ª¡á πñ«ó½ÑΓó«α∩Γ∞ «»αÑñÑ½Ñ¡¡δ¼ ß¿¡Γá¬ß¿τÑß¬¿¼ »αáó¿½á¼, ºáñáεΘ¿¼ »«α∩ñ«¬ ß««ΓóÑΓßΓóπεΘ¿σ ¬«¼»¿½¿απεΘ¿σ ß½«ó. èα«¼Ñ Γ«ú«, ¬áªñá∩ ßΓαπ¬Γπαá π»αáó½Ñ¡¿∩ ñ«½ª¡á íδΓ∞ ºáóÑαΦÑ¡á ó¡πΓα¿ «ñ¡«ú« «»αÑñÑ½Ñ¡¿∩. Æá¬, ¡á»α¿¼Ñα, ¡Ñ½∞º∩ ¿ß»«½∞º«óáΓ∞ ß½«ó« IF ñ½∩ πß½«ó¡«ú« »αÑñ½«ªÑ¡¿∩ ó «ñ¡«¼ «»αÑñÑ½Ñ¡¿¿, á ß««ΓóÑΓßΓóπεΘÑÑ Ñ¼π ß½«ó« THEN - ó ñαπú«¼, ñáªÑ Ñß½¿ óδ»«½¡∩Γ∞ß∩ «¡¿ íπñπΓ ó »αáó¿½∞¡«⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿. ä«»πß¬áÑΓß∩ »α«¿ºó«½∞¡á∩ ó½«ªÑ¡¡«ßΓ∞ «ñ¡¿σ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα ó ñαπú¿Ñ. Åαáó¿½∞¡«ßΓ∞ ¿ß»«½∞º«óá¡¿∩ ß½«ó, αÑá½¿ºπεΘ¿σ π»αáó½∩εΘ¿Ñ ßΓαπ¬Γπαδ, »α«óÑα∩ÑΓß∩ »α¿ ¿σ óδ»«½¡Ñ¡¿¿ ¡á φΓá»Ñ ¬«¼»¿½∩µ¿¿ ß«ñÑαªáΘÑú« ¿σ «»αÑñÑ½Ñ¡¿∩. Äß¡«ó¡δ¼¿ π»αáó½∩εΘ¿¼¿ ßΓαπ¬Γπαá¼¿ ó öÄÉÆÑ ∩ó½∩εΓß∩ ß½ÑñπεΘ¿Ñ: ôß½«ó¡δÑ »αÑñ½«ªÑ¡¿∩ IF ... THEN IF ... ELSE ... THEN û¿¬½δ ß« ßτÑΓτ¿¬«¼ DO ... LOOP ¿ ?DO ... LOOP DO ... +LOOP ¿ ?DO ... +LOOP û¿¬½δ ß πß½«ó¿Ñ¼ BEGIN ... AGAIN ºáóÑαΦÑ¡¿∩ BEGIN ... UNTIL BEGIN ... WHILE ... REPEAT Ä»ÑαáΓ«α óδí«αá CASE ... OF ... ENDOF . . . . . . . . ... OF ... ENDOF ... ENDCASE Ä»ÑαáΓ«α óδí«αá CASE ¡Ñ ∩ó½∩ÑΓß∩ ßΓá¡ñáαΓ¡«⌐ ßΓαπ¬Γπα«⌐ π»αáó½Ñ¡¿∩, «ñ¡á¬« Γαáñ¿µ¿«¡¡« ¿ß»«½∞ºπÑΓß∩ »α¿ »α«úαá¼¼¿α«óá¡¿¿ ¡á öÄÉÆÑ. Ä»¿ßá¡¿Ñ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα 1. IF ... THEN ö«α¼áΓ ºá»¿ß¿: flag IF words THEN éδ»«½¡Ñ¡¿Ñ: »α«óÑα∩ÑΓß∩ º¡áτÑ¡¿Ñ flag ¡á óÑασπΦ¬Ñ ßΓÑ¬á, »α¿ φΓ«¼ flag ß« ßΓÑ¬á ßíαáßδóáÑΓß∩. àß½¿ º¡áτÑ¡¿Ñ flag «Γ½¿τ¡« «Γ FALSE (Γ.Ñ. ¡Ñ αáó¡« ¡π½ε), Γ« óδ»«½¡∩ÑΓß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó words, ó »α«Γ¿ó¡«¼ ß½πτáÑ óÑΓó∞ words »α«»πß¬áÑΓß∩, ¿ π»αáó½Ñ¡¿Ñ ßαáºπ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ THEN. Åα¿¼Ñα. Åα«óÑα¬á ¡á αáóÑ¡ßΓó« ¡π½ε ¡áσ«ñ∩ΘÑú«ß∩ ¡á óÑασπΦ¬Ñ ßΓÑ¬á τ¿ß½á. : NON-ZERO-MESSAGE IF ." ù¿ß½« ¡Ñ αáó¡« ¡π½ε!" THEN ; ok 1 NON-ZERO-MESSAGE ù¿ß½« ¡Ñ αáó¡« ¡π½ε! ok 0 NON-ZERO-MESSAGE ok 2. IF ... ELSE .. THEN ö«α¼áΓ ºá»¿ß¿: flag IF words-1 ELSE words-2 THEN éδ»«½¡Ñ¡¿Ñ: ó ºáó¿ß¿¼«ßΓ¿ «Γ º¡áτÑ¡¿∩ flag ¡á óÑασπΦ¬Ñ ßΓÑ¬á óδ»«½¡∩ÑΓß∩ ½¿í« Σαáú¼Ñ¡Γ words-1 (»α¿ º¡áτÑ¡¿¿ flag, «Γ½¿τ¡«¼ «Γ ¡π½∩), ½¿í« Σαáú¼Ñ¡Γ words-2 (»α¿ º¡áτÑ¡¿¿ flag, αáó¡«¼ ¡π½ε), »«ß½Ñ τÑú« π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ THEN. ç¡áτÑ¡¿Ñ flag ßíαáßδóáÑΓß∩ ß« ßΓÑ¬á. Åα¿¼Ñα Åα«óÑα¬á º¡á¬á τ¿ß½á. : NEG-TEST ." ù¿ß½« " DUP . 0< IF ." «Γα¿µáΓÑ½∞¡«" ELSE ." ¡Ñ «Γα¿µáΓÑ½∞¡«" THEN ; ok 1 NEG-TEST ù¿ß½« 1 ¡Ñ «Γα¿µáΓÑ½∞¡« ok -2 NEG-TEST ù¿ß½« -2 «Γα¿µáΓÑ½∞¡« ok 3. DO ... LOOP ö«α¼áΓ ºá»¿ß¿: limit index DO words LOOP éδ»«½¡Ñ¡¿Ñ: »ÑαÑñ óδ»«½¡Ñ¡¿Ñ¼ µ¿¬½á ¡á óÑασπΦ¬Ñ ßΓÑ¬á ñ«½ª¡δ ¡áσ«ñ¿Γ∞ß∩ ¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á µ¿¬½á index ¿ Ñú« ¬«¡Ñτ¡«Ñ º¡áτÑ¡¿Ñ limit. Åα¿ óσ«ñÑ ó µ¿¬½ «íá π¬áºá¡¡δσ º¡áτÑ¡¿∩ ß¡¿¼áεΓß∩ ß« ßΓÑ¬á, ¿ º¡áτÑ¡¿Ñ index πßΓá¡áó½¿óáÑΓß∩ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« º¡áτÑ¡¿∩ ßτÑΓτ¿¬á µ¿¬½á. Å«ß½Ñ óδ»«½¡Ñ¡¿∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß½«ó words, ß«ßΓáó½∩εΘÑ⌐ ΓÑ½« µ¿¬½á, ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á πóÑ½¿τ¿óáÑΓß∩ ¡á 1, ¿ óδ»«½¡Ñ¡¿Ñ ΓÑ½á µ¿¬½á »«óΓ«α∩ÑΓß∩ ñ« ΓÑσ »«α, »«¬á º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á ¡Ñ »ÑαÑßÑτÑΓ úαá¡¿µπ ¼Ñªñπ óÑ½¿τ¿¡á¼¿ limit-1 ¿ limit »α¿ »ÑαÑσ«ñÑ «Γ »αÑª¡Ñú« º¡áτÑ¡¿∩ ßτÑΓτ¿¬á ¬ ¡«ó«¼π. ä½∩ Γ«ú«, τΓ«íδ »αÑαóáΓ∞ óδ»«½¡Ñ¡¿Ñ µ¿¬½á ñ« ¼«¼Ñ¡Γá ñ«ßΓ¿ªÑ¡¿∩ Ñú« ßτÑΓτ¿¬«¼ úαá¡¿τ¡«ú« º¡áτÑ¡¿∩, ó¡πΓα¿ µ¿¬½á ¼«ªÑΓ íδΓ∞ ¿ß»«½∞º«óá¡« ß»Ñµ¿á½∞¡«Ñ ß½«ó« LEAVE, ¬«Γ«α«Ñ »ÑαÑñáÑΓ π»αáó½Ñ¡¿Ñ ¡á óδ»«½¡Ñ¡¿Ñ ¬«ñá, αáß»«½«ªÑ¡¡«ú« ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ ñá¡¡«¼π µ¿¬½π ß½«ó«¼ LOOP. é¡πΓα¿ ΓÑ½á µ¿¬½á ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á ¼«ªÑΓ íδΓ∞ »«¼ÑΘÑ¡« ¡á ßΓÑ¬ ß »«¼«Θ∞ε ß½«óá I. æ½«ó« J, ó ßó«ε «τÑαÑñ∞, »«ºó«½∩ÑΓ »«½πτ¿Γ∞ ¡á ßΓÑ¬Ñ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á ñ½∩ ßá¼«ú« ó¡πΓαÑ¡¡Ñú« µ¿¬½á, ßΓáΓ¿τÑß¬¿ «íΩÑ¼½εΘÑú« ñá¡¡δ⌐ µ¿¬½. Åα¿¼Ñαδ ÅÑτáΓ∞ ¬óáñαáΓ«ó »Ñαóδσ ñÑß∩Γ¿ ¡áΓπαá½∞¡δσ τ¿ßÑ½. : SQUARES 11 1 DO I I * . LOOP ; ok SQUARES 1 4 9 16 25 36 49 64 81 100 ok ÅÑτáΓ∞ Γáí½¿µδ π¼¡«ªÑ¡¿∩ αáº¼Ñα«¼ 4 * 3 ñ½∩ »Ñαóδσ ¡áΓπαá½∞¡δσ τ¿ßÑ½. : MULTIPLY-TABLE 4 1 DO 5 1 DO J . ." * " I . ASCII = . I J * 2 .R 3 SPACES LOOP CR LOOP ; ok MULTIPLY-TABLE 1 * 1 = 1 1 * 2 = 2 1 * 3 = 3 1 * 4 = 4 2 * 1 = 2 2 * 2 = 4 2 * 3 = 6 2 * 4 = 8 3 * 1 = 3 3 * 2 = 6 3 * 3 = 9 3 * 4 =12 ok æ½ÑñπÑΓ «Γ¼ÑΓ¿Γ∞, τΓ« ΓÑ½« µ¿¬½á DO ... LOOP óßÑúñá óδ»«½¡∩ÑΓß∩ »« ¬αá⌐¡Ñ⌐ ¼ÑαÑ «ñ¿¡ αáº, ¡Ñºáó¿ß¿¼« «Γ ¿ßσ«ñ¡δσ º¡áτÑ¡¿⌐ »áαá¼ÑΓα«ó µ¿¬½á index ¿ limit. Åα¿ «ñ¿¡á¬«óδσ º¡áτÑ¡¿∩σ index ¿ limit µ¿¬½ DO ... LOOP »α«αáí«ΓáÑΓ 65535 αáº. é ñá¡¡«⌐ αÑá½¿ºáµ¿¿ öÄÉÆá ¿¼ÑÑΓß∩ Γá¬ªÑ µ¿¬½ ?DO ... LOOP, ¬«Γ«αδ⌐ ¿¼ÑÑΓ ß½ÑñπεΘ¿⌐ Σ«α¼áΓ ºá»¿ß¿: limit index ?DO words LOOP äá¡¡δ⌐ ó¿ñ µ¿¬½á «Γ½¿τáÑΓß∩ «Γ µ¿¬½á DO ... LOOP ΓÑ¼, τΓ« ΓÑ½« µ¿¬½á words ¡Ñ óδ»«½¡∩ÑΓß∩ ¡¿ αáºπ, Ñß½¿ ¿ßσ«ñ¡δÑ º¡áτÑ¡¿∩ »áαá¼ÑΓα«ó limit ¿ index αáó¡δ ¼Ñªñπ ß«í«⌐. Åα¿¼Ñα : ?DO-LOOP-TEST ?DO ." éδº«ó ΓÑ½á µ¿¬½á" CR LOOP ; ok 2 0 ?DO-LOOP-TEST éδº«ó ΓÑ½á µ¿¬½á éδº«ó ΓÑ½á µ¿¬½á ok 0 0 ?DO-LOOP-TEST ok 4. DO ... +LOOP ö«α¼áΓ ºá»¿ß¿: limit index DO words increment +LOOP éδ»«½¡Ñ¡¿Ñ: «Γ½¿τáÑΓß∩ «Γ óδ»«½¡Ñ¡¿∩ µ¿¬½á DO ... LOOP ΓÑ¼, τΓ« »«ß½Ñ ¬áªñ«ú« ºáóÑαΦÑ¡¿∩ ΓÑ½á µ¿¬½á words ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á µ¿¬½á πóÑ½¿τ¿óáÑΓß∩ ¡Ñ ¡á 1, á ¡á óÑ½¿τ¿¡π increment, ¬«Γ«αá∩ ñ«½ª¡á íδΓ∞ »«¼ÑΘÑ¡á ¡á óÑασπΦ¬π ßΓÑ¬á »ÑαÑñ óδ»«½¡Ñ¡¿Ñ¼ +LOOP. Æá¬¿¼ «íαáº«¼, ñá¡¡á∩ ¬«¡ßΓαπ¬µ¿∩ »«ºó«½∩ÑΓ ßΓα«¿Γ∞ µ¿¬½δ ß »α«¿ºó«½∞¡δ¼ Σ¿¬ß¿α«óá¡¡δ¼, á Γá¬ªÑ ß »ÑαÑ¼Ñ¡¡δ¼ Φáú«¼ »α¿αáΘÑ¡¿∩ ßτÑΓτ¿¬á. Åα¿¼Ñαδ : T1 0 10 DO I . -1 +LOOP ; ok T1 10 9 8 7 6 5 4 3 2 1 0 ok : T2 100 1 DO I . I +LOOP ; ok 1 2 4 8 16 32 64 ok ä«»πß¬áÑΓß∩ Γá¬ªÑ ¿ß»«½∞º«óá¡¿Ñ ñá¡¡«ú« µ¿¬½á ó ó¿ñÑ ?DO ... +LOOP ß »α«óÑα¬«⌐ ¿ßσ«ñ¡δσ º¡áτÑ¡¿⌐ »áαá¼ÑΓα«ó limit ¿ index (ß¼. «»¿ßá¡¿Ñ µ¿¬½á ?DO ... LOOP). çá¼Ñτá¡¿∩ Åα¿ αáí«ΓÑ µ¿¬½«ó ß« ßτÑΓτ¿¬á¼¿ ñ½∩ σαá¡Ñ¡¿∩ »áαá¼ÑΓα«ó µ¿¬½á ¿ß»«½∞ºπÑΓß∩ Γα¿ φ½Ñ¼Ñ¡Γá ¡á ßΓÑ¬Ñ ó«ºóαáΓ«ó, τΓ« ¡á¬½áñδóáÑΓ α∩ñ «úαá¡¿τÑ¡¿⌐ ¡á ñÑ⌐ßΓó¿∩, óδ»«½¡∩Ñ¼δÑ ó ΓÑ½Ñ µ¿¬½á. Æá¬, ¡á»α¿¼Ñα ß«ßΓ«∩¡¿Ñ ßΓÑ¬á ó«ºóαáΓ«ó ó ¡áτá½Ñ óδ»«½¡Ñ¡¿∩ ΓÑ½á µ¿¬½á ñ«½ª¡« ß«ó»áñáΓ∞ ß ß«ßΓ«∩¡¿Ñ¼ ó ¬«¡µÑ óδ»«½¡Ñ¡¿∩ ΓÑ½á. ìÑ½∞º∩ Γá¬ªÑ «ßπΘÑßΓó½∩Γ∞ »α¿¡πñ¿ΓÑ½∞¡δ⌐ óδσ«ñ ¿º µ¿¬½á ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó Γ¿»á EXIT, ¡Ñ ß¡∩ó »αÑñóáα¿ΓÑ½∞¡« ß« ßΓÑ¬á ó«ºóαáΓ«ó ¿ß»«½∞ºπÑ¼δÑ »α¿ αáí«ΓÑ µ¿¬½á óß»«¼«úáΓÑ½∞¡δÑ º¡áτÑ¡¿∩. èα«¼Ñ Γ«ú«, ß½ÑñπÑΓ ¿¼ÑΓ∞ ó ó¿ñπ, τΓ« óαÑ¼Ñ¡¡δÑ ñá¡¡δÑ, »«¼ÑΘáÑ¼δÑ ¡á ßΓÑ¬ ó«ºóαáΓ«ó ó¡πΓα¿ ΓÑ½á µ¿¬½á, ñÑ½áεΓ ¡Ñó«º¼«ª¡δ¼ ñ«ßΓπ» ¬ ßτÑΓτ¿¬á¼ µ¿¬½«ó ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó I ¿ J. 5. BEGIN ... AGAIN ö«α¼áΓ ºá»¿ß¿: BEGIN words AGAIN éδ»«½¡Ñ¡¿Ñ: »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó words »«óΓ«α∩ÑΓß∩ ó íÑß¬«¡Ñτ¡«¼ µ¿¬½Ñ, óδσ«ñ ¿º ¬«Γ«α«ú« ó«º¼«ªÑ¡ ½¿í« »α¿ ó«º¡¿¬¡«óÑ¡¿¿ «Φ¿í«τ¡«⌐ ß¿Γπáµ¿¿, ½¿í« »α¿ óδ»«½¡Ñ¡¿¿ ó¡πΓα¿ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ words ñÑ⌐ßΓó¿⌐, ºáóÑαΦáεΘ¿σ ¿¡ΓÑα»αÑΓáµ¿ε ß½«óá, ß«ñÑαªáΘÑú« ó¡πΓα¿ ßÑí∩ ñá¡¡δ⌐ íÑß¬«¡Ñτ¡δ⌐ µ¿¬½ (¡á»α¿¼Ñα, ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó Γ¿»á EXIT, QUIT ¿½¿ ABORT). Åα¿¼Ñα éó«ñ ß¿¼ó«½«ó ß ¬½áó¿áΓπαδ ß «ñ¡«óαÑ¼Ñ¡¡δ¼ ¿σ «Γ«íαáªÑ¡¿Ñ¼ ¡á φ¬αá¡Ñ ΓÑα¼¿¡á½á. : INKEY-ECHO BEGIN KEY EMIT AGAIN ; ok 6. BEGIN ... UNTIL ö«α¼áΓ ºá»¿ß¿: BEGIN words flag UNTIL éδ»«½¡Ñ¡¿Ñ: »«ß½Ñ óδ»«½¡Ñ¡¿∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß½«ó words »α«óÑα∩ÑΓß∩ º¡áτÑ¡¿Ñ »α¿º¡á¬á flag, ¡áσ«ñ∩ΘÑú«ß∩ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¡á óÑασπΦ¬Ñ ßΓÑ¬á. àß½¿ º¡áτÑ¡¿Ñ flag αáó¡« ¡π½ε, Γ« óδ»«½¡Ñ¡¿Ñ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ words »«óΓ«α∩ÑΓß∩, ó »α«Γ¿ó¡«¼ ß½πτáÑ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ UNTIL. æ½ÑñπÑΓ «Γ¼ÑΓ¿Γ∞, τΓ« ó ñá¡¡«¼ ó¿ñÑ µ¿¬½á, ¬á¬ ¿ ó µ¿¬½Ñ DO ... LOOP, ΓÑ½« µ¿¬½á óδ»«½¡∩ÑΓß∩ »« ¬αá⌐¡Ñ⌐ ¼ÑαÑ «ñ¿¡ αáº. æΓÑ¬ ó«ºóαáΓ«ó ß½«óá¼¿ BEGIN ¿ UNTIL ¡Ñ ¿ß»«½∞ºπÑΓß∩. Åα¿¼Ñα éó«ñ ß¿¼ó«½«ó ß ¬½áó¿áΓπαδ ¿ «Γ«íαáªÑ¡¿Ñ ¿σ ¡á φ¬αá¡Ñ ΓÑα¼¿¡á½á ñ« ΓÑσ »«α, »«¬á ¡Ñ íπñÑΓ ¡áªáΓá ¬½áó¿Φá Return (ó«ºóαáΓ ¬áαÑΓ¬¿). : INKEYS BEGIN KEY DUP EMIT 13 = UNTIL ; ok 7. BEGIN ... WHILE ... REPEAT ö«α¼áΓ ºá»¿ß¿: BEGIN words-1 flag WHILE words-2 REPEAT éδ»«½¡Ñ¡¿Ñ: ¡á ¬áªñ«¼ «τÑαÑñ¡«¼ ΦáúÑ µ¿¬½á »«ß½Ñ óδ»«½¡Ñ¡¿∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß½«ó words-1 »α«óÑα∩ÑΓß∩ º¡áτÑ¡¿Ñ »α¿º¡á¬á flag ¡á óÑασπΦ¬Ñ ßΓÑ¬á. àß½¿ º¡áτÑ¡¿Ñ flag «Γ½¿τ¡« «Γ ¡π½∩, óδ»«½¡∩ÑΓß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó words-2, ¿ µ¿¬½ »«óΓ«α∩ÑΓß∩. é »α«Γ¿ó¡«¼ ß½πτáÑ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ REPEAT. Åα¿¼Ñα Å«¿ß¬ ¿ »ÑτáΓ∞ áñαÑßá »Ñαó«ú« ¡Ñ¡π½Ñó«ú« íá⌐Γá ó »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ íá⌐Γ«ó, ¡áτ¿¡áεΘÑ⌐ß∩ ß áñαÑßá, ºáñáóáÑ¼«ú« ¡á óÑασπΦ¬Ñ ßΓÑ¬á. : SEARCH BEGIN DUP C@ WHILE 1+ REPEAT . ; 8. CASE ... OF ... ENDOF ... ENDCASE ö«α¼áΓ ºá»¿ß¿: parameter CASE match-1 OF words-1 ENDOF match-2 OF words-2 ENDOF . . . . . . . . . . . . match-n OF words-n ENDOF default words ENDCASE éδ»«½¡Ñ¡¿Ñ: º¡áτÑ¡¿Ñ parameter ¡á óÑασπΦ¬Ñ ßΓÑ¬á »α¿ óσ«ñÑ ó ¬«¡ßΓαπ¬µ¿ε CASE »««τÑαÑñ¡« ßαáó¡¿óáÑΓß∩ ß« º¡áτÑ¡¿∩¼¿ match-i (i=1...n), ¬áªñ«Ñ ¿º ¬«Γ«αδσ ñ«½ª¡« ºáñáóáΓ∞ß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ε ß½«ó, óδαáíáΓδóáεΘ¿σ ¡á ßΓÑ¬Ñ «ñ¿¡ φ½Ñ¼Ñ¡Γ (¡á»α¿¼Ñα, τ¿ß½«ó«⌐ ½¿ΓÑαá½). é ß½πτáÑ ß«ó»áñÑ¡¿∩ º¡áτÑ¡¿∩ parameter ß «ñ¡¿¼ ¿º º¡áτÑ¡¿⌐ match-i «íá º¡áτÑ¡¿∩ ß¡¿¼áεΓß∩ ß« ßΓÑ¬á ¿ óδ»«½¡∩ÑΓß∩ ß««ΓóÑΓßΓóπεΘá∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó words-i, »«ß½Ñ τÑú« π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ ENDCASE. àß½¿ º¡áτÑ¡¿Ñ parameter ¡Ñ ß«ó»á½« ¡¿ ß «ñ¡¿¼ ¿º º¡áτÑ¡¿⌐ match-i, óδ»«½¡∩ÑΓß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó default words, »α¿ φΓ«¼ ¿ßσ«ñ¡«Ñ º¡áτÑ¡¿Ñ parameter ß«σαá¡∩ÑΓß∩ ¡á ßΓÑ¬Ñ ¿ ßíαáßδóáÑΓß∩ ß½«ó«¼ ENDCASE »« ºáóÑαΦÑ¡¿¿ óδ»«½¡Ñ¡¿∩ óÑΓó¿ default words. Åα¿¼Ñα ÅÑτáΓ∞ ¡áºóá¡¿∩ «ñ¡«ú« ¿º »Ñαóδσ ΓαÑσ ¡áΓπαá½∞¡δσ τ¿ßÑ½ (¿ßσ«ñ¡«Ñ τ¿ß½« ¡áσ«ñ¿Γß∩ ¡á óÑασπΦ¬Ñ ßΓÑ¬á). : NUMBER-NAME CASE 1 OF ." Äñ¿¡" ENDOF 2 OF ." äóá" ENDOF 3 OF ." Æα¿" ENDOF ." ù¿ß½« " DUP . ." ½¿í« ¼Ñ¡∞ΦÑ 1, ½¿í« í«½∞ΦÑ 3" ENDCASE ok 2 NUMBER-NAME äóá ok 4 NUMBER-NAME ù¿ß½« 4 ½¿í« ¼Ñ¡∞ΦÑ 1, ½¿í« í«½∞ΦÑ 3 ok ä½∩ «αúá¡¿ºáµ¿¿ »ÑαÑσ«ñ«ó »α¿ αÑá½¿ºáµ¿¿ ßΓαπ¬Γπα π»αáó½Ñ¡¿∩ ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ ß½«óá: BRANCH --- »α«ñ«½ª¿Γ∞ ¿¡ΓÑα»αÑΓáµ¿ε «Γ º¡áτÑ¡¿∩ ß½ÑñπεΘÑú« ß¬«¼»¿½¿α«óá¡¡«ú« áñαÑßá ?BRANCH f --- »α¿ f=TRUE óδ»«½¡∩ÑΓß∩ ¬á¬ BRANCH, ¿¡áτÑ - »α«ñ«½ª¿Γ∞ ¿¡ΓÑα»αÑΓáµ¿ε «Γ áñαÑßá, ß½ÑñπεΘÑú« ºá áñαÑß«¼ »ÑαÑσ«ñá. 10. éó«ñ ñá¡¡δσ ä½∩ óó«ñá ¿¡Σ«α¼áµ¿¿ ß ¬½áó¿áΓπαδ ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ ¿¼ÑÑΓß∩ ¡áí«α ß½«ó, »«ºó«½∩εΘ¿σ «ßπΘÑßΓó¿Γ∞ óó«ñ «ΓñÑ½∞¡δσ ß¿¼ó«½«ó, ßΓα«¬ ¿ τ¿ßÑ½. ä½∩ ¡Ñ»«ßαÑñßΓóÑ¡¡«⌐ αáí«Γδ ß ¬½áó¿áΓπα«⌐ ¿ »«ß¿¼ó«½∞¡«ú« óó«ñá »αÑñπß¼«ΓαÑ¡δ ß½ÑñπεΘ¿Ñ ß½«óá: ?TERMINAL --- b «»α«ß íπΣÑαá ¬½áó¿áΓπαδ KEY --- f óó«ñ ß¿¼ó«½á ß ¬½áó¿áΓπαδ PCKEY --- b óó«ñ π»αáó½∩εΘÑú« ß¿¼ó«½á --- b 0 ß ¬½áó¿áΓπαδ WAIT --- «ª¿ñá¡¿Ñ ¡áªáΓ¿∩ ¬½áó¿Φ¿ CLEAR-KEYBRD --- ßíα«ß íπΣÑαá ¬½áó¿áΓπαδ KEYBRD --- b «»α«ß ß«ßΓ«∩¡¿∩ ¬½áó¿áΓπαδ ?RSHIFT --- f »α«óÑα¬á ¡áªáΓ¿∩ ¬½áó¿Φ¿ Right-Shift ?LSHIFT --- f »α«óÑα¬á ¡áªáΓ¿∩ ¬½áó¿Φ¿ Left-Shift ?SHIFT --- f »α«óÑα¬á ¡áªáΓ¿∩ ¬½áó¿Φ¿ Shift (Γ.Ñ. ½εí«⌐ ¿º ¬½áó¿Φ Right-Shift ¿½¿ Left-Shift) ?SCROLL-LOCK --- f »α«óÑα¬á πßΓá¡«ó¬¿ αÑª¿¼á Scroll Lock ä½∩ óó«ñá »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß¿¼ó«½«ó (ßΓα«¬¿) ó öÄÉÆ-ß¿ßΓÑ¼Ñ ¿¼ÑεΓß∩ »α«µÑñπαδ: EXPECT addr n --- óó«ñ ßΓα«¬¿ ß¿¼ó«½«ó ß ΓÑα¼¿¡á½á WORD c --- óó«ñ ßΓα«¬¿ ß¿¼ó«½«ó ¿º óσ«ñ¡«ú« »«Γ«¬á ñ« «úαá¡¿τ¿ΓÑ½∩ c 11. éδó«ñ ¿¡Σ«α¼áµ¿¿ éδó«ñ ΓÑ¬ßΓ«óδσ ¿ τ¿ß½«óδσ ñá¡¡δσ ¡á ñ¿ß»½Ñ⌐ (»ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó«) ¼«ªÑΓ íδΓ∞ «ßπΘÑßΓó½Ñ¡ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½ÑñπεΘ¿σ ß½«ó: EMIT c --- óδó«ñ ß¿¼ó«½á ß ¬«ñ«¼ c CR --- »ÑαÑσ«ñ ¡á ¡«óπε ßΓα«¬π ?CR --- »ÑαÑσ«ñ ¡á ¡«óπε ßΓα«¬π »α¿ ¡Ñ»πßΓ«⌐ ΓÑ¬πΘÑ⌐ ßΓα«¬Ñ TYPE addr n --- óδó«ñ ßΓα«¬¿ ß¿¼ó«½«ó SPACE --- óδó«ñ »α«íÑ½á SPACES n --- óδó«ñ n »α«íÑ½«ó ." --- »ÑτáΓ∞ ßΓα«¬«ó«ú« ½¿ΓÑαá½á (¬«¼»¿½∩µ¿∩) ". addr --- »ÑτáΓ∞ ßΓα«¬¿ .( --- »ÑτáΓ∞ ßΓα«¬«ó«ú« ½¿ΓÑαá½á (¬«¼»¿½∩µ¿∩ ¿ ¿¡ΓÑα»αÑΓáµ¿∩) ä½∩ »ÑτáΓ¿ τ¿ß½«óδσ º¡áτÑ¡¿⌐ ¿ß»«½∞ºπεΓß∩ ß½«óá: . n --- íÑßΣ«α¼áΓ¡á∩ »ÑτáΓ∞ τ¿ß½á ß« º¡á¬«¼ U. u --- íÑßΣ«α¼áΓ¡á∩ »ÑτáΓ∞ τ¿ß½á íÑº º¡á¬á D. d --- íÑßΣ«α¼áΓ¡á∩ »ÑτáΓ∞ ñó«⌐¡«ú« τ¿ß½á .R n1 n2 --- Σ«α¼áΓ¡á∩ »ÑτáΓ∞ τ¿ß½á ß« º¡á¬«¼ U.R u n --- Σ«α¼áΓ¡á∩ »ÑτáΓ∞ τ¿ß½á íÑº º¡á¬á D.R d n --- Σ«α¼áΓ¡á∩ »ÑτáΓ∞ ñó«⌐¡«ú« τ¿ß½á ä½∩ Σ«α¼áΓ¡«⌐ »ÑτáΓ¿ τ¿ßÑ½ ¿¼ÑÑΓß∩ ¡áí«α ß½«ó, »«ºó«½∩εΘ¿σ »αÑ«íαáº«óδóáΓ∞ τ¿ß½á ¿º ¼áΦ¿¡¡«ú« »αÑñßΓáó½Ñ¡¿∩ ó ßΓα«¬π ß¿¼ó«½«ó. ¥Γ¿ ß½«óá αáí«ΓáεΓ ß τ¿ß½á¼¿ ñó«⌐¡«⌐ Γ«τ¡«ßΓ¿. ä½∩ »αÑ«íαáº«óá¡¿∩ ¿ß»«½∞ºπÑΓß∩ óαÑ¼Ñ¡¡δ⌐ íπΣÑα PAD, ºá»«½¡∩Ñ¼δ⌐ ó ¡á»αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó. æΣ«α¼¿α«óá¡¡«Ñ ó íπΣÑαÑ ΓÑ¬ßΓ«ó«Ñ »αÑñßΓáó½Ñ¡¿Ñ τ¿ß½á ¼«ªÑΓ íδΓ∞ ¡á»ÑτáΓá¡« ß½«ó«¼ TYPE. ìáí«α ß½«ó ñ½∩ »αÑ«íαáº«óá¡¿∩ τ¿ßÑ½ ó¬½ετáÑΓ ß½ÑñπεΘ¿Ñ ß½«óá: PAD --- addr óδñáτá áñαÑßá ΓÑ¬ßΓ«ó«ú« íπΣÑαá HLD --- addr π¬áºáΓÑ½∞ ΓÑ¬πΘÑ⌐ »«º¿µ¿¿ óδσ«ñ¡«ú« íπΣÑαá #S d --- 0 0 »ÑαÑó«ñ ñó«⌐¡«ú« τ¿ß½á ó ΓÑ¬ßΓ«óδ⌐ ó¿ñ <# d --- d ¡áτá½« »αÑ«íαáº«óá¡¿∩ τ¿ß½á # d --- d óδñÑ½Ñ¡¿Ñ «τÑαÑñ¡«⌐ µ¿Σαδ τ¿ß½á #> d --- addr n ºáóÑαΦÑ¡¿Ñ »αÑ«íαáº«óá¡¿∩ τ¿ß½á HOLD c --- ºá¡ÑßÑ¡¿Ñ ß¿¼ó«½á ó íπΣÑα óδó«ñá SIGN n --- ºá¡ÑßÑ¡¿Ñ º¡á¬á τ¿ß½á ó óδσ«ñ¡«⌐ íπΣÑα ä½∩ ºáñá¡¿∩ πßΓα«⌐ßΓóá óδó«ñá ¿ß»«½∞ºπεΓß∩ ß½«óá: CONSOLE --- πßΓá¡«ó¬á óδó«ñá ¡á ñ¿ß»½Ñ⌐ PRINTER --- πßΓá¡«ó¬á óδó«ñá ¡á »ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó« Å«ß½Ñ óδ»«½¡Ñ¡¿∩ ß½«ó CONSOLE (PRINTER) óßÑ ñá¡¡δÑ, óδó«ñ¿¼δÑ ß ¿ß»«½∞º«óá¡¿Ñ¼ «ß¡«ó¡δσ »α«µÑñπα EMIT ¿ TYPE, íπñπΓ óδó«ñ¿Γ∞ß∩ ¡á ß««ΓóÑΓßΓóÑ¡¡« ¡á ñ¿ß»½Ñ⌐ ¿½¿ »ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó« ó»½«Γ∞ ñ« «τÑαÑñ¡«ú« »ÑαÑ¬½ετÑ¡¿∩ πßΓα«⌐ßΓóá óδó«ñá. ä½∩ αáí«Γδ ß ñá¡¡δ¼¿, σαá¡∩Θ¿¼¿ß∩ ó« ó¡ÑΦ¡Ñ⌐ »á¼∩Γ¿, ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ ¡áí«α ¿¡ΓÑαΣÑ⌐ß¡δσ »α«µÑñπα (ß¼. αáºñÑ½ 20). 12. Ä»αÑñÑ½∩εΘ¿Ñ ß½«óá Äñ¡«⌐ ¿º «ß«íÑ¡¡«ßΓÑ⌐ ∩ºδ¬á öÄÉÆ, ¬«Γ«αá∩ óδñÑ½∩ÑΓ Ñú« ßαÑñ¿ ñαπú¿σ ∩ºδ¬«ó »α«úαá¼¼¿α«óá¡¿∩, ∩ó½∩ÑΓß∩ ó«º¼«ª¡«ßΓ∞ óóÑñÑ¡¿∩ »«α«ªñáεΘ¿σ »«¡∩Γ¿⌐, »«ºó«½∩εΘ¿σ ß«ºñáóáΓ∞ ó ∩ºδ¬Ñ ßαÑñßΓóá ñ½∩ αÑΦÑ¡¿∩ ΓαÑíπÑ¼δσ ºáñáτ. ì«óδÑ »«¡∩Γ¿∩ («»αÑñÑ½∩εΘ¿Ñ ß½«óá) óó«ñ∩Γß∩ ß »«¼«Θ∞ε «»αÑñÑ½Ñ¡¿⌐ τÑαÑº ñó«ÑΓ«τ¿Ñ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß»Ñµ¿á½∞¡δσ ß½«ó CREATE ¿ DOES>. Ä»αÑñÑ½∩εΘ¿Ñ ß½«óá ºáñáεΓß∩ ó ó¿ñÑ: : name CREATE create-part DOES> does-part ; çñÑß∞ name - ¿¼∩ «»αÑñÑ½∩εΦÑú« ß½«óá; create-part (ß«ºñáεΘá∩ τáßΓ∞) - »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó, óδ»«½¡∩εΘá∩ß∩ »α¿ «»αÑñÑ½Ñ¡¿¿ ß »«¼«Θ∞ε «»αÑñÑ½∩εΘÑú« ß½«óá name ¡Ñ¬«Γ«α«ú« ¡«ó«ú« ß½«óá name-1; does-part (óδ»«½¡∩εΘá∩ τáßΓ∞) - »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó, óδ»«½¡∩Ñ¼á∩ »α¿ óδº«óÑ ß½«óá name-1. æ½«ó« CREATE ß«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼, ßτ¿ΓδóáÑ¼δ¼ ¿º óσ«ñ¡«ú« »«Γ«¬á ¿ ñ«íáó½∩ÑΓ ÑÑ ó ß½«óáα∞ öÄÉÆ-«»αÑñÑ½Ñ¡¿⌐, »«ß½Ñ τÑú« óδ»«½¡∩ÑΓß∩ ß«ºñáεΘá∩ τáßΓ∞ «»αÑñÑ½∩εΘÑú« ß½«óá. æ½«ó« DOES>, π¬áºδóáεΘÑÑ ¡á ¬«¡Ñµ ß«ºñáεΘÑ⌐ τáßΓ¿, φáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ ß½«óá name. ìÑ¬«Γ«α«Ñ ¡«ó«Ñ ß½«ó« name-1 ¼«ªÑΓ íδΓ∞ «»αÑñÑ½Ñ¡« τÑαÑº ß½«ó« name ß½ÑñπεΘ¿¼ «íαáº«¼: [ parameters ] name name-1 úñÑ parameters - ó«º¼«ª¡δÑ óσ«ñ¡δÑ »áαá¼ÑΓαδ «»αÑñÑ½∩εΘÑú« ß½«óá name. Åα¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¡«ú« τÑαÑº name ß½«óá name-1 ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß »«½∩ »áαá¼ÑΓα«ó ß½«óá name-1, á ºáΓÑ¼ óδ»«½¡∩ÑΓß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß½«ó, ºá¬½ετÑ¡¡δσ ¼Ñªñπ DOES> ¿ ";" ó ß««ΓóÑΓßΓóπεΘÑ¼ «»αÑñÑ½∩εΘÑ¼ ß½«óÑ name. éδ»«½¡∩εΘá∩ τáßΓ∞ does-part ¼«ªÑΓ íδΓ∞ «»αÑñÑ½Ñ¡á ¡á öÄÉÆ-áßßÑ¼í½ÑαÑ. ä½∩ φΓ«ú« «»αÑñÑ½∩εΘÑÑ ß½«ó« ºáñáÑΓß∩ ó ó¿ñÑ: : name CREATE create-part ;CODE does-part END-CODE çñÑß∞ does-part - »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ¬«¼á¡ñ öÄÉÆ-áßßÑ¼í½Ñαá. Äß¡«ó¡«⌐ ¡áí«α «»αÑñÑ½∩εΘ¿σ ß½«ó ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ ó¬½ετáÑΓ ß½ÑñπεΘ¿Ñ ß½«óá: : - «»αÑñÑ½Ñ¡¿Ñ óδ»«½¡∩Ñ¼«⌐ »α«µÑñπαδ CONSTANT - «»αÑñÑ½Ñ¡¿Ñ µÑ½«τ¿ß½Ñ¡¡«⌐ ¬«¡ßΓá¡Γδ VARIABLE - «»αÑñÑ½Ñ¡¿Ñ µÑ½«τ¿ß½Ñ¡¡«⌐ »ÑαÑ¼Ñ¡¡«⌐ 2CONSTANT - «»αÑñÑ½Ñ¡¿Ñ ¬«¡ßΓá¡Γδ ñó«⌐¡«⌐ Γ«τ¡«ßΓ¿ 2VARIABLE - «»αÑñÑ½Ñ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ ñó«⌐¡«⌐ Γ«τ¡«ßΓ¿ CODE - «»αÑñÑ½Ñ¡¿Ñ áßßÑ¼í½Ñα¡«ú« ß½«óá USER - «»αÑñÑ½Ñ¡¿Ñ »«½∞º«óáΓÑ½∞ß¬«⌐ »ÑαÑ¼Ñ¡¡«⌐ VOCABULARY - «»αÑñÑ½Ñ¡¿Ñ ß½«óáα∩ WINDOW - «»αÑñÑ½Ñ¡¿Ñ «¬¡á TASK - «»αÑñÑ½Ñ¡¿Ñ Σ«¡«ó«⌐ ºáñáτ¿ HANDLE - «»αÑñÑ½Ñ¡¿Ñ ñÑß¬α¿»Γ«αá Σá⌐½á DIRECTORY - «»αÑñÑ½Ñ¡¿Ñ í½«¬á π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ 13. Å«½∞º«óáΓÑ½∞ß¬¿⌐ «¬«¡¡δ⌐ ¿¡ΓÑαΣÑ⌐ß Ä¬¡« ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ αáßß¼áΓα¿óáÑΓß∩ ¬á¬ ß»Ñµ¿á½∞¡δ⌐ ó¿ñ «»αÑñÑ½Ñ¡¿∩, ß ¬«Γ«αδ¼ »«¼¿¼« óδ»«½¡∩Ñ¼«⌐ »α«µÑñπαδ ßó∩ºδóáÑΓß∩ »α∩¼«πú«½∞¡á∩ «í½áßΓ∞ óδó«ñá ¡á φ¬αá¡Ñ ñ¿ß»½Ñ∩. Åα¿ óδº«óÑ «¬«¡¡«ú« «»αÑñÑ½Ñ¡¿∩ («Γ¬αδΓ¿¿ «¬¡á) - ¡á φ¬αá¡Ñ «Γ«íαáªáÑΓß∩ ß««ΓóÑΓßΓóπεΘá∩ «í½áßΓ∞ óδó«ñá - «Γα¿ß«óδóáÑΓß∩ í«αñεα «¬¡á (»α¿ Ñú« ¡á½¿τ¿¿), ó¡πΓαÑ¡¡∩∩ τáßΓ∞ «¬¡á ºá»«½¡∩ÑΓß∩ »α«íÑ½á¼¿. é« óαÑ¼∩ óδ»«½¡Ñ¡¿∩ «¬«¡¡«ú« «»αÑñÑ½Ñ¡¿∩ óßÑ »α«µÑñπαδ π»αáó½Ñ¡¿∩ óδó«ñ«¼ ¡á ΓÑα¼¿¡á½ (óδó«ñ ß¿¼ó«½«ó ¿ ßΓα«¬ ß¿¼ó«½«ó, »ÑαÑ¼ÑΘÑ¡¿Ñ ¬παß«αá, »α«Γ∩ª¬á φ¬αá¡á ¿ Γ.».) αáí«ΓáεΓ Γ«½∞¬« ó αá¼¬áσ ß««ΓóÑΓßΓóπεΘÑú« «¬¡á. Å« ºáóÑαΦÑ¡¿¿ óδ»«½¡Ñ¡¿∩ «¬«¡¡«ú« «»αÑñÑ½Ñ¡¿∩ (ºá¬αδΓ¿¿ «¬¡á) ó«ßßΓá¡áó½¿óáÑΓß∩ ß¬αδΓ«Ñ ¡á óαÑ¼∩ ÑÑ óδ»«½¡Ñ¡¿∩ ¿º«íαáªÑ¡¿Ñ ¡á φ¬αá¡Ñ ñ¿ß»½Ñ∩, á Γá¬ªÑ ¡Ñ¬«Γ«αá∩ ¿¡Σ«α¼áµ¿∩ ñ½∩ »α«µÑñπα óδó«ñá - µóÑΓ«óδÑ σáαá¬ΓÑα¿ßΓ¿¬¿, »«½«ªÑ¡¿Ñ ¿ αáº¼Ñα ¬παß«αá ¿ Γ.». Ä¬«¡¡δÑ «»αÑñÑ½Ñ¡¿∩ óδ»«½¡∩εΓß∩ ó ßΓÑ¬«ó«¼ αÑª¿¼Ñ. ä¿¡á¼¿τÑß¬¿ »«ß½Ññ¡ÑÑ «Γ¬αδΓ«Ñ «¬¡« ¡áºδóáÑΓß∩ á¬Γ¿ó¡δ¼. æ ¬áªñδ¼ «¬«¡¡δ¼ «»αÑñÑ½Ñ¡¿Ñ¼ ßó∩ºδóáÑΓß∩ ¡áí«α áΓα¿íπΓ«ó, ºáñáεΘ¿σ αáº¼Ñα ¿ αáß»«½«ªÑ¡¿Ñ «¬¡á ¡á φ¬αá¡Ñ, Σ«α¼π ¿ µóÑΓ «¬á⌐¼½Ñ¡¿∩ (í«αñεαá), µóÑΓ ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ «¬¡á ¿ Γ.ñ. ùáßΓ∞ áΓα¿íπΓ«ó ºáñáÑΓß∩ ¡Ñ»«ßαÑñßΓóÑ¡¡« »α¿ «»αÑñÑ½Ñ¡¿¿ «¬¡á, τáßΓ∞ ºáñáÑΓß∩ ß »«¼«Θ∞ε ßÑαó¿ß¡δσ »α«µÑñπα. ç¡áτÑ¡¿∩ «¬«¡¡δσ áΓα¿íπΓ«ó σαá¡∩Γß∩ ó ß»Ñµ¿á½∞¡«⌐ «í½áßΓ¿ »á¼∩Γ¿ - í½«¬Ñ π»αáó½Ñ¡¿∩ «¬¡«¼ WCB (Window Control Block) - ßó∩ºδóáÑ¼«⌐ ß ¬áªñδ¼ «¬«¡¡δ¼ «»αÑñÑ½Ñ¡¿Ñ¼. ÇñαÑß«¼ í½«¬á π»αáó½Ñ¡¿∩ «¬¡«¼ ßτ¿ΓáÑΓß∩ áñαÑß »«½∩ ¬«ñá CFA ß««ΓóÑΓßΓóπεΘÑ⌐ ß½«óáα¡«⌐ ßΓáΓ∞¿. ç¡áτÑ¡¿∩ »α¿»¿ßá¡¡δσ «¬¡π áΓα¿íπΓ«ó ¼«úπΓ ¿º¼Ñ¡∩Γ∞ß∩ ñ¿¡á¼¿τÑß¬¿. Åα¿ ¿º¼Ñ¡Ñ¡¿¿ ¡Ñ¬«Γ«αδσ áΓα¿íπΓ«ó «¬¡á »α«¿ºó«ñ¿Γß∩ ß««ΓóÑΓßΓóπεΘÑÑ ¿º¼Ñ¡Ñ¡¿Ñ ¿º«íαáªÑ¡¿∩ ¡á φ¬αá¡Ñ - «Γα¿ß«ó¬á ¡«ó«ú« í«αñεαá, ¿º¼Ñ¡Ñ¡¿Ñ Ñú« µóÑΓá, ¿º¼Ñ¡Ñ¡¿Ñ µóÑΓá ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ «¬¡á. ä½∩ á¬Γ¿ó¡«ú« «¬¡á ó«º¼«ª¡« Γá¬ªÑ ¿º¼Ñ¡Ñ¡¿Ñ αáß»«½«ªÑ¡¿∩ ¿ αáº¼Ñα«ó «¬¡á. Åα«µÑñπαδ ñ«ßΓπ»á ¬ º¡áτÑ¡¿∩¼ áΓα¿íπΓ«ó ¿ »α«µÑñπαδ ¼á¡¿»π½∩µ¿¿ ß «¬¡á¼¿ αáí«ΓáεΓ, ¬á¬ »αáó¿½«, ß á¬Γ¿ó¡δ¼ «¬¡«¼. Ä»αÑñÑ½Ñ¡¿Ñ «¬¡á ¿¼ÑÑΓ ß½ÑñπεΘ¿⌐ ó¿ñ: lx uy width height WINDOW name body ; çñÑß∞ lx, uy width, height - »áαá¼ÑΓαδ αáß»«½«ªÑ¡¿∩ «¬¡á ¡á φ¬αá¡Ñ ñ¿ß»½Ñ∩: lx, uy - x ¿ y ¬««αñ¿¡áΓδ ½Ñó«ú« óÑασ¡Ñú« πú½á width - Φ¿α¿¡á ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ «¬¡á ó º¡á¬«»«º¿µ¿∩σ height - óδß«Γá «¬¡á ó ßΓα«¬áσ φ¬αá¡á name - ¿¼∩ «¬«¡¡«ú« «»αÑñÑ½Ñ¡¿∩, »«ñ ¬«Γ«αδ¼ «¡« »«¼ÑΘáÑΓß∩ ó ß½«óáα∞ body - ΓÑ½« «¬«¡¡«⌐ »α«µÑñπαδ. çáñáÑΓß∩ ó ó¿ñÑ, á¡á½«ú¿τ¡«¼ «»αÑñÑ½Ñ¡¿ε τÑαÑº ñó«ÑΓ«τ¿Ñ, ¬á¬ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ öÄÉÆ-ß½«ó. ä½∩ ºáñá¡¿∩ ñ«»«½¡¿ΓÑ½∞¡δσ áΓα¿íπΓ«ó ¿ß»«½∞ºπÑΓß∩ ¡áí«α ßÑαó¿ß¡δσ »α«µÑñπα. ÇñαÑß í½«¬á π»αáó½Ñ¡¿∩ «¬¡«¼ WCB-addr, ¿ß»«½∞ºπÑ¼δ⌐ ¬á¬ »áαá¼ÑΓα π¬áºá¡¡δσ »α«µÑñπα, ¼«ªÑΓ íδΓ∞ »«½πτÑ¡ »α¿¼Ñ¡Ñ¡¿Ñ¼ ß½«óá ' ó ó¿ñÑ: ' name (ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿ - »α¿¼Ñ¡Ñ¡¿Ñ¼ ß½«óá [']). ÇñαÑß í½«¬á π»αáó½Ñ¡¿∩ á¬Γ¿ó¡δ¼ «¬¡«¼ ¼«ªÑΓ íδΓ∞ »«½πτÑ¡ ß »«¼«Θ∞ε ß½«óá ACTIVE. SET-LOCATION lx uy width height WCB-addr --- ¿º¼Ñ¡Ñ¡¿Ñ αáº¼Ñα«ó ¿ αáß»«½«ªÑ¡¿∩ «¬¡á SET-BORDER n WCB-addr --- ºáñá¡¿Ñ Γ¿»á í«αñεαá SET-BRDCOL background foreground WCB-addr --- ºáñá¡¿Ñ µóÑΓá í«αñεαá SET-INTCOL background foreground WCB-addr --- ºáñá¡¿Ñ µóÑΓá ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ SET-PROC addr WCB-addr --- ¿º¼Ñ¡Ñ¡¿Ñ «¬«¡¡«⌐ »α«µÑñπαδ SET-INF n WCB-addr --- ºáñá¡¿Ñ ñ«»«½¡¿ΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ (Å«ñ ñ«»«½¡¿ΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿Ñ⌐ ºñÑß∞ »«¡¿¼áÑΓß∩ »α«¿ºó«½∞¡«Ñ 16-αáºα∩ñ¡«Ñ º¡áτÑ¡¿Ñ, ß«σαá¡∩Ñ¼«Ñ ó í½«¬Ñ π»αáó½Ñ¡¿∩ «¬¡«¼. ä«»«½¡¿ΓÑ½∞¡á∩ ¿¡Σ«α¼áµ¿∩ ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ »α¿ αáí«ΓÑ ß «¬¡á¼¿ »α«¿ºó«½∞¡δ¼ «íαáº«¼). CENTER WCB-addr --- µÑ¡Γα¿α«óá¡¿Ñ «¬¡á «Γ¡«ß¿ΓÑ½∞¡« φ¬αá¡á (¿º¼Ñ¡Ñ¡¿Ñ Ñú« áΓα¿íπΓ«ó αáß»«½«ªÑ¡¿∩ ä½∩ ñ«ßΓπ»á ¬ º¡áτÑ¡¿∩¼ áΓα¿íπΓ«ó á¬Γ¿ó¡«ú« «¬¡á ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ Σπ¡¬µ¿¿: W.HEIGHT --- b óδß«Γá «¬¡á W.WIDTH --- b Φ¿α¿¡á «¬¡á W.LX --- b x-¬««αñ¿¡áΓá ½Ñó«ú« óÑασ¡Ñú« πú½á W.UY --- b y-¬««αñ¿¡áΓá ½Ñó«ú« óÑασ¡Ñú« πú½á W.X --- b ΓÑ¬πΘá∩ x-¬««αñ¿¡áΓá ¬παß«αá W.Y --- b ΓÑ¬πΘá∩ y-¬««αñ¿¡áΓá ¬παß«αá W.BRDCOL --- b µóÑΓ«ó«⌐ íá⌐Γ í«αñεαá W.INTCOL --- b µóÑΓ«ó«⌐ íá⌐Γ ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ W.BRDTYPE --- n Γ¿» í«αñεαá W.SAVEADDR --- addr áñαÑß «í½áßΓ¿ ß«σαá¡Ñ¡¿∩ ß¬αδΓ«⌐ τáßΓ¿ φ¬αá¡á W.LINK --- addr áñαÑß WCB »αÑñΦÑßΓóπεΘÑú« «¬¡á W.INF --- n ñ«»«½¡¿ΓÑ½∞¡á∩ ¿¡Σ«α¼áµ¿∩ ÇñαÑßá »ÑαÑτ¿ß½Ñ¡¡δσ áΓα¿íπΓ«ó ¼«úπΓ íδΓ∞ »«½πτÑ¡δ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó, ó ¿¼Ñ¡áσ ¬«Γ«αδσ ß¿¼ó«½δ "." ºá¼Ñ¡Ñ¡δ ¡á "-", ¡á»α¿¼Ñα, W-HEIGHT, W-WIDTH, W-UY ¿ Γ.ñ. æ ¿ß»«½∞º«óá¡¿Ñ¼ áΓα¿íπΓ«ó, º¡áτÑ¡¿∩ ¬«Γ«αδσ σαá¡∩Γß∩ ó í½«¬Ñ π»αáó½Ñ¡¿∩ «¬¡«¼, αÑá½¿º«óá¡δ ß½«óá, óδñáεΘ¿Ñ ¡Ñ¬«Γ«αδÑ ñ«»«½¡¿ΓÑ½∞¡δÑ σáαá¬ΓÑα¿ßΓ¿¬¿ «¬«¡: W.RX --- n x-¬««αñ¿¡áΓá »αáó«ú« ¡¿ª¡Ñú« πú½á W.DY --- n y-¬««αñ¿¡áΓá »αáó«ú« ¡¿ª¡Ñú« πú½á ÇΓα¿íπΓδ αáß»«½«ªÑ¡¿∩ ¿ αáº¼Ñαδ «¬¡á ß πτÑΓ«¼ í«αñεαá: W.LX' --- n x-¬««αñ¿¡áΓá ½Ñó«ú« óÑασ¡Ñú« πú½á W.UY' --- n y-¬««αñ¿¡áΓá ½Ñó«ú« óÑασ¡Ñú« πú½á W.RX' --- n x-¬««αñ¿¡áΓá »αáó«ú« ¡¿ª¡Ñú« πú½á W.DY' --- n y-¬««αñ¿¡áΓá »αáó«ú« ¡¿ª¡Ñú« πú½á W.HEIGHT' --- n óδß«Γá «¬¡á ß í«αñεα«¼ W.WIDTH' --- n Φ¿α¿¡á «¬¡á ß í«αñεα«¼ W.SIZE' --- n αáº¼Ñα «í½áßΓ¿ »á¼∩Γ¿, ΓαÑíπÑ¼«⌐ ñ½∩ ß«σαá¡Ñ¡¿∩ «¬¡á ÄτÑó¿ñ¡«, τΓ« ñ½∩ «¬«¡ íÑº í«αñεαá º¡áτÑ¡¿∩ ñá¡¡δσ áΓα¿íπΓ«ó ß«ó»áñáεΓ ß« º¡áτÑ¡¿∩¼¿ ß««ΓóÑΓßΓóπεΘ¿σ áΓα¿íπΓ«ó ñ½∩ ó¡πΓαÑ¡¡Ñ⌐ τáßΓ¿ «¬¡á. êº¼Ñ¡Ñ¡¿Ñ αáº¼Ñα«ó ¿ »ÑαÑ¼ÑΘÑ¡¿Ñ á¬Γ¿ó¡«ú« «¬¡á »« φ¬αá¡π ¼«ªÑΓ íδΓ∞ «ßπΘÑßΓó½Ñ¡« ß »«¼«Θ∞ε ß½ÑñπεΘ¿σ »α«µÑñπα. MOVE-UP --- »ÑαÑ¼ÑΘÑ¡¿Ñ «¬¡á óóÑασ MOVE-DOWN --- »ÑαÑ¼ÑΘÑ¡¿Ñ «¬¡á ó¡¿º MOVE-LEFT --- »ÑαÑ¼ÑΘÑ¡¿Ñ «¬¡á ó½Ñó« MOVE-RIGHT --- »ÑαÑ¼ÑΘÑ¡¿Ñ «¬¡á ó»αáó« V-EXPAND --- πóÑ½¿τÑ¡¿Ñ αáº¼Ñαá »« óÑαΓ¿¬á½¿ V-CONTRACT --- π¼Ñ¡∞ΦÑ¡¿Ñ αáº¼Ñαá »« óÑαΓ¿¬á½¿ H-EXPAND --- πóÑ½¿τÑ¡¿Ñ αáº¼Ñαá »« ú«α¿º«¡Γá½¿ H-CONTRACT --- π¼Ñ¡∞ΦÑ¡¿Ñ αáº¼Ñαá »« ú«α¿º«¡Γá½¿ 14. Éáí«Γá ß ó¡ÑΦ¡Ñ⌐ »á¼∩Γ∞ε é ∩ºδ¬Ñ öÄÉÆ ¿ß»«½∞ºπÑΓß∩ ¼Ñσá¡¿º¼ ó¿αΓπá½∞¡«⌐ φ¬αá¡¡«⌐ »á¼∩Γ¿, αÑá½¿ºπÑ¼δ⌐ ßαÑñßΓóá¼¿ Σá⌐½«ó«⌐ ß¿ßΓÑ¼δ äÄæ. ¥¬αá¡¡á∩ »á¼∩Γ∞ öÄÉÆ-ß¿ßΓÑ¼δ ß«ßΓ«¿Γ ¿º ¼¡«ªÑßΓóá ó¡ÑΦ¡¿σ Σá⌐½«ó. ¥¬αá¡¡δ⌐ Σá⌐½ ¼«ªÑΓ ¿¼ÑΓ∞ »α«¿ºó«½∞¡«Ñ ¿¼∩ ó Σá⌐½«ó«⌐ ß¿ßΓÑ¼Ñ äÄæ, «ñ¡á¬«, »α¿ «ΓßπΓßΓó¿¿ ó ¿¼Ñ¡¿ Σá⌐½á αáßΦ¿αÑ¡¿∩, »α«µÑñπαá¼¿ ñ«ßΓπ»á ¿ß»«½∞ºπÑΓß∩ »« π¼«½τá¡¿ε αáßΦ¿αÑ¡¿Ñ .SCR. èáªñδ⌐ Σá⌐½ ñÑ½¿Γß∩ ¡á í½«¬¿ (φ¬αá¡δ) αáº¼Ñα«¼ 1024 íá⌐Γá. ü½«¬ ¿ñÑ¡Γ¿Σ¿µ¿απÑΓß∩ µÑ½δ¼ τ¿ß½«¼ ó ñ¿á»áº«¡Ñ «Γ 0 ñ« 32767. é áñαÑß¡«¼ »α«ßΓαá¡ßΓóÑ öÄÉÆ-ß¿ßΓÑ¼δ ñ½∩ «í¼Ñ¡á ß φ¬αá¡¡δ¼¿ Σá⌐½á¼¿ óδñÑ½∩ÑΓß∩ íπΣÑα¡δ⌐ »π½. é ñá¡¡«⌐ αÑá½¿ºáµ¿¿ ß¿ßΓÑ¼δ íπΣÑα¡δ⌐ »π½ αáßßτ¿Γá¡ ¡á σαá¡Ñ¡¿Ñ «ñ¡«ú« í½«¬á, «ñ¡á¬« ñ½∩ »«óδΦÑ¡¿∩ φΣΣÑ¬Γ¿ó¡«ßΓ¿ αáí«Γδ »α¿¼Ñ¡∩ÑΓß∩ ¼Ñσá¡¿º¼ ñ«»«½¡¿ΓÑ½∞¡«⌐ íπΣÑα¿ºáµ¿¿ ß ¿ß»«½∞º«óá¡¿Ñ¼ íπΣÑα¡«⌐ «í½áßΓ¿, αáß»«½«ªÑ¡¡«⌐ ó¡Ñ áñαÑß¡«ú« »α«ßΓαá¡ßΓóá öÄÉÆ-ß¿ßΓÑ¼δ. ÆÑ¬πΘ¿⌐ φ¬αá¡¡δ⌐ Σá⌐½ ¼«ªÑΓ íδΓ∞ ¿º¼Ñ¡Ñ¡ óδ»«½¡Ñ¡¿Ñ¼ ß½«óá USING ó ó¿ñÑ USING [d:]filename úñÑ d: - ¿¼∩ ó¡ÑΦ¡Ñú« πßΓα«⌐ßΓóá, filename - ¿¼∩ φ¬αá¡¡«ú« Σá⌐½á. Åα¿ «ΓßπΓßΓó¿¿ ΓαÑíπÑ¼«ú« Σá⌐½á filename ó ΓÑ¬πΘÑ⌐ ñ¿αÑ¬Γ«α¿¿ πßΓα«⌐ßΓóá d: óδñáÑΓß∩ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ. ä½∩ ñ«ßΓπ»á ¬ ΓÑ¬πΘÑ¼π φ¬αá¡¡«¼π Σá⌐½π ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ »α«µÑñπαδ: BLOCK n --- addr - ßτ¿Γδóá¡¿Ñ í½«¬á ß ¡«¼Ñα«¼ n BUFFER n --- addr - óδñáτá áñαÑßá íπΣÑαá ñ½∩ í½«¬á n UPDATE --- - πßΓá¡«ó¬á »α¿º¡á¬á ¼«ñ¿Σ¿¬áµ¿¿ ΓÑ¬πΘÑú« í½«¬á BLOCK-READ --- - Σ¿º¿τÑß¬«Ñ τΓÑ¡¿Ñ ΓÑ¬πΘÑú« í½«¬á ß ñ¿ß¬á BLOCK-WRITE --- - Σ¿º¿τÑß¬á∩ ºá»¿ß∞ ΓÑ¬πΘÑú« í½«¬á ¡á ñ¿ß¬ LAST-SCR --- n - ¡«¼Ñα »«ß½Ññ¡Ñú« φ¬αá¡á ó ΓÑ¬πΘÑ¼ Σá⌐½Ñ Åα¿ óδ»«½¡Ñ¡¿¿ «»Ñαáµ¿⌐ τΓÑ¡¿∩ ¿ ºá»¿ß¿ í½«¬«ó ó »ÑαÑ¼Ñ¡¡πε DISK-ERROR »«¼ÑΘáÑΓß∩ ¬«ñ «ΓóÑΓá, αáó¡δ⌐ ¡π½ε »α¿ πß»ÑΦ¡«¼ óδ»«½¡Ñ¡¿¿ «»Ñαáµ¿¿ ¿ «Γ½¿τ¡δ⌐ «Γ ¡π½∩ »α¿ «í¡áαπªÑ¡¿¿ «Φ¿í«¬. Å« ºáóÑαΦÑ¡¿¿ αáí«Γδ ß ΓÑ¬πΘ¿¼ Σá⌐½«¼ ñ½∩ Σ¿¬ß¿α«óá¡¿∩ ¿º¼Ñ¡Ñ¡¿⌐ ó« ó¡ÑΦ¡Ñ⌐ »á¼∩Γ¿ ñ«½ª¡á íδΓ∞ óδ»«½¡Ñ¡á «»Ñαáµ¿∩ FLUSH, ºá»¿ßδóáεΘá∩ ¡á ñ¿ß¬ ¼«ñ¿Σ¿µ¿α«óá¡¡δÑ í½«¬¿. ä½∩ ñ«ßΓπ»á ¬ »α«¿ºó«½∞¡δ¼ Σá⌐½á¼ ¿ ñ¿αÑ¬Γ«α¿∩¼ äÄæ αÑá½¿º«óá¡ ¡áí«α ¿¡ΓÑαΣÑ⌐ß¡δσ »α«µÑñπα, αáí«ΓáεΘ¿σ ß ñÑß¬α¿»Γ«αá¼¿ Σá⌐½«ó (ß¼. αáºñÑ½ 20). ä½∩ αáí«Γδ ß ΓÑ¬ßΓ«óδ¼¿ φ¬αá¡¡δ¼¿ Σá⌐½á¼¿ ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ »αÑñπß¼«ΓαÑ¡ »«½¡«φ¬αá¡¡δ⌐ αÑñá¬Γ«α, αáí«Γá ß ¬«Γ«αδ¼ «»¿ßá¡á ó απ¬«ó«ñßΓóÑ »«½∞º«óáΓÑ½∩ [2]. 15. ô»αáó½Ñ¡¿Ñ óδó«ñ«¼ ¡á ñ¿ß»½Ñ⌐ éßÑ »α«µÑñπαδ, π»αáó½∩εΘ¿Ñ óδó«ñ«¼ ¡á φ¬αá¡ ñ¿ß»½Ñ∩, αáí«ΓáεΓ ó αá¼¬áσ á¬Γ¿ó¡«ú« «¬¡á. è »α«µÑñπαá¼ π»αáó½Ñ¡¿∩ óδó«ñ«¼ «Γ¡«ß∩Γß∩ »α«µÑñπαδ ºáñá¡¿∩ µóÑΓ«óδσ áΓα¿íπΓ«ó óδó«ñ¿¼δσ ß¿¼ó«½«ó, »ÑαÑ¼ÑΘÑ¡¿∩ ¬παß«αá, πßΓá¡«ó¬¿ αÑª¿¼«ó »α«Γ∩ª¬¿ «¬¡á ¿ Γ.». 15.1 ôßΓá¡«ó¬á µóÑΓ«óδσ áΓα¿íπΓ«ó BACKGROUND n --- ºáñá¡¿Ñ µóÑΓá Σ«¡á FOREGROUND n --- ºáñá¡¿Ñ µóÑΓá ß¿¼ó«½«ó COLOR-BYTE --- addr áñαÑß ΓÑ¬πΘÑú« µóÑΓ«ó«ú« íá⌐Γá ?COLOR --- b º¡áτÑ¡¿Ñ ΓÑ¬πΘÑú« µóÑΓ«ó«ú« íá⌐Γá !COLOR b --- πßΓá¡«ó¬á µóÑΓ«ó«ú« íá⌐Γá ä½∩ ºáñá¡¿∩ µóÑΓ«óδσ áΓα¿íπΓ«ó «»αÑñÑ½Ñ¡δ ¬«¡ßΓá¡Γδ, ß««ΓóÑΓßΓóπεΘ¿Ñ µóÑΓá¼, ñ«»πßΓ¿¼δ¼ ñ½∩ ¬«¡Γα«½½Ñαá µóÑΓ¡«ú« ñ¿ß»½Ñ∩: 0 - Black ùÑα¡δ⌐ 1 - Blue æ¿¡¿⌐ 2 - Green çÑ½Ñ¡δ⌐ 3 - Cyan ü½Ññ¡«-ú«½πí«⌐ 4 - Red èαáß¡δ⌐ 5 - Magenta æ¿αÑ¡Ñóδ⌐ 6 - Brown è«α¿τ¡Ñóδ⌐ 7 - White üÑ½δ⌐ 8 - Grey æÑαδ⌐ 9 - Light-Blue ƒα¬«-ß¿¡¿⌐ 10 - Light-Green ƒα¬«-ºÑ½Ñ¡δ⌐ 11 - Light-Cyan ƒα¬«-ú«½πí«⌐ 12 - Light-Red ƒα¬«-¬αáß¡δ⌐ 13 - Light-Magenta ƒα¬«-ß¿αÑ¡Ñóδ⌐ 14 - Yellow åÑ½Γδ⌐ 15 - Light-White ƒα¬«-íÑ½δ⌐ ä½∩ πßΓá¡«ó¬¿ ¿ «Γ¼Ñ¡δ ¼Ñαµá¡¿∩ ß¿¼ó«½«ó, ¿¼ÑεΘ¿σ ∩α¬¿⌐ µóÑΓ Σ«¡á (¡«¼Ñαá µóÑΓ«ó 8-15), ¿ß»«½∞ºπεΓß∩ ß½«óá BLINK ¿ BLINK-OFF. ûóÑΓ «¬á⌐¼½Ñ¡¿∩ φ¬αá¡á ñ¿ß»½Ñ∩ πßΓá¡áó½¿óáÑΓß∩ ß½«ó«¼ BORDER. Äτ¿ßΓ¬á á¬Γ¿ó¡«ú« «¬¡á (ºá»«½¡Ñ¡¿Ñ »α«íÑ½á¼¿) «ßπΘÑßΓó½∩ÑΓß∩ ß½«ó«¼ CLEARSCREEN. 15.2 ô»αáó½Ñ¡¿Ñ ¬παß«α«¼ ä½∩ »ÑαÑ¼ÑΘÑ¡¿∩ ¬παß«αá ó á¬Γ¿ó¡«¼ «¬¡Ñ ¿ ¡Ñ¬«Γ«αδσ ñαπú¿σ ¼á¡¿»π½∩µ¿⌐ ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ αÑá½¿º«óá¡δ ß½ÑñπεΘ¿Ñ »α«µÑñπαδ. UP --- »ÑαÑ¼ÑΘÑ¡¿Ñ ¬παß«αá ¡á ßΓα«¬π óóÑασ DOWN --- »ÑαÑ¼ÑΘÑ¡¿Ñ ¬παß«αá ¡á ßΓα«¬π ó¡¿º LEFT --- »ÑαÑ¼ÑΘÑ¡¿Ñ ¬παß«αá ¡á »«º¿µ¿ε ó»αáó« RIGHT --- »ÑαÑ¼ÑΘÑ¡¿Ñ ¬παß«αá ¡á »«º¿µ¿ε ó½Ñó« ?CURSOR --- x y óδñáτá ΓÑ¬πΘ¿¿σ ¬««αñ¿¡áΓ ¬παß«αá ó «¬¡Ñ GOTOXY x y --- πßΓá¡«ó¬á ¬παß«αá ó »«º¿µ¿ε ß ºáñá¡¡δ¼¿ ¬««αñ¿¡áΓá¼¿ HOME --- πßΓá¡«ó¬á ¬παß«αá ó ½Ñóδ⌐ óÑασ¡¿⌐ πú«½ «¬¡á SET-CURSOR n1 n2 --- πßΓá¡«ó¬á αáº¼Ñαá ¬παß«αá ?cursor --- n1 n2 óδñáτá αáº¼Ñαá ¬παß«αá (ß½«óáα∞ HIDDEN) gotoxy x y --- πßΓá¡«ó¬á ¬παß«αá ó »α«¿ºó«½∞¡πε »«º¿µ¿ε φ¬αá¡á [CURSOR] --- x y óδñáτá áíß«½εΓ¡δσ ¬««αñ¿¡áΓ ¬παß«αá (ß½«óáα∞ HIDDEN) 15.3 ô»αáó½Ñ¡¿Ñ »α«Γ∩ª¬«⌐ «¬¡á SCROLL --- πßΓá¡«ó¬á αÑª¿¼á »α«Γ∩ª¬¿ SCROLL-OFF --- «Γ¼Ñ¡á αÑª¿¼á »α«Γ∩ª¬¿ SCROLL-UP --- »α«Γ∩ª¬á «¬¡á óóÑασ SCROLL-DOWN --- »α«Γ∩ª¬á «¬¡á ó¡¿º ?SCROLL --- f óδñáτá αÑª¿¼á »α«Γ∩ª¬¿ 16. ê¡ΓÑα»αÑΓáµ¿∩ ¿ ¬«¼»¿½∩µ¿∩ Éáí«Γá öÄÉÆ-ß¿ßΓÑ¼δ »α¿ «íαáí«Γ¬Ñ óσ«ñ¡«ú« ΓÑ¬ßΓá ¼«ªÑΓ »α«¿ºó«ñ¿Γ∞ß∩ ó ñóπσ αÑª¿¼áσ - ó αÑª¿¼Ñ ¿¡ΓÑα»αÑΓáµ¿¿ ¿ ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿. Å«ß½Ñ Γ«ú«, ¬á¬ ¿º óσ«ñ¡«ú« »«Γ«¬á óδñÑ½Ñ¡« «τÑαÑñ¡«Ñ ß½«ó«, öÄÉÆ-ß¿ßΓÑ¼á óδ»«½¡¿Γ ΓÑ ¿½¿ ¿¡δÑ ñÑ⌐ßΓó¿∩ ó ºáó¿ß¿¼«ßΓ¿ «Γ ΓÑ¬πΘÑú« αÑª¿¼á. é αÑª¿¼Ñ ¿¡ΓÑα»αÑΓáµ¿¿ ß½«ó« ßαáºπ ªÑ óδ»«½¡∩ÑΓß∩, ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿ áñαÑß »«½∩ ¬«ñá ñá¡¡«ú« ß½«óá »«¼ÑΘáÑΓß∩ ó ß½«óáα∞ ß »α«ñó¿ªÑ¡¿Ñ¼ π¬áºáΓÑ½∩ ß½«óáα∩. ÉÑª¿¼ ¬«¼»¿½∩µ¿¿ πßΓá¡áó½¿óáÑΓß∩ »α¿ óδ»«½¡Ñ¡¿¿ Γá¬¿σ «»αÑñÑ½∩εΘ¿σ ß½«ó, ¬á¬ ":", WINDOW, TASK. ÆÑ¬πΘ¿⌐ αÑª¿¼ «»αÑñÑ½∩ÑΓß∩ º¡áτÑ¡¿Ñ¼ »ÑαÑ¼Ñ¡¡«⌐ STATE (TRUE - αÑª¿¼ ¬«¼»¿½∩µ¿¿, FALSE - ¿¡ΓÑα»αÑΓáµ¿∩). ô»αáó½Ñ¡¿Ñ αÑª¿¼á¼¿ «ßπΘÑßΓó½∩ÑΓß∩ ß½«óá¼¿ "[" (πßΓá¡«ó¿Γ∞ αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿) ¿ "]" (πßΓá¡«ó¿Γ∞ αÑª¿¼ ¬«¼»¿½∩µ¿¿). ìÑ¬«Γ«αδÑ ß½«óá (¡á»α¿¼Ñα, ß½«óá, αÑá½¿ºπεΘ¿Ñ ßΓαπ¬Γπαδ π»αáó½Ñ¡¿∩) óδ»«½¡∩εΓß∩ ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿. Æá¬¿Ñ ß½«óá ñ«½ª¡δ íδΓ∞ »«¼ÑτÑ¡δ »α¿º¡á¬«¼ ¡Ñ¼Ññ½Ñ¡¡«ú« óδ»«½¡Ñ¡¿∩ IMMEDIATE. æ½«ó« IMMEDIATE πßΓá¡áó½¿óáÑΓ π¬áºá¡¡δ⌐ »α¿º¡á¬ ñ½∩ »«ß½Ññ¡Ñú« «»αÑñÑ½Ñ¡¡«ú« ó ß½«óáαÑ öÄÉÆ-ß½«óá. é Γ«¼ ß½πτáÑ, ¬«úñá ó αÑª¿¼Ñ ¿¡ΓÑα»αÑΓáµ¿¿ ¡Ñ¬«Γ«α«Ñ ß½«ó« ñ«½ª¡« íδΓ∞ ß¬«¼»¿½¿α«óá¡«, φΓ« ¼«ªÑΓ íδΓ∞ óδ»«½¡Ñ¡« ß »α¿¼Ñ¡Ñ¡¿Ñ¼ ß½«óá [COMPILE], »«¼ÑΘáεΘÑú« áñαÑß »«½∩ ¬«ñá ß½ÑñπεΘÑú« ºá ¡¿¼ ß½«óá ó ß½«óáα¡πε ßΓáΓ∞ε. Åα¿ ¬«¼»¿½∩µ¿¿ öÄÉÆ-«»αÑñÑ½Ñ¡¿⌐ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ß½ÑñπεΘ¿Ñ ß½«óá: , n --- ºá»¿ß∞ ó ß½«óáα∞ 16-αáºα∩ñ¡«ú« ß½«óá ß »α«ñó¿ªÑ¡¿Ñ¼ π¬áºáΓÑ½∩ ß½«óáα∩ ALLOT n --- óδñÑ½Ñ¡¿Ñ »á¼∩Γ¿ ó ß½«óáαÑ LATEST --- addr áñαÑß »«½∩ ¿¼Ñ¡¿ »«ß½Ññ¡Ñú« «»αÑñÑ½Ñ¡¡«ú« ß½«óá ó ß½«óáαÑ RECURSE --- ¬«¼»¿½∩µ¿∩ αÑ¬παß¿ó¡«ú« «íαáΘÑ¡¿∩ ¬ «»αÑñÑ½∩Ñ¼«¼π ß½«óπ ÇñαÑßá »«½Ñ⌐ ß½«óáα¡δσ ßΓáΓÑ⌐ ¿¼ÑεΓ ß½ÑñπεΘ¿Ñ «í«º¡áτÑ¡¿∩: ÇñαÑß »«½∩ ¿¼Ñ¡¿ - NFA (Name Field Address) ÇñαÑß »«½∩ ßó∩º¿ - LFA (Link Field Address) ÇñαÑß »«½∩ ¬«ñá - CFA (Code Field Address) ÇñαÑß »«½∩ »áαá¼ÑΓα«ó - PFA (Parameter Field Address) ä½∩ »ÑαÑσ«ñá «Γ áñαÑß«ó «ñ¡¿σ »«½Ñ⌐ ¬ áñαÑßá¼ ñαπú¿σ ¿ß»«½∞ºπεΓß∩ ß½ÑñπεΘ¿Ñ ß½«óá: BODY> PFA --- CFA >NAME CFA --- NFA NAME> NFA --- CFA N>LINK NFA --- LFA L>NAME LFA --- CFA 17. Éáí«Γá ß« ß½«óáα∩¼¿ î¡«ªÑßΓó« ß½«ó, «»αÑñÑ½Ñ¡¡δσ ó öÄÉÆ-ß¿ßΓÑ¼Ñ, σαá¡¿Γß∩ ó ó¿ñÑ «ñ¡«ú« ¿½¿ ¡Ñß¬«½∞¬¿σ ß»¿ß¬«ó ß½«óáα¡δσ ßΓáΓÑ⌐ (ß½«óáαÑ⌐), ßó∩ºá¡¡δσ ¼Ñªñπ ß«í«⌐ τÑαÑº »«½Ñ ßó∩º¿. æ½«óá ó ß»¿ß¬Ñ ¿ΘπΓß∩ ó »«α∩ñ¬Ñ, «íαáΓ¡«¼ »«α∩ñ¬π ¿σ ó¬½ετÑ¡¿∩ ó ß½«óáα∞. èáªñδ⌐ ¿º ß»¿ß¬«ó ß½«ó ß«ºñáÑΓß∩ «»αÑñÑ½∩εΘ¿¼ ß½«ó«¼ VOCABULARY. éßÑ «»αÑñÑ½Ñ¡¡δÑ τÑαÑº VOCABULARY ß½«óá ßó∩ºδóáεΓß∩ »«¼¿¼« Γ«ú« ó «ΓñÑ½∞¡δ⌐ ß»¿ß«¬ - ß»¿ß«¬ ß½«óáαÑ⌐. êß»«½∞º«óá¡¿Ñ ß½«óáαÑ⌐ »«ºó«½∩ÑΓ, ¡á»α¿¼Ñα, ¿¼ÑΓ∞ αáº½¿τ¡δÑ αÑá½¿ºáµ¿¿ ΓÑσ ¿½¿ ¿¡δσ ß½«ó »«ñ «ñ¿¡á¬«óδ¼¿ ¿¼Ñ¡á¼¿ ¿, ¼á¡¿»π½¿απ∩ ß½«óáα∩¼¿, óδí¿αáΓ∞ ¡πª¡πε αÑá½¿ºáµ¿ε ó ¬áªñ«¼ ¬«¡¬αÑΓ¡«¼ ß½πτáÑ. äαπú¿¼ »α¿¼Ñα«¼ ¿ß»«½∞º«óá¡¿∩ ß½«óáαÑ⌐ ∩ó½∩ÑΓß∩ ºáΘ¿Γá «Γ «Φ¿í«¬ ó ß½πτáÑ »ÑαÑ«»αÑñÑ½Ñ¡¿∩ ¬á¬¿σ-½¿í« öÄÉÆ-ß½«ó. æ« ß½«óáα∩¼¿ ßó∩ºá¡δ ßΓá¡ñáαΓ¡δÑ »ÑαÑ¼Ñ¡¡δÑ: VOC-LINK - π¬áºáΓÑ½∞ »«ß½Ññ¡Ñú« «»αÑñÑ½Ñ¡¡«ú« τÑαÑº VOCABULARY ß½«óáα∩; CONTEXT - π¬áºáΓÑ½∞ »Ñαó«ú« »α«ß¼áΓα¿óáÑ¼«ú« »α¿ »«¿ß¬Ñ ß½«óáα∩; CURRENT - π¬áºáΓÑ½∞ ß½«óáα∩ »«»«½¡Ñ¡¿∩, Γ.Ñ. ß½«óáα∩, ó ¬«Γ«αδ⌐ ñ«íáó½∩εΓß∩ óó«ñ¿¼δÑ «»αÑñÑ½Ñ¡¿∩ öÄÉÆ-ß½«ó. ê¼ÑÑΓß∩ Γá¬ªÑ »αÑñ«»αÑñÑ½Ñ¡¡δ⌐ ß½«óáα∞ FORTH, ó¬½ετáεΦ¿⌐ óßÑ ßΓá¡ñáαΓ¡δÑ ß½«óá ¿, ó τáßΓ¡«ßΓ¿, ßá¼« ß½«ó« FORTH. Å«¿ß¬ ΓαÑíπÑ¼«ú« ß½«óá «ßπΘÑßΓó½∩ÑΓß∩ ó ß½ÑñπεΘÑ⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿: »α«ß¼áΓα¿óáÑΓß∩ ß½«óáα∞, π¬áºδóáÑ¼δ⌐ »ÑαÑ¼Ñ¡¡«⌐ CONTEXT, ºáΓÑ¼, ó ß½πτáÑ ¡Ñπñáτ¡«ú« »«¿ß¬á - ß½«óáα∞ »«»«½¡Ñ¡¿∩, π¬áºδóáÑ¼δ⌐ »ÑαÑ¼Ñ¡¡«⌐ CURRENT. Å«ß½Ññ¡¿¼ »α«ß¼áΓα¿óáÑ¼δ¼ ß½«óáαÑ¼ óßÑúñá ∩ó½∩ÑΓß∩ ß½«óáα∞ FORTH. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá, «»αÑñÑ½Ñ¡¡«ú« τÑαÑº VOCABULARY, πßΓá¡áó½¿óáÑΓß∩ ß««ΓóÑΓßΓóπεΘ¿⌐ ß½«óáα∞ º¡áτÑ¡¿Ñ¼ »ÑαÑ¼Ñ¡¡«⌐ CONTEXT. æ½«ó« DEFINITIONS ñÑ½áÑΓ ß½«óáα∞, π¬áºδóáÑ¼«⌐ »ÑαÑ¼Ñ¡¡«⌐ CONTEXT ß½«óáαÑ¼ »«»«½¡Ñ¡¿∩. Å« π¼«½τá¡¿ε ó ¡áτá½Ñ αáí«Γδ ß öÄÉÆ-ß¿ßΓÑ¼«⌐ »ÑαÑ¼Ñ¡¡δÑ CONTEXT ¿ CURRENT π¬áºδóáεΓ ¡á «ñ¿¡ ¿ Γ«Γ ªÑ ß½«óáα∞ FORTH. ôñá½Ñ¡¿Ñ ΓαÑíπÑ¼«ú« ß½«óá ¿º ß½«óáα∩ «ßπΘÑßΓó½∩ÑΓß∩ ß »«¼«Θ∞ε ß½«óá FORGET. Åα¿ φΓ«¼ ¿º ß½«óáα∩ öÄÉÆ-ß¿ßΓÑ¼δ πñá½∩ÑΓß∩ ¡Ñ Γ«½∞¬« ß½«ó«, π¬áºá¡¡«Ñ FORGET, ¡« ¿ óßÑ ß½«óá, «»αÑñÑ½Ñ¡¡δÑ »«ºªÑ πñá½∩Ñ¼«ú« ß½«óá. ÅÑτáΓ∞ ß»¿ß¬á ß½«óáαÑ⌐ ß «Γ¼ÑΓ¬«⌐ ΓÑ¬πΘÑú« »«α∩ñ¬á »«¿ß¬á «ßπΘÑßΓó½∩ÑΓß∩ ñ¿αÑ¬Γ¿ó«⌐ VOCS. 18. ê¡ΓÑα»αÑΓáµ¿∩ óσ«ñ¡«ú« »«Γ«¬á Éáí«Γá öÄÉÆ-ß¿ßΓÑ¼δ ºá¬½ετáÑΓß∩ ó« óó«ñÑ ¿º óσ«ñ¡«ú« »«Γ«¬á «ΓñÑ½∞¡δσ ß½«ó-¬«¼á¡ñ ¿ ¿σ ¿ß»«½¡Ñ¡¿¿. éσ«ñ¡δ¼ »«Γ«¬«¼ ¼«ªÑΓ ß½πª¿Γ∞ ΓÑ¬ßΓ, óó«ñ¿¼δ⌐ ß ¬½áó¿áΓπαδ ΓÑα¼¿¡á½á ¿½¿ ó¡ÑΦ¡¿⌐ φ¬αá¡¡δ⌐ Σá⌐½. éó«ñ ß ¬½áó¿áΓπαδ «ßπΘÑßΓó½∩ÑΓß∩ »«ßΓα«τ¡«, »α¿ φΓ«¼ ¬áªñá∩ óóÑñÑ¡¡á∩ ßΓα«¬á »«¼ÑΘáÑΓß∩ ó« óσ«ñ¡«⌐ ΓÑ¬ßΓ«óδ⌐ íπΣÑα TIB (Text Input Buffer), αáß»«½«ªÑ¡¡δ⌐ ó áñαÑß¡«¼ »α«ßΓαá¡ßΓóÑ öÄÉÆá. ä½¿¡á óσ«ñ¡«ú« íπΣÑαá σαá¡¿Γß∩ ó ßΓá¡ñáαΓ¡«⌐ »ÑαÑ¼Ñ¡¡«⌐ #TIB ¿ ß«ßΓáó½∩ÑΓ 80 ß¿¼ó«½«ó. æ½«óá öÄÉÆá óδí¿αáεΓß∩ ¿º íπΣÑαá ß½«ó«¼ WORD. Å« ¿ßτÑα»á¡¿¿ óσ«ñ¡«ú« »«Γ«¬á ó íπΣÑα TIB óó«ñ¿Γß∩ «τÑαÑñ¡á∩ »«αµ¿∩ ΓÑ¬ßΓá ß ΓÑα¼¿¡á½á. Åα¿ óó«ñÑ ΓÑ¬ßΓá ¿º ó¡ÑΦ¡Ñú« φ¬αá¡¡«ú« Σá⌐½á óσ«ñ¡δ¼ »«Γ«¬«¼ ∩ó½∩ÑΓß∩ íπΣÑα, ¿ß»«½∞ºπÑ¼δ⌐ ñ½∩ αáí«Γδ ß Σá⌐½á¼¿. ÇñαÑß φΓ«ú« íπΣÑαá óδñáÑΓß∩ »α¿ τΓÑ¡¿¿ Σá⌐½á ß½«ó«¼ BLOCK. ÅÑαÑ¬½ετÑ¡¿Ñ¼ óσ«ñ¡«ú« »«Γ«¬á π»αáó½∩ÑΓ »ÑαÑ¼Ñ¡¡á∩ BLK, º¡áτÑ¡¿Ñ ¬«Γ«α«⌐ »α«óÑα∩ÑΓß∩ ¬áªñδ⌐ αáº »α¿ «íαáΘÑ¡¿¿ ¬ ß½«óπ WORD. Åα¿ ¡π½Ñó«¼ º¡áτÑ¡¿¿ BLK óó«ñ «ßπΘÑßΓó½∩ÑΓß∩ ¿º ΓÑα¼¿¡á½∞¡«ú« íπΣÑαá TIB, ó »α«Γ¿ó¡«¼ ß½πτáÑ º¡áτÑ¡¿Ñ BLK αáßß¼áΓα¿óáÑΓß∩ ¬á¬ ¡«¼Ñα ΓÑ¬πΘÑú« í½«¬á óó«ñ¿¼«ú« φ¬αá¡¡«ú« Σá⌐½á. ÆÑ¬πΘá∩ »«º¿µ¿∩ ó« óσ«ñ¡«¼ »«Γ«¬Ñ π¬áºδóáÑΓß∩ »ÑαÑ¼Ñ¡¡«⌐ >IN. Åα¿ óó«ñÑ ß ΓÑα¼¿¡á½á ÑÑ º¡áτÑ¡¿Ñ ¼«ªÑΓ ¿º¼Ñ¡∩Γ∞ß∩ ó ñ¿á»áº«¡Ñ «Γ 0 ñ« TIB#, »α¿ óó«ñÑ ¿º ó¡ÑΦ¡Ñ⌐ »á¼∩Γ¿ - «Γ 0 ñ« º¡áτÑ¡¿∩ ¬«¡ßΓá¡Γδ B/BUF (αáº¼Ñα í½«¬á Σá⌐½á). è«¡Ñµ óó«ñ¿¼«ú« ΓÑ¬ßΓá «Γ¼ÑτáÑΓß∩ ó« óσ«ñ¡«¼ »«Γ«¬Ñ ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼. Åα¿ óó«ñÑ Γá¬«ú« ß¿¼ó«½á ß½«ó«¼ WORD óδ»«½¡∩ÑΓß∩ ß»Ñµ¿á½∞¡«Ñ ß½«ó« öÄÉÆá ß »πßΓδ¼ ¿¼Ñ¡Ñ¼, ¬«Γ«α«Ñ »αÑ¬αáΘáÑΓ ¿¡ΓÑα»αÑΓáµ¿ε óσ«ñ¡«ú« »«Γ«¬á. ê¡ΓÑα»αÑΓáµ¿ε óσ«ñ¡«ú« »«Γ«¬á «ßπΘÑßΓó½∩ÑΓ ß½«ó« INTERPRET, ¬«Γ«α«Ñ ó íÑß¬«¡Ñτ¡«¼ µ¿¬½Ñ óδ»«½¡∩ÑΓ óó«ñ ¿ ¿ß»«½¡Ñ¡¿Ñ ß½«ó ¿º óσ«ñ¡«ú« »«Γ«¬á. é ß½πτáÑ, Ñß½¿ «τÑαÑñ¡«Ñ ß½«ó« ¡Ñ ¡á⌐ñÑ¡« ó ß½«óáαÑ, óδ»«½¡∩ÑΓß∩ ß½«ó« NUMBER, ¬«Γ«α«Ñ »δΓáÑΓß∩ ó«ß»α¿¡∩Γ∞ ñá¡¡«Ñ ß½«ó« ¬á¬ ºá»¿ß∞ τ¿ß½«ó«ú« ½¿ΓÑαá½á. Åα¿ á¡á½¿ºÑ ¿ß»«½∞ºπÑΓß∩ º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ BASE, ß«ñÑαªáΘÑ⌐ ΓÑ¬πΘÑÑ «ß¡«óá¡¿Ñ ß¿ßΓÑ¼δ ßτ¿ß½Ñ¡¿∩. Åα¿ πñáτ¡«¼ »αÑ«íαáº«óá¡¿¿ ß½«ó« NUMBER ó«ºóαáΘáÑΓ ¡á ßΓÑ¬Ñ º¡áτÑ¡¿Ñ τ¿ß½á ß ñó«⌐¡«⌐ Γ«τ¡«ßΓ∞ε, á ó »ÑαÑ¼Ñ¡¡πε DPL »«¼ÑΘáÑΓ »«½«ªÑ¡¿Ñ ñÑß∩Γ¿τ¡«⌐ Γ«τ¬¿ ó ºá»¿ß¿ τ¿ß½á (-1 ó ß½πτáÑ τ¿ß½á «íδτ¡«⌐ Γ«τ¡«ßΓ¿). Åα¿ ¡Ñπñáτ¡«¼ »αÑ«íαáº«óá¡¿¿ τ¿ß½á óδñáÑΓß∩ ß««íΘÑ¡¿Ñ « Γ«¼, τΓ« ß««ΓóÑΓßΓóπεΘÑÑ ß½«ó« ¡Ñ «»αÑñÑ½Ñ¡« ¿ ¿¡ΓÑα»αÑΓáµ¿∩ óσ«ñ¡«ú« »«Γ«¬á »αÑ¬αáΘáÑΓß∩. ä½∩ »ÑαÑ¬½ετÑ¡¿∩ óσ«ñ¡«ú« »«Γ«¬á ¡á ó¡ÑΦ¡¿⌐ Σá⌐½ »αÑñπß¼«ΓαÑ¡« ß½«ó« LOAD, ¿ß»«½∞ºπÑ¼«Ñ ó ó¿ñÑ n LOAD, úñÑ n - ¡«¼Ñα ¡áτá½∞¡«ú« φ¬αá¡á ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á, ΓÑ¬ßΓ ¬«Γ«α«ú« ¡áñ« ¿¡ΓÑα»αÑΓ¿α«óáΓ∞. ä½∩ »ÑαÑσ«ñá «Γ ¿¡ΓÑα»αÑΓáµ¿¿ «ñ¡«ú« φ¬αá¡á ¬ ß½ÑñπεΘÑ¼π ñ«½ª¡« ¿ß»«½∞º«óáΓ∞ß∩ ß½«ó« --> , ß »«¼«Θ∞ε ¬«Γ«α«ú« ¼«ª¡« ºáúαπº¿Γ∞ ¡Ñß¬«½∞¬« »«ß½Ññ«óáΓÑ½∞¡δσ φ¬αá¡«ó. ê¡ΓÑα»αÑΓáµ¿∩ Σá⌐½á ºáóÑαΦáÑΓß∩ ½¿í« »«ß½Ñ ¿¡ΓÑα»αÑΓáµ¿¿ φ¬αá¡á, ¡Ñ ß«ñÑαªáΘÑú« »α¿º¡á¬á »α«ñ«½ªÑ¡¿∩ -->, ½¿í« »α¿ óδ»«½¡Ñ¡¿¿ ß½«óá ;S , ºáóÑαΦáεΘÑú« ºáúαπº¬π Σá⌐½á. 19. Äíαáí«Γ¬á »αÑαδóá¡¿⌐ é «íΘÑ¼ ß½πτáÑ ñ½∩ «íαáí«Γ¬¿ á»»áαáΓ¡δσ ¿ »α«úαá¼¼¡δσ »αÑαδóá¡¿⌐ ¿ß»«½∞ºπÑΓß∩ ¼Ñσá¡¿º¼ »«ñ¼Ñ¡δ óÑ¬Γ«αá »αÑαδóá¡¿⌐, ß«ñÑαªáΘÑú« áñαÑßá »α«µÑñπα, óδºδóáÑ¼δσ ñ½∩ «íαáí«Γ¬¿ ß««ΓóÑΓßΓóπεΘÑú« »αÑαδóá¡¿∩. ä½∩ πßΓá¡«ó¬¿ óÑ¬Γ«αá »αÑαδóá¡¿⌐ ¿ß»«½∞ºπÑΓß∩ «»αÑñÑ½Ñ¡¡«Ñ ó ß½«óáαÑ HIDDEN ß½«ó«: set-interrupt segm disp n --- úñÑ segm, disp - ºáñáεΓ áñαÑß »α«µÑñπαδ «íαáí«Γ¬¿ »αÑαδóá¡¿⌐ (segm:disp - ßÑú¼Ñ¡Γ:ß¼ÑΘÑ¡¿Ñ), n - ¡«¼Ñα »αÑαδóá¡¿∩ (0-255). Åα«µÑñπαá «íαáí«Γ¬¿ »αÑαδóá¡¿⌐ »¿ΦÑΓß∩ ¡á öÄÉÆ-áßßÑ¼í½ÑαÑ. é ¬áτÑßΓóÑ »áαá¼ÑΓαá segm »α¿ φΓ«¼ ¿ß»«½∞ºπÑΓß∩ «ß¡«ó¡«⌐ ßÑú¼Ñ¡Γ öÄÉÆá, º¡áτÑ¡¿Ñ ¬«Γ«α«ú« óδñáÑΓß∩ ß½«ó«¼ ?cs:. æ¼ÑΘÑ¡¿Ñ disp - áñαÑß »«½∩ »áαá¼ÑΓα«ó ß««ΓóÑΓßΓóπεΘÑú« CODE-«»αÑñÑ½Ñ¡¿∩. Åα«µÑñπαá «íαáí«Γ¬¿ »αÑαδóá¡¿⌐ ñ«½ª¡á »«ºáí«Γ¿Γ∞ß∩ « ß«σαá¡Ñ¡¿¿ ¿ß»«½∞ºπÑ¼δσ Ñε αÑú¿ßΓα«ó (»α¿ óδº«óÑ »α«µÑñπαδ ¿ºóÑßΓ¡« ½¿Φ∞, τΓ« ßÑú¼Ñ¡Γ¡δ⌐ αÑú¿ßΓα CS ß««ΓóÑΓßΓóπÑΓ «ß¡«ó¡«¼π ßÑú¼Ñ¡Γπ öÄÉÆá). éδσ«ñ ¿º »α«µÑñπαδ ñ«½ªÑ¡ «ßπΘÑßΓó½∩Γ∞ß∩ ¬«¼á¡ñ«⌐ ó«ºóαáΓá ¿º »αÑαδóá¡¿∩ IRET. é ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ »αÑñπß¼«ΓαÑ¡á «íαáí«Γ¬á »αÑαδóá¡¿∩ «Γ ¬½áó¿áΓπαδ »« ¡áªáΓ¿ε ¬½áó¿Φ Ctrl/Break (»αÑαδóá¡¿Ñ 1BH). Åα¿ ó«º¡¿¬¡«óÑ¡¿¿ Γá¬«ú« »αÑαδóá¡¿∩ öÄÉÆ-ß¿ßΓÑ¼á »«ß½Ññ«óáΓÑ½∞¡« ºá¬αδóáÑΓ óßÑ á¬Γ¿ó¡δÑ «¬¡á ó»½«Γ∞ ñ« «¬¡á, ó ¬«Γ«α«¼ αáí«ΓáÑΓ öÄÉÆ-¿¡ΓÑα»αÑΓáΓ«α. ÅαÑαδóá¡¿Ñ »« Ctrl/Break ¼«ª¡« ºáí½«¬¿α«óáΓ∞, óδ»«½¡¿ó ß½«ó« CLI. çá¬αδΓ∞ »αÑαδóá¡¿Ñ ¡Ñ«íσ«ñ¿¼«, ¬á¬ »αáó¿½«, »α¿ óδ»«½¡Ñ¡¿¿ «»Ñαáµ¿⌐, ¬«Γ«αδÑ ñ«½ª¡δ íδΓ∞ »«½¡«ßΓ∞ε ºáóÑαΦÑ¡δ (¡á»α¿¼Ñα, «Γ¬αδΓ¿Ñ ¿ ºá¬αδΓ¿Ñ «¬«¡, »ÑαÑ¼ÑΘÑ¡¿Ñ «¬«¡ »« φ¬αá¡π ñ¿ß»½Ñ∩ ¿ Γ.ñ.). é τáßΓ¡«ßΓ¿, »α¿ αÑá½¿ºáµ¿¿ ßÑαó¿ß¡δσ ß½«ó WORDS, .STACK ¿ ñα., á Γá¬ªÑ ó αÑñá¬Γ«αÑ EDIT »αÑαδóá¡¿∩ «Γ ¬½áó¿áΓπαδ ºá¬αδΓδ. ä½∩ »αÑ¬αáΘÑ¡¿∩ αáí«Γδ »«ñ«í¡δσ »α«µÑñπα ¿ »α«úαá¼¼ ß½ÑñπÑΓ »«½∞º«óáΓ∞ß∩ »αÑñπß¼«ΓαÑ¡¡δ¼¿ ó ¡¿σ Σπ¡¬µ¿«¡á½∞¡δ¼¿ ¬½áó¿Φá¼¿ (¬á¬ »αáó¿½«, ¿ß»«½∞ºπÑΓß∩ ¬½áó¿Φá ESC). ÄΓ¬αδΓ¿Ñ »αÑαδóá¡¿⌐ »« Ctrl/Break »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ STI. Åα¿º¡á¬ πßΓá¡«ó¬¿ »αÑαδóá¡¿∩ «Γ ¬½áó¿áΓπαδ σαá¡¿Γß∩ ó USER-»ÑαÑ¼Ñ¡¡«⌐ IFL ( IFL=TRUE - »αÑαδóá¡¿Ñ αáºαÑΦÑ¡«, IFL=FALSE - »αÑαδóá¡¿Ñ ºá»αÑΘÑ¡«). ä½∩ »«½¡«ú« ºá¬αδΓ¿∩ »α«úαá¼¼¡δσ ¿ á»»áαáΓ¡δσ »αÑαδóá¡¿⌐ (¡á»α¿¼Ñα, ó ß½πτáÑ »α∩¼«ú« ñ«ßΓπ»á ¬ ó¿ñÑ«»á¼∩Γ¿ ñ¿ß»½Ñ∩ ¿ ñα.) «»αÑñÑ½Ñ¡« ß½«ó« cli (óδ»«½¡∩ÑΓ ß««ΓóÑΓßΓóπεΘπε ¬«¼á¡ñπ »α«µÑßß«αá CLI - Clear Interrupts); «Γ¬αδΓ¿Ñ óßÑσ »αÑαδóá¡¿⌐ «ßπΘÑßΓó½∩ÑΓß∩ ß½«ó«¼ sti (óδ»«½¡∩ÑΓß∩ ¬«¼á¡ñá STI - Set Interrupts). Å«¼¿¼« »αÑαδóá¡¿⌐ «Γ ¬½áó¿áΓπαδ ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ ¿ß»«½∞ºπÑΓß∩ »«ñ¼Ñ¡á »αÑαδóá¡¿∩ «Γ á»»áαáΓ¡«ú« Γá⌐¼Ñαá (»αÑαδóá¡¿Ñ 1CH). ÅαÑαδóá¡¿Ñ «Γ Γá⌐¼Ñαá ¿ß»«½∞ºπÑΓß∩ ñ½∩ «αúá¡¿ºáµ¿¿ ¼¡«ú«ºáñáτ¡«ú« óδ»«½¡Ñ¡¿∩ öÄÉÆ-«»αÑñÑ½Ñ¡¿⌐, á Γá¬ªÑ ñ½∩ ó«ß»α«¿ºóÑñÑ¡¿∩ ¼πºδ¬á½∞¡δσ ¼Ñ½«ñ¿⌐. 20. ê¡ΓÑαΣÑ⌐ß ß Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐ äÄæ ìáí«α ¿¼ÑεΘ¿σß∩ ó ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ ß½«ó »«ºó«½∩ÑΓ «ßπΘÑßΓó½∩Γ∞ »α∩¼«⌐ ¿ »«ß½Ññ«óáΓÑ½∞¡δ⌐ ñ«ßΓπ» ¬ »α«¿ºó«½∞¡δ¼ Σá⌐½á¼ ¿ ñ¿αÑ¬Γ«α¿∩¼ äÄæ. ¥Γ«Γ ¡áí«α ó¬½ετáÑΓ ßαÑñßΓóá ñ½∩ ºáñá¡¿∩ ΓÑ¬πΘ¿σ ñ¿αÑ¬Γ«α¿⌐, ¼á¡¿»π½∩µ¿¿ ß í½«¬á¼¿ π»αáó½Ñ¡¿∩ Σá⌐½«ó, »ÑαÑ¡áº¡áτÑ¡¿∩ ßΓá¡ñáαΓ¡«ú« óó«ñá ¿ óδó«ñá Äæ. ä½∩ αáí«Γδ ß Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐ äÄæ ¿ß»«½∞ºπÑΓß∩ »«¡∩Γ¿Ñ ñÑß¬α¿»Γ«αá Σá⌐½á HCB (Handle Control Block). äÑß¬α¿»Γ«α Σá⌐½á ó¬½ετáÑΓ ó ßÑí∩ 64-íá⌐Γ«ó«Ñ »«½Ñ, ß«ñÑαªáΘÑÑ »«½¡πε ß»Ñµ¿Σ¿¬áµ¿ε ¿¼Ñ¡¿ Σá⌐½á ó ó¿ñÑ: [d:][path]filename[.filetype] úñÑ d: - «í«º¡áτÑ¡¿Ñ πßΓα«⌐ßΓóá, path - π¬áºáΓÑ½∞ ñ¿αÑ¬Γ«α¿¿, filename - ¿¼∩ Σá⌐½á, filetype - αáßΦ¿αÑ¡¿Ñ ¿¼Ñ¡¿ Σá⌐½á. èα«¼Ñ Γ«ú«, ñÑß¬α¿»Γ«α Σá⌐½á ß«ñÑαª¿Γ óß»«¼«úáΓÑ½∞¡πε ¿¡Σ«α¼áµ¿ε, ¿ß»«½∞ºπÑ¼πε ¿¡ΓÑαΣÑ⌐ß¡δ¼¿ »α«µÑñπαá¼¿ »α¿ óδ»«½¡Ñ¡¿¿ αáº½¿τ¡δσ «»Ñαáµ¿⌐ ¡áñ Σá⌐½á¼. äÑß¬α¿»Γ«α Σá⌐½á ß«ºñáÑΓß∩ ß »«¼«Θ∞ε «»αÑñÑ½∩εΘÑú« ß½«óá HANDLE, ¿ß»«½∞ºπÑ¼«ú« ó ó¿ñÑ: HANDLE name úñÑ name - ¿¼∩ ñÑß¬α¿»Γ«αá Σá⌐½á. Åα¿ ß«ºñá¡¿¿ ¿ ¿¡¿µ¿á½¿ºáµ¿¿ ñÑß¬α¿»Γ«απ »α¿»¿ßδóáÑΓß∩ Σ¿¬Γ¿ó¡«Ñ πßΓα«⌐ßΓó« "NUL". äÑß¬α¿»Γ«α Σá⌐½á ßó∩ºδóáÑΓß∩ ß ¬«¡¬αÑΓ¡δ¼ ¿¼Ñ¡Ñ¼ Σá⌐½á »α¿ óδ»«½¡Ñ¡¿¿ ß½«óá FILENAME. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name, «»αÑñÑ½Ñ¡¡«ú« τÑαÑº HANDLE ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß «í½áßΓ¿ »á¼∩Γ¿, óδñÑ½Ñ¡¡«⌐ ñ½∩ HCB, ¿ ß«ñÑαª¿¼«Ñ »Ñαó«ú« ÑÑ ß½«óá. äóá φΓ¿σ º¡áτÑ¡¿∩ «í«º¡áτáεΓß∩ ñá½ÑÑ ó «»¿ßá¡¿¿ ¿¡ΓÑαΣÑ⌐ß¡δσ »α«µÑñπα "handle-pars" (»áαá¼ÑΓαδ HCB). àß½¿ Σá⌐½, ßó∩ºá¡¡δ⌐ ß ñá¡¡δ¼ HCB ¡Ñ «Γ¬αδΓ, Γ« ó ¬áτÑßΓóÑ »áαá¼ÑΓα«ó HCB ó«ºóαáΘáÑΓß∩ áñαÑß HCB ¿ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. äÑß¬α¿»Γ«α Σá⌐½á HCB ¿¼ÑÑΓ ß½ÑñπεΘπε ßΓαπ¬Γπαπ: æ¼ÑΘÑ¡¿Ñ æ«ñÑαª¿¼«Ñ 0-1 ¿¡Σ«α¼áµ¿∩ äÄæ 2-3 Σ½áú¿. ìπ½Ñó«Ñ º¡áτÑ¡¿Ñ ñ½∩ ¡Ñ«Γ¬αδΓ«ú« Σá⌐½á. 4 ñ½¿¡á »«½¡«ú« ¿¼Ñ¡¿ Σá⌐½á ó ß¿¼ó«½áσ. 5-68 »«½¡«Ñ ¿¼∩ Σá⌐½á ó ¬«ñÑ ASCII, ñ«»«½¡Ñ¡¡«Ñ ó ¬«¡µÑ ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼. é «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼Ñ ßτ¿ΓáεΓß∩ »αÑñ«»αÑñÑ½Ñ¡¡δ¼¿ ß½ÑñπεΘ¿Ñ "ßΓá¡ñáαΓ¡δÑ" πßΓα«⌐ßΓóá, ¬«Γ«αδÑ ¼«úπΓ ¿ß»«½∞º«óáΓ∞ß∩ ñ½∩ óó«ñá ¿½¿ óδó«ñá ñá¡¡δσ ß »«¼«Θ∞ε »α«µÑñπα αáí«Γδ ß Σá⌐½á¼¿. ¥Γ¿ πßΓα«⌐ßΓóá ¡Ñ ΓαÑíπεΓ »αÑñóáα¿ΓÑ½∞¡«ú« «Γ¬αδΓ¿∩ »ÑαÑñ «íαáΘÑ¡¿Ñ¼ ¬ ¡¿¼. æΓá¡ñáαΓ¡δ¼¿ πßΓα«⌐ßΓóá¼¿ ∩ó½∩εΓß∩ ß½ÑñπεΘ¿Ñ: 0000 - STD-INPUT ßΓá¡ñáαΓ¡«Ñ πßΓα«⌐ßΓó« óó«ñá. î«ªÑΓ íδΓ∞ »ÑαÑ¡áº¡áτÑ¡«. 0001 - STD-OUTPUT ßΓá¡ñáαΓ¡«Ñ πßΓα«⌐ßΓó« óδó«ñá. î«ªÑΓ íδΓ∞ »ÑαÑ¡áº¡áτÑ¡«. 0002 - STD-ERROR ßΓá¡ñáαΓ¡«Ñ πßΓα«⌐ßΓó« ñ½∩ óδó«ñá ß««íΘÑ¡¿⌐ «í «Φ¿í¬áσ. ôßΓα«⌐ßΓó« ¡Ñ ¼«ªÑΓ íδΓ∞ »ÑαÑ¡áº¡áτÑ¡«. 0003 - STD-AUX ßΓá¡ñáαΓ¡«Ñ ñ«»«½¡¿ΓÑ½∞¡«Ñ πßΓα«⌐ßΓó«. 0004 - STD-LIST ßΓá¡ñáαΓ¡«Ñ »ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó«. ä½∩ «ßπΘÑßΓó½Ñ¡¿∩ αáº½¿τ¡δσ ¼á¡¿»π½∩µ¿⌐ ß ñ¿αÑ¬Γ«α¿∩¼¿ (ß«ºñá¡¿Ñ, πñá½Ñ¡¿Ñ ¿ Γ.».) ¿ß»«½∞ºπÑΓß∩ ßΓαπ¬Γπαá ñá¡¡δσ, ¡áºδóáÑ¼á∩ "ü½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐" DCB (Directory Control Block). ü½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ ß«ºñáÑΓß∩ «»αÑñÑ½∩εΘ¿¼ ß½«ó«¼ DIRECTORY, ¬«Γ«α«Ñ ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: DIRECTORY name çñÑß∞ name - ¿¼∩ í½«¬á π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐. æó∩º∞ DCB ß ¬«¡¬αÑΓ¡«⌐ ñ¿αÑ¬Γ«α¿Ñ⌐ »α«¿ºó«ñ¿Γß∩ »α¿ ºáñá¡¿¿ ¿¼Ñ¡¿ ñ¿αÑ¬Γ«α¿¿ ß »«¼«Θ∞ε ß½«óá DIRNAME. Åα¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¡«ú« τÑαÑº ß½«ó« DIRECTORY ß½«óá name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß í½«¬á π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ "directory-par", ¬«Γ«αδ⌐ ¿ß»«½∞ºπÑΓß∩ ó ¬áτÑßΓóÑ »áαá¼ÑΓαá ¿¡ΓÑαΣÑ⌐ß¡δ¼¿ »α«µÑñπαá¼¿. ü½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ ¿¼ÑÑΓ ß½ÑñπεΘ¿⌐ Σ«α¼áΓ: æ¼ÑΘÑ¡¿Ñ æ«ñÑαª¿¼«Ñ 0 ñ½¿¡á ¿¼Ñ¡¿ ñ¿αÑ¬Γ«α¿¿ ó ß¿¼ó«½áσ. 1 ¿¼∩ ñ¿αÑ¬Γ«α¿¿ ó ¬«ñÑ ASCII, ñ«»«½¡Ñ¡¡«Ñ ß»αáóá ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼. îá¬ß¿¼á½∞¡« ñ«»πßΓ¿¼á∩ ñ½¿¡á ¿¼Ñ¡¿ - 63 ß¿¼ó«½á. ü½«¬ π»αáó½Ñ¡¿∩ ñ½∩ ¬«α¡Ñó«⌐ ñ¿αÑ¬Γ«α¿¿, «í«º¡áτáÑ¼«⌐ "\", ¿¼ÑÑΓ ß»Ñµ¿á½∞¡«Ñ ¿¼∩ ROOT. é¡«ó∞ ß«ºñáóáÑ¼δ⌐ í½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ »« π¼«½τá¡¿ε ßó∩ºδóáÑΓß∩ ß ¬«α¡Ñó«⌐ ñ¿αÑ¬Γ«α¿Ñ⌐ "\" ó»½«Γ∞ ñ« ∩ó¡«ú« ºáñá¡¿∩ ¿¼Ñ¡¿ ñ¿αÑ¬Γ«α¿¿ ß »«¼«Θ∞ε ß½«óá DIRNAME. îá¬ß¿¼á½∞¡« ñ«»πßΓ¿¼«Ñ τ¿ß½« «ñ¡«óαÑ¼Ñ¡¡« «Γ¬αδΓδσ Σá⌐½«ó «»αÑñÑ½∩ÑΓß∩ »áαá¼ÑΓα«¼ «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ FILES, ¬«Γ«αδ⌐ ºáñáÑΓß∩ ó «»¿ßá¡¿¿ ¬«¡Σ¿úπαáµ¿¿ Äæ ó Σá⌐½Ñ CONFIG.SYS. Å« π¼«½τá¡¿ε º¡áτÑ¡¿Ñ FILES αáó¡« 8. êº-ºá ¡á½¿τ¿∩ »αÑñ«»αÑñÑ½Ñ¡¡δσ ßΓá¡ñáαΓ¡δσ πßΓα«⌐ßΓó óó«ñá-óδó«ñá αÑá½∞¡«Ñ ñ«»πßΓ¿¼«Ñ τ¿ß½« «Γ¬αδóáÑ¼δσ Σá⌐½«ó ¡á 5 ¼Ñ¡∞ΦÑ º¡áτÑ¡¿∩ FILES. ä½∩ óδ»«½¡Ñ¡¿∩ ¡áñ Σá⌐½á¼¿ «»Ñαáµ¿⌐ τΓÑ¡¿∩ ¿ ºá»¿ß¿ ó áñαÑß¡«¼ »α«ßΓαá¡ßΓóÑ öÄÉÆ-ß¿ßΓÑ¼δ ñ«½ª¡δ íδΓ∞ ∩ó¡« ºáñá¡δ íπΣÑα¡δÑ «í½áßΓ¿ ΓαÑíπÑ¼«ú« αáº¼Ñαá. ¥Γ« ¼«ªÑΓ íδΓ∞ ßñÑ½á¡«, ¡á»α¿¼Ñα, ß ¿ß»«½∞º«óá¡¿Ñ¼ ¬«¡ßΓαπ¬µ¿¿ ó¿ñá: VARIABLE name n-2 ALLOT çñÑß∞ name - ¿¼∩ íπΣÑα¡«⌐ «í½áßΓ¿, n - αáº¼Ñα íπΣÑα¡«⌐ «í½áßΓ¿, Γ.Ñ. ¼á¬ß¿¼á½∞¡á∩ ñ½¿¡á ßτ¿ΓδóáÑ¼δσ ¿º Σá⌐½á ¿½¿ ºá»¿ßδóáÑ¼δσ ó Σá⌐½ ºá»¿ßÑ⌐. éßÑ ¿¡ΓÑαΣÑ⌐ß¡δÑ »α«µÑñπαδ, óδ»«½¡∩εΘ¿Ñ αáº½¿τ¡δÑ «»Ñαáµ¿¿ ¡áñ Σá⌐½á¼¿, ó«ºóαáΘáεΓ ¡á ßΓÑ¬Ñ ¬«ñ «Φ¿í¬¿, ß¿ú¡á½¿º¿απεΘ¿⌐ « »αáó¿½∞¡«ßΓ¿ óδ»«½¡Ñ¡¿∩ «»Ñαáµ¿¿. ìπ½Ñó«Ñ º¡áτÑ¡¿Ñ ¬«ñá π¬áºδóáÑΓ ¡á πß»ÑΦ¡«Ñ óδ»«½¡Ñ¡¿Ñ «»Ñαáµ¿¿, ¡Ñ¡π½Ñó«Ñ - ß««ΓóÑΓßΓóπÑΓ Γ«⌐ ¿½¿ ¿¡«⌐ «Φ¿í«τ¡«⌐ ß¿Γπáµ¿¿, ñ¿áú¡«ßΓ¿α«óá¡¡«⌐ »α¿ óδ»«½¡Ñ¡¿¿ »α«µÑñπαδ. Ç¡á½¿º ¬«ñá «Φ¿í¬¿ ¿ óδñáτá ß««ΓóÑΓßΓóπεΘÑú« ß««íΘÑ¡¿∩ ¼«úπΓ íδΓ∞ óδ»«½¡Ñ¡δ ß »«¼«Θ∞ε ß½«óá .STATUS, óδºδóáÑ¼«ú« »«ß½Ñ óδ»«½¡Ñ¡¿∩ «»Ñαáµ¿¿ ¡áñ Σá⌐½«¼, óδαáí«ΓáóΦÑ⌐ ¡á ßΓÑ¬Ñ ¬«ñ «Φ¿í¬¿. Åα¿ ¡Ñ¡π½Ñó«¼ º¡áτÑ¡¿¿ ¬«ñá «Φ¿í¬¿ ß½«ó«¼ .STATUS óδñáÑΓß∩ ß««ΓóÑΓßΓóπεΘÑÑ ñ¿áú¡«ßΓ¿τÑß¬«Ñ ß««íΘÑ¡¿Ñ, óδ»«½¡Ñ¡¿Ñ »α«µÑñπαδ »αÑαδóáÑΓß∩ ¿ »α«¿ßσ«ñ¿Γ »ÑαÑσ«ñ ó αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿. é »α«Γ¿ó¡«¼ ß½πτáÑ ¡π½Ñó«⌐ ¬«ñ «Φ¿í¬¿ »α«ßΓ« ß¡¿¼áÑΓß∩ ß« ßΓÑ¬á. 20.1 Åα¿¼Ñα ¿ß»«½∞º«óá¡¿∩ ¿¡ΓÑαΣÑ⌐ßá ß Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐. è«»¿α«óá¡¿Ñ Σá⌐½á A:SRC.TXT ó Σá⌐½ B:DST.TXT. VARIABLE BUFFER 254 ALLOT ( ß«ºñá¡¿Ñ íπΣÑα¡«⌐ «í½áßΓ¿ αáº¼Ñα«¼ 256 íá⌐Γ«ó ) HANDLE SRC ( ß«ºñá¡¿Ñ ñÑß¬α¿»Γ«αá Σá⌐½á τΓÑ¡¿∩ ) HANDLE DST ( ß«ºñá¡¿Ñ ñÑß¬α¿»Γ«αá Σá⌐½á ºá»¿ß¿ ) : COPY SRC [COMPILE] FILENAME ( ºáñá¡¿Ñ ¿¼Ñ¡¿ óσ«ñ¡«ú« Σá⌐½á ) DST [COMPILE] FILENAME ( ºáñá¡¿Ñ ¿¼Ñ¡¿ óδσ«ñ¡«ú« Σá⌐½á ) SRC OPEN-FILE-R/O .STATUS ( «Γ¬αδΓ¿Ñ ¡á τΓÑ¡¿Ñ óσ«ñ¡«ú« Σá⌐½á ) SRC MAKE-FILE .STATUS ( ß«ºñá¡¿Ñ »πßΓ«ú« Σá⌐½á ) BEGIN SRC 256 BUFFER READ 0= ( τΓÑ¡¿Ñ «τÑαÑñ¡«⌐ ºá»¿ß¿ óσ«ñ¡«ú« Σá⌐½á ß »α«óÑα¬«⌐ πß»ÑΦ¡«ßΓ¿ τΓÑ¡¿∩ ) WHILE DST ROT BUFFER WRITE .STATUS DROP ( ºá»¿ß∞ «τÑαÑñ¡«⌐ ºá»¿ß¿ ó óδσ«ñ¡«⌐ Σá⌐½. êß»«½∞ºπÑΓß∩ αÑá½∞¡á∩ ñ½¿¡á ºá»¿ß¿, «ßΓáó½Ñ¡¡á∩ ¡á ßΓÑ¬Ñ ß½«ó«¼ READ ) REPEAT SRC CLOSE-FILE .STATUS ( ºá¬αδΓ¿Ñ óσ«ñ¡«ú« Σá⌐½á ) DST CLOSE-FILE .STATUS ; ( ºá¬αδΓ¿Ñ óδσ«ñ¡«ú« Σá⌐½á ) COPY A:SRC.TXT B:DST.TXT ( óδ»«½¡Ñ¡¿Ñ ¬«»¿α«óá¡¿∩ ) ì¿ªÑ »α¿ó«ñ¿Γß∩ »ÑαÑτÑ¡∞ ¿¡ΓÑαΣÑ⌐ß¡δσ »α«µÑñπα ñ½∩ αáí«Γδ ß Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐. Å«ñα«í¡«Ñ «»¿ßá¡¿Ñ »α«µÑñπα »α¿óÑñÑ¡« ó »α¿½«ªÑ¡¿¿ 1. Ä»Ñαáµ¿¿ ¡áñ Σá⌐½á¼¿ OPEN-FILE - «Γ¬αδΓ¿Ñ Σá⌐½á ¡á τΓÑ¡¿Ñ ¿ ºá»¿ß∞ OPEN-FILE-R/O - «Γ¬αδΓ¿Ñ Σá⌐½á Γ«½∞¬« ¡á τΓÑ¡¿Ñ CLOSE-FILE - ºá¬αδΓ¿Ñ Σá⌐½á MAKE-FILE - ß«ºñá¡¿Ñ ¡«ó«ú« Σá⌐½á ¿½¿ «»πßΓ«ΦÑ¡¿Ñ πªÑ ¿¼ÑεΘÑú«ß∩ Σá⌐½á KILL-FILE - πñá½Ñ¡¿Ñ Σá⌐½á ä«ßΓπ» ¬ ñ¿αÑ¬Γ«α¿∩¼ GET-ATTRIB - óδñáτá íá⌐Γá áΓα¿íπΓ«ó Σá⌐½á SET-ATTRIB - ¿º¼Ñ¡Ñ¡¿Ñ íá⌐Γá áΓα¿íπΓ«ó Σá⌐½á RENAME-FILE - »ÑαÑ¿¼Ñ¡«óá¡¿Ñ Σá⌐½á (ñ¿αÑ¬Γ«α¿¿) SEARCH-FIRST - »«¿ß¬ »Ñαó«ú« Σá⌐½á ó ñ¿αÑ¬Γ«α¿¿ SEARCH-NEXT - »«¿ß¬ «τÑαÑñ¡«ú« Σá⌐½á ó ñ¿αÑ¬Γ«α¿¿ ?FILESIZE - óδñáτá ñ½¿¡δ Σá⌐½á ó íá⌐Γáσ ùΓÑ¡¿Ñ - ºá»¿ß∞ READ - τΓÑ¡¿Ñ ñá¡¡δσ ¿º Σá⌐½á (ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá) WRITE - ºá»¿ß∞ ñá¡¡δσ ó Σá⌐½ (ßΓá¡ñáαΓ¡«Ñ πßΓα«⌐ßΓó«) SEEK-ABS - πßΓá¡«ó¬á áíß«½εΓ¡«ú« º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ τΓÑ¡¿∩-ºá»¿ß¿ SEEK-REL - πßΓá¡«ó¬á π¬áºáΓÑ½∩ τΓÑ¡¿∩-ºá»¿ß¿ «Γ¡«ß¿ΓÑ½∞¡« ΓÑ¬πΘÑ⌐ »«º¿µ¿¿ ?OFFSET - óδñáτá ΓÑ¬πΘÑú« º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ τΓÑ¡¿∩-ºá»¿ß¿ Ä»Ñαáµ¿¿ ¡áñ ñ¿αÑ¬Γ«α¿∩¼¿ CHANGE-DIR - ¿º¼Ñ¡Ñ¡¿Ñ ñ¿αÑ¬Γ«α¿¿ KILL-DIR - πñá½Ñ¡¿Ñ ñ¿αÑ¬Γ«α¿¿ MAKE-DIR - ß«ºñá¡¿Ñ ñ¿αÑ¬Γ«α¿¿ GET-DIR - óδñáτá ΓÑ¬πΘÑ⌐ ñ¿αÑ¬Γ«α¿¿ Ä»αÑñÑ½∩εΘ¿Ñ ß½«óá HANDLE - ß«ºñá¡¿Ñ ñÑß¬α¿»Γ«αá Σá⌐½á DIRECTORY - ß«ºñá¡¿Ñ í½«¬á π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ çáñá¡¿Ñ ¿¼Ñ¡ Σá⌐½«ó ¿ ñ¿αÑ¬Γ«α¿⌐ FILENAME - ºá¡ÑßÑ¡¿Ñ ßΓα«¬¿ ß ¿¼Ñ¡Ñ¼ Σá⌐½á ó HCB INPUT-FILENAME - ºá¡ÑßÑ¡¿Ñ ßΓα«¬¿ ß ¿¼Ñ¡Ñ¼ Σá⌐½á ó HCB ß ΓÑα¼¿¡á½á DIRNAME - ºá¡ÑßÑ¡¿Ñ ßΓα«¬¿ ß ¿¼Ñ¡Ñ¼ ñ¿αÑ¬Γ«α¿¿ ó HCB INPUT-DIRNAME - ºá¡ÑßÑ¡¿Ñ ßΓα«¬¿ ß ¿¼Ñ¡Ñ¼ ñ¿αÑ¬Γ«α¿¿ ó HCB ß ΓÑα¼¿¡á½á ÅαÑñ«»αÑñÑ½Ñ¡¡δÑ π»αáó½∩εΘ¿Ñ í½«¬¿ ROOT - DCB ñ½∩ ¬«α¡Ñó«⌐ ñ¿αÑ¬Γ«α¿¿ "\" STD-INPUT - HCB ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá óó«ñá STD-OUTPUT - HCB ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá óδó«ñá STD-ERROR - HCB ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá ñ¿áú¡«ßΓ¿τÑß¬¿σ ß««íΘÑ¡¿⌐ STD-AUX - HCB ñ½∩ ßΓá¡ñáαΓ¡«ú« ñ«»«½¡¿ΓÑ½∞¡«ú« πßΓα«⌐ßΓóá óó«ñá-óδó«ñá STD-LIST - HCB ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá »ÑτáΓ¿ ÅÑτáΓ∞ óß»«¼«úáΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ .FILENAME - »ÑτáΓ∞ ¿¼Ñ¡¿ Σá⌐½á ¿º HCB .DIR - »ÑτáΓ∞ ¿¼Ñ¡¿ ñ¿αÑ¬Γ«α¿¿ ñ½∩ ºáñá¡¡«ú« πßΓα«⌐ßΓóá .STATUS - á¡á½¿º ¬«ñá «Φ¿í¬á ¿ »ÑτáΓ∞ ñ¿áú¡«ßΓ¿τÑß¬¿σ ß««íΘÑ¡¿⌐ .DRV - »ÑτáΓ∞ ¿¼Ñ¡¿ ΓÑ¬πΘÑú« πßΓα«⌐ßΓóá è«ñδ «Φ¿í«¬, ó«ºóαáΘáÑ¼δÑ ¿¡ΓÑαΣÑ⌐ß¡δ¼¿ »α«µÑñπαá¼¿, ¼«úπΓ ¿¼ÑΓ∞ ß½ÑñπεΘ¿Ñ º¡áτÑ¡¿∩: -01 - ¬«¡Ñµ Σá⌐½á 00 - πß»ÑΦ¡«Ñ óδ»«½¡Ñ¡¿Ñ «»Ñαáµ¿¿ 48 - ¡Ññ«»πßΓ¿¼δ⌐ ¡«¼Ñα Σπ¡¬µ¿¿ äÄæ 49 - Σá⌐½ ¡Ñ ¡á⌐ñÑ¡ 50 - ñ¿αÑ¬Γ«α¿∩ ¡Ñ ¡á⌐ñÑ¡á 51 - ß½¿Φ¬«¼ ¼¡«ú« í½«¬«ó π»αáó½Ñ¡¿∩ Σá⌐½á¼¿ 52 - «Φ¿í¬á ñ«ßΓπ»á 53 - ¡ÑóÑα¡δ⌐ í½«¬ π»αáó½Ñ¡¿∩ Σá⌐½«¼ 54 - «Φ¿í¬á αáß»αÑñÑ½Ñ¡¿∩ »á¼∩Γ¿ 55 - ¼á½« »á¼∩Γ¿ 56 - ¡Ññ«»πßΓ¿¼δ⌐ áñαÑß í½«¬á »á¼∩Γ¿ 57 - ¡Ññ«»πßΓ¿¼á∩ ßαÑñá ºáñáτ¿ 58 - ¡Ññ«»πßΓ¿¼δ⌐ Σ«α¼áΓ 59 - ¡Ññ«»πßΓ¿¼δ⌐ ¬«ñ ñ«ßΓπ»á 60 - ¡Ññ«»πßΓ¿¼δÑ ñá¡¡δÑ 61 - ¡Ññ«»πßΓ¿¼δ⌐ ¡«¼Ñα ß««íΘÑ¡¿∩ 62 - «Φ¿í¬á ó ºáñá¡¿¿ ñ¿ß¬«ó«ñá 63 - »«»δΓ¬á π¡¿τΓ«ª¿Γ∞ ΓÑ¬πΘπε ñ¿αÑ¬Γ«α¿ε 64 - αáº¡δÑ πßΓα«⌐ßΓóá 65 - Σá⌐½«ó ó ñ¿αÑ¬Γ«α¿¿ í«½∞ΦÑ ¡ÑΓ 66 - ¡ÑΓ ¼ÑßΓá ¡á ñ¿ß¬Ñ 67 - Σá⌐½ ¡Ñ «Γ¬αδΓ∞ ÄΦ¿í¬¿ ß ¬«ñá¼¿ 48-65 »«ññÑαª¿óáεΓß∩ Σá⌐½«ó«⌐ ß¿ßΓÑ¼«⌐ äÄæ, «ßΓá½∞¡δÑ ñ«íáó½∩εΓß∩ ¿¡ΓÑαΣÑ⌐ß«¼ öÄÉÆá. çá¼ÑΓ¿¼, τΓ« ¡ÑóÑα¡á∩ ß»Ñµ¿Σ¿¬áµ¿∩ ñ¿αÑ¬Γ«α¿¿ ¿½¿ Σá⌐½á »α¿óÑñÑΓ ¬ ó«º¡¿¬¡«óÑ¡¿ε "«Φ¿í¬¿ ñ«ßΓπ»á" (¬«ñ «Φ¿í¬¿ 52). 21. ÅÑαÑτÑ¡∞ ßßδ½«τ¡δσ ñ«¬π¼Ñ¡Γ«ó 1. üáαá¡«ó æ.ì., ì«ºñαπ¡«ó ì.É. ƒºδ¬ öÄÉÆ ¿ Ñú« αÑá½¿ºáµ¿¿. - ï.: îáΦ¿¡«ßΓα«Ñ¡¿Ñ. ïÑ¡¿¡úαáñß¬«Ñ «ΓñÑ½Ñ¡¿Ñ, 1988. 2. æ¿ßΓÑ¼á »α«úαá¼¼¿α«óá¡¿∩ ÇßΓα«öÄÉÆ. Éπ¬«ó«ñßΓó« »«½∞º«óáΓÑ½∩. Åα¿½«ªÑ¡¿Ñ 1. â½«ßßáα¿⌐ ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ ! n addr --- æ«σαá¡∩ÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n »« áñαÑßπ addr. !COLOR b --- ôßΓá¡áó½¿óáÑΓ º¡áτÑ¡¿Ñ b ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« µóÑΓ«ó«ú« áΓα¿íπΓá ñ½∩ óδó«ñ¿¼«ú« ¡á φ¬αá¡ ñ¿ß»½Ñ∩ ΓÑ¬ßΓá. æΓáα- Φ¿Ñ 4 í¿Γá º¡áτÑ¡¿∩ b ß«ñÑαªáΓ µóÑΓ Σ«¡á (0..15), ¼½áñΦ¿Ñ 4 í¿Γá - µóÑΓ ß¿¼ó«½«ó (0..15). æ¼. Γá¬ªÑ BACKGROUND, FOREGROUND, ?COLOR. !CSP --- æ«σαá¡∩ÑΓ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á ó »ÑαÑ¼Ñ¡¡«⌐ CSP. êß»«½∞ºπÑΓß∩ ñ½∩ «íÑß»ÑτÑ¡¿∩ ¬«ααÑ¬Γ¡«ßΓ¿ αáí«Γδ ¬«¼»¿½∩Γ«αá. æ¼. Γá¬ªÑ ?CSP. !L n1 n2 addr --- æ«σαá¡∩ÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n1 ó ßÑú¼Ñ¡ΓÑ n2 ß« ß¼Ñ- ΘÑ¡¿Ñ¼ addr. " --- è«¼»¿½¿απÑΓ ßΓα«¬π ß¿¼ó«½«ó ß íá⌐Γ«¼ ñ½¿¡δ. êß»«½∞ºπÑΓß∩ ó αÑª¿¼áσ ¬«¼»¿½∩µ¿¿ ¿ ¿¡ΓÑα»αÑΓáµ¿¿ ó ó¿ñÑ: " cccc" Åα¿ óδ»«½¡Ñ¡¿¿ áñαÑß ß¬«¼»¿½¿α«óá¡¡«⌐ ßΓα«¬¿ »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. ". addr --- ÅÑτáΓáÑΓ ßΓα«¬π ß íá⌐Γ«¼ ñ½¿¡δ, αáß»«½«ªÑ¡¡πε »« áñαÑßπ addr. "= addr1 addr2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ ßαáó¡Ñ¡¿∩ f (TRUE - »α¿ πñáτ¡«¼ ßαáó¡Ñ¡¿¿, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ) ñóπσ ßΓα«¬ ß íá⌐Γá¼¿ ñ½¿¡δ, αáß»«½«ªÑ¡¡δσ, ß««ΓóÑΓßΓóÑ¡¡«, »« áñαÑßá¼ addr1 ¿ addr2. # ud1 --- ud2 ÄßΓáΓ«¬ «Γ ñÑ½Ñ¡¿∩ ud1 ¡á ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ BASE »αÑ«í- αáºπÑΓß∩ ó ß¿¼ó«½ ¬«ñá ASCII ¿ »α¿»¿ßδóáÑΓß∩ ¬ Σ«α¼¿απ- απÑ¼«⌐ óδσ«ñ¡«⌐ ßΓα«¬Ñ ó ¡á»αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑ- ß«ó. ùáßΓ¡«Ñ ud2 ¿ß»«½∞ºπÑΓß∩ ñ½∩ ñá½∞¡Ñ⌐ΦÑ⌐ «íαáí«Γ¬¿. Äíδτ¡« ¿ß»«½∞ºπÑΓß∩ ¼Ñªñπ ß½«óá¼¿ <# ¿ #> . æ¼. Γá¬ªÑ #S, HOLD ¿ SIGN. #> ud --- addr n çáóÑαΦÑ¡¿Ñ »αÑ«íαáº«óá¡¿∩ τ¿ß½á ó ß¿¼ó«½∞¡δ⌐ ó¿ñ. ud ßíαáßδóáÑΓß∩ ß« ßΓÑ¬á, ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá ó«ºóαáΘá- εΓß∩ áñαÑß addr ¿ τ¿ß½« ß¿¼ó«½«ó n ó ßΣ«α¼¿α«óá¡¡«⌐ óδ- σ«ñ¡«⌐ ßΓα«¬Ñ ó ó¿ñÑ, ¿ß»«½∞ºπÑ¼«¼ ß½«ó«¼ TYPE. æ¼. Γá¬ªÑ <#, #, #S, SIGN ¿ HOLD. #BUFF --- n è«¡ßΓá¡Γá, ºáñáεΘá∩ τ¿ß½« íπΣÑα«ó, óδñÑ½Ñ¡¡δσ ñ½∩ «í¼Ñ- ¡á ß ñ¿ß¬á¼¿. ä½∩ ¬«ααÑ¬Γ¡«⌐ αáí«Γδ »α«µÑñπα óó«ñá/óδ- ó«ñá º¡áτÑ¡¿Ñ #BUFF ñ«½ª¡« íδΓ∞ ¡Ñ ¼Ñ¡ÑÑ 1. #S ud1 --- 0 0 ö«α¼¿απÑΓß∩ ßΓα«¬á ß¿¼ó«½«ó ó ¬«ñÑ ASCII ó óδσ«ñ¡«¼ ΓÑ¬ßΓ«ó«¼ íπΣÑαÑ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«óá # ñ« ΓÑσ »«α, »«¬á τáßΓ¡«Ñ ud2 (ß¼. ß½«ó« #) ¡Ñ ßΓá¡ÑΓ αáó¡δ¼ ¡π½ε. àß½¿ ¿ßσ«ñ¡«Ñ τ¿ß½« ud1 αáó¡« ¡π½ε, Γ« ó óδσ«ñ¡πε ßΓα«- ¬π ñ«íáó½∩ÑΓß∩ «ñ¿¡ ß¿¼ó«½ "0". Äíδτ¡« ¿ß»«½∞ºπÑΓß∩ ¼Ñªñπ ß½«óá¼¿ <# ¿ #> . æ¼. Γá¬ªÑ #, HOLD ¿ SIGN. #TIB --- addr ÇñαÑß »ÑαÑ¼Ñ¡¡«⌐, ß«ñÑαªáΘÑ⌐ τ¿ß½« íá⌐Γ«ó ó« óσ«ñ¡«¼ ΓÑ¬ßΓ«ó«¼ íπΣÑαÑ, Γ.Ñ. ñ½¿¡π ßΓα«¬¿ ¿º óσ«ñ¡«ú« »«Γ«¬á, ¡áσ«ñ∩ΘÑ⌐ß∩ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ó« óσ«ñ¡«¼ íπΣÑαÑ. #TIB ¿ß- »«½∞ºπÑΓß∩ ß½«ó«¼ WORD ó ß½πτáÑ, ¬«úñá º¡áτÑ¡¿Ñ BLK αáó¡« ¡π½ε. ôßΓá¡áó½¿óáÑΓß∩ ß½«ó«¼ QUERY αáó¡δ¼ º¡áτÑ- ¡¿ε »ÑαÑ¼Ñ¡¡«⌐ SPAN »«ß½Ñ óδ»«½¡Ñ¡¿∩ EXPECT. ' --- addr êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: ' name (αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿) ¿½¿: ' (αÑª¿¼ ¬«¼»¿½∩µ¿¿). Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß »«½∩ ¬«ñá (áñαÑß ¬«¼»¿½∩µ¿¿) ß½«óáα¡«⌐ ßΓáΓ∞¿ ß ¿¼Ñ¡Ñ¼ name. Åα¿ ¿ß»«½∞º«óá¡¿¿ ó αÑ- ª¿¼Ñ ¬«¼»¿½∩µ¿¿ »αÑñóáα¿ΓÑ½∞¡« ßτ¿ΓδóáÑΓ ¿¼∩ ná¼Ñ ¿º óσ«ñ¡«ú« »«Γ«¬á. àß½¿ ¿¼∩ name ¡Ñ ¡áσ«ñ¿Γß∩ ó ß½«óáαÑ »α¿ ΓÑ¬πΘÑ¼ »«α∩ñ¬Ñ »«¿ß¬á, ó«º¡¿¬áÑΓ «Φ¿í«τ¡á∩ ß¿Γπá- µ¿∩. æ¼. Γá¬ªÑ [']. ( --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ ( cccc ) . æ¿¼ó«½δ "cccc", ß½ÑñπεΘ¿Ñ ºá ß½«ó«¼ ( ¿ «úαá¡¿τÑ¡¡δÑ ß¿¼ó«½«¼ "(" (ºá¬αδóáεΘá∩ ß¬«í¬á) αáßß¼áΓα¿óáεΓß∩ ¬á¬ ¬«¼¼Ñ¡Γáα¿⌐. ì¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡áñ ¬«¼¼Ñ¡Γáα¿∩¼¿ ¡Ñ óδ- »«½¡∩ÑΓß∩. Åα«íÑ½, ß½ÑñπεΘ¿⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ ( ¡Ñ ∩ó½∩ÑΓß∩ τáßΓ∞ε ßΓα«¬¿ "cccc". æ½«ó« ( ¼«ªÑΓ ¿ß- »«½∞º«óáΓ∞ß∩ ¬á¬ ó αÑª¿¼Ñ ¿¡ΓÑα»αÑΓáµ¿¿, Γá¬ ¿ ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿. ù¿ß½« ß¿¼ó«½«ó ó ßΓα«¬Ñ "cccc" ¡Ñ «úαá¡¿τÑ- ¡«, ¡« ºá¬αδóáεΘá∩ ß¬«í¬á ñ«½ª¡á ¡áσ«ñ¿Γ∞ß∩ ó Γ«¼ ªÑ í½«¬Ñ óσ«ñ¡«ú« »«Γ«¬á, úñÑ óßΓαÑΓ¿½«ß∞ ß½«ó« ( . æ¼. Γá¬ªÑ .( . * n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¼½áñΦ¿Ñ 16 αáºα∩ñ«ó »α«¿ºóÑñÑ¡¿∩ n1*n2. */ n1 n2 n3 --- n4 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ τáßΓ¡«Ñ n4 «Γ (n1*n2)/n3 ß ¿ß»«½∞º«óá- ¡¿Ñ¼ 32-í¿Γ«ó«ú« »α«¼ÑªπΓ«τ¡«ú« αÑºπ½∞ΓáΓá n1*n2. */MOD n1 n2 n3 --- n4 n5 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ «ßΓáΓ«¬ n4 ¿ τáßΓ¡«Ñ n5 «Γ (n1*n2)/n3 ß ¿ß»«½∞º«óá¡¿Ñ¼ 32-í¿Γ«ó«ú« »α«¼ÑªπΓ«τ¡«ú« αÑºπ½∞ΓáΓá n1*n2. + n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ßπ¼¼π n1+n2. +! n addr --- ôóÑ½¿τ¿óáÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ »« áñαÑßπ addr ¡á óÑ½¿- τ¿¡π n. +LOOP n --- ( run ) | sys --- ( compile ) êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡«¼ «»αÑñÑ½Ñ¡¿¿ ó ó¿ñÑ: DO ... n +LOOP Åáαá¼ÑΓα µ¿¬½á index πóÑ½¿τ¿óáÑΓß∩ ¡á n. àß½¿ »α¿ »α¿- αáΘÑ¡¿¿ index »ÑαÑσ«ñ¿Γ τÑαÑº úαá¡¿µπ ¼Ñªñπ º¡áτÑ¡¿∩¼¿ »áαá¼ÑΓαá µ¿¬½á limit-1 ¿ limit, µ¿¬½ ºáóÑαΦáÑΓß∩, ¿ »áαá¼ÑΓαδ π»αáó½Ñ¡¿∩ µ¿¬½«¼ ßíαáßδóáεΓß∩ ß« ßΓÑ¬á ó«º- óαáΓ«ó. é »α«Γ¿ó¡«¼ ß½πτáÑ »ÑαÑñáÑΓß∩ π»αáó½Ñ¡¿Ñ ¡á óδ- »«½¡Ñ¡¿Ñ ¬«ñá, αáß»«½«ªÑ¡¡«ú« ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««Γ- óÑΓßΓóπεΘ¿¼ ºáú«½«ó¬«¼ µ¿¬½á DO ¿½¿ ?DO. æ¼. Γá¬ªÑ DO, ?DO, LOOP, LEAVE. , n --- æ«σαá¡∩ÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n »« áñαÑßπ, ºáñáóáÑ¼«¼π ΓÑ¬πΘ¿¼ º¡áτÑ¡¿Ñ¼ π¬áºáΓÑ½∩ ß½«óáα∩. ô¬áºáΓÑ½∞ ß½«óáα∩ »α«ñó¿úáÑΓß∩ ¡á 2 íá⌐Γá. - n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αáº¡«ßΓ∞ n1-n2. -" --- è«¼»¿½¿απÑΓ ßΓα«¬π ß¿¼ó«½«ó ß íá⌐Γ«¼ ñ½¿¡δ, ºáóÑαΦáεΘπεß∩ ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼. êß»«½∞ºπÑΓß∩ ó αÑª¿¼áσ ¬«¼»¿½∩µ¿¿ ¿ ¿¡ΓÑα»αÑΓáµ¿¿ ó ó¿ñÑ: -" cccc" Åα¿ óδ»«½¡Ñ¡¿¿ áñαÑß ß¬«¼»¿½¿α«óá¡¡«⌐ ßΓα«¬¿ »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. --> --- Åα«ñ«½ªáÑΓ ¿¡ΓÑα»αÑΓáµ¿ε óσ«ñ¡«ú« ΓÑ¬ßΓá ß ¡áτá½á ß½Ñ- ñπεΘÑú« φ¬αá¡á ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á. -1 --- -1 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ º¡áτÑ¡¿ε -1. -TRAILING addr1 n1 --- addr2 n2 é ßΓα«¬Ñ ß¿¼ó«½«ó, ºáñáóáÑ¼«¼ ¡áτá½∞¡δ¼ áñαÑß«¼ addr1 ¿ ñ½¿¡«⌐ ó íá⌐Γáσ n1, óδñÑ½∩ÑΓß∩ »«ñßΓα«¬á, ¡áτ¿¡áεΘá∩ß∩ ß áñαÑßá addr2, ñ½¿¡«⌐ n2 íá⌐Γ«ó ¿ ¡Ñ ß«ñÑαªáΘá∩ óÑñπ- Θ¿σ ¿ ºáóÑαΦáεΘ¿σ »α«íÑ½«ó (»« ßΓá¡ñáαΓπ FORTH-83 ¡Ñ ß«ñÑαªáΘá∩ Γ«½∞¬« ºáóÑαΦáεΘ¿σ »α«íÑ½«ó). àß½¿ ¿ßσ«ñ¡á∩ ßΓα«¬á ß«ßΓ«¿Γ ¿º «ñ¡¿σ »α«íÑ½«ó ¿½¿ ÑÑ ñ½¿¡á n1 αáó¡á ¡π½ε, Γ« αÑºπ½∞ΓáΓ n2 αáóÑ¡ ¡π½ε. . n --- éδó«ñ¿Γ º¡áτÑ¡¿Ñ τ¿ß½á n ó ß¿ßΓÑ¼Ñ ßτ¿ß½Ñ¡¿∩ ß ΓÑ¬πΘ¿¼ «ß¡«óá¡¿Ñ¼ BASE, ñ«»«½¡Ñ¡¡«Ñ ß»αáóá «ñ¡¿¼ »α«íÑ½«¼. ÄΓ- α¿µáΓÑ½∞¡δÑ τ¿ß½á óδó«ñ∩Γß∩ ß« º¡á¬«¼ "-". ." --- êß»«½∞ºπÑΓß∩ Γ«½∞¬« ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿ ó ó¿ñÑ: ." cccc" Åα¿ óδ»«½¡Ñ¡¿¿ óδó«ñ¿Γ ßΓα«¬π ß¿¼ó«½«ó "cccc", (íÑº «ú- αá¡¿τ¿óáεΘ¿σ ñó«⌐¡δσ ¬áóδτÑ¬ "). ÅÑαóδ⌐ »α«íÑ½, ß½Ññπε- Θ¿⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ ." ¡Ñ ∩ó½∩ÑΓß∩ τáßΓ∞ε ßΓα«¬¿ "cccc". .( --- êß»«½∞ºπÑΓß∩ ó αÑª¿¼áσ ¿¡ΓÑα»αÑΓáµ¿¿ ¿ ¬«¼»¿½∩µ¿¿ ó ó¿ñÑ: .( cccc) éδó«ñ¿Γ ßΓα«¬π ß¿¼ó«½«ó "cccc", ó»½«Γ∞ ñ« «úαá¡¿τ¿óáε- ΘÑ⌐ ºá¬αδóáεΘÑ⌐ ß¬«í¬¿ ")". ÅÑαóδ⌐ »α«íÑ½, ß½ÑñπεΘ¿⌐ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ .( ¡Ñ ∩ó½∩ÑΓß∩ τáßΓ∞ε ßΓα«¬¿ "cccc". .DATE --- ÅÑτáΓáÑΓ ΓÑ¬πΘπε ñáΓπ ó ó¿ñÑ: mm/dd/yy. .DIR drive --- éδñáÑΓ «ú½áó½Ñ¡¿Ñ ΓÑ¬πΘÑ⌐ ñ¿αÑ¬Γ«α¿¿ ñ½∩ π¬áºá¡¡«ú« πßΓα«⌐ßΓóá. .DRV --- éδñáÑΓ ¿¼∩ ΓÑ¬πΘÑú« πßΓα«⌐ßΓóá (A:, B:, C: ¿ Γ.ñ.) .FILENAME handle_pars --- éδñáÑΓß∩ »«½¡«Ñ ¿¼∩ ñ¿αÑ¬Γ«α¿¿ ¿ ¿¼∩ Σá⌐½á ¡á ¬«Γ«αδ⌐ π¬áºδóáÑΓ ñÑß¬α¿»Γ«α Σá⌐½á HCB. .LINE n1 n2 --- éδó«ñ¿Γ ßΓα«¬π ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á, ºáñáóáÑ¼πε ¡«- ¼Ñα«¼ φ¬αá¡á n2 ¿ ¡«¼Ñα«¼ ßΓα«¬¿ ó φ¬αá¡Ñ n1. .NAME nfa --- ÅÑτáΓáÑΓ ¿¼∩ ß½«óáα¡«⌐ ßΓáΓ∞¿ ß áñαÑß«¼ »«½∩ ¿¼Ñ¡¿ nfa. .R n1 n2 --- éδó«ñ¿Γ τ¿ß½« n1 ß óδ¬½ετ¬«⌐ ó»αáó« ó¡πΓα¿ »«½∩ Φ¿α¿¡«⌐ n2 ß¿¼ó«½«ó íÑº ºáóÑαΦáεΘÑú« »α«íÑ½á. é ß½πτáÑ, Ñß½¿ ñ½∩ óδó«ñá τ¿ß½á n1 ¡Ññ«ßΓáΓ«τ¡« n2 »«º¿µ¿⌐, τ¿ß½« óδ- ó«ñ¿Γß∩ »«½¡«ßΓ∞ε, íÑº πτÑΓá Σ«α¼áΓá n2. .STACK --- é «¬¡Ñ óδó«ñ¿Γß∩ ΓÑ¬πΘÑÑ ß«ßΓ«∩¡¿Ñ ßΓÑ¬á ñá¡¡δσ. ä½∩ ¬áªñ«ú« φ½Ñ¼Ñ¡Γá ßΓÑ¬á π¬áºδóáÑΓß∩ Ñú« ¡«¼Ñα (¡«½∞ - óÑαΦ¿¡á), ñÑß∩Γ¿τ¡«Ñ ¿ ΦÑßΓ¡áñµáΓ¿α¿τ¡«Ñ »αÑñßΓáó½Ñ¡¿Ñ. .STATUS status_code --- Ç¡á½¿º¿απÑΓ ¬«ñ «Φ¿í¬¿, ó«ºóαáΘáÑ¼δ⌐ ß½«óá¼¿ ñ«ßΓπ»á ¬ Σá⌐½á¼ ¿ óδñáÑΓ ß««íΘÑ¡¿∩ «í «Φ¿í¬áσ ñ«ßΓπ»á. Åα¿ ¡π½Ñó«¼ º¡áτÑ¡¿¿ status_code ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. .TIME --- ÅÑτáΓáÑΓ ΓÑ¬πΘÑÑ óαÑ¼∩ ó ó¿ñÑ: hh:mm. / n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ «¬απú½Ñ¡¡δ⌐ αÑºπ½∞ΓáΓ ñÑ½Ñ¡¿∩ (µÑ½á∩ τáßΓ∞) n1/n2. /MOD n1 n2 --- n3 n4 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ «ßΓáΓ«¬ n3 ¿ τáßΓ¡«Ñ n4 «Γ ñÑ½Ñ¡¿∩ n1 ¡á n2. 0 --- 0 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ º¡áτÑ¡¿ε 0. 0< n --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n ¼Ñ¡∞ΦÑ¼ ¡π½∩, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. 0<> n --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n «Γ½¿τ¡«¼ «Γ ¡π½∩, FALSE - »α¿ n αáó¡«¼ ¡π½ε. 0= n --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n αáó¡«¼ ¡π½ε, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. 0> n --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n í«½∞ΦÑ¼ ¡π½∩, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. 1 --- 1 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ º¡áτÑ¡¿ε 1. 1+ n1 --- n2 ôóÑ½¿τ¿óáÑΓ º¡áτÑ¡¿Ñ n1 ¡á 1. 1- n1 --- n2 ô¼Ñ¡∞ΦáÑΓ º¡áτÑ¡¿Ñ n1 ¡á 1. 2 --- 2 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ º¡áτÑ¡¿ε 2. 2! d addr --- æ«σαá¡∩ÑΓ 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d »« áñαÑßπ addr. 2* n1 --- n2 üδßΓα«Ñ π¼¡«ªÑ¡¿Ñ º¡áτÑ¡¿∩ n1 ¡á 2. ÉÑá½¿ºπÑΓß∩ 16-í¿- Γ«óδ¼ áα¿Σ¼ÑΓ¿τÑß¬¿¼ ßñó¿ú«¼. 2+ n1 --- n2 ôóÑ½¿τ¿óáÑΓ º¡áτÑ¡¿Ñ n1 ¡á 2. 2- n1 --- n2 ô¼Ñ¡∞ΦáÑΓ º¡áτÑ¡¿Ñ n1 ¡á 2. 2/ n1 --- n2 üδßΓα«Ñ ñÑ½Ñ¡¿Ñ º¡áτÑ¡¿∩ n1 ¡á 2. ÉÑá½¿ºπÑΓß∩ 16-í¿Γ«- óδ¼ áα¿Σ¼ÑΓ¿τÑß¬¿¼ ßñó¿ú«¼. 2@ addr --- d Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d, αáß»«½«ªÑ¡¡«Ñ »« áñαÑßπ addr. 2CONSTANT d --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: d 2CONSTANT name æ«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ 32-αáºα∩ñ¡«Ñ º¡áτÑ¡¿Ñ d. 2DROP d --- æ¡¿¼áÑΓ ß« ßΓÑ¬á 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d. 2DUP d --- d d äπí½¿απÑΓ 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d ¡á óÑαΦ¿¡Ñ ßΓÑ¬á. 2LITERAL d --- (compile) è«¼»¿½¿απÑΓ »α«µÑñπαπ 2LIT ñ½∩ »«¼ÑΘÑ¡¿∩ ¡á ßΓÑ¬ 32- αáºα∩ñ¡«ú« τ¿ß½á d, »«¼ÑΘá∩ º¡áτÑ¡¿Ñ d ¡Ñ»«ßαÑñßΓóÑ¡¡« óß½Ññ ºá óδº«ó«¼ ß½«óá 2LIT. 2OVER d1 d2 --- d1 d2 d1 è«»¿απÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á óΓ«α«Ñ ßóÑασπ 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d1. 2ROT d1 d2 d3 --- d2 d3 d1 ÅÑαÑ¼ÑΘáÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á ΓαÑΓ∞Ñ ßóÑασπ 32-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d1. 2SWAP d1 d2 --- d2 d1 îÑ¡∩ÑΓ ¼ÑßΓá¼¿ ñóá 32-í¿Γ«óδσ º¡áτÑ¡¿∩ d1 ¿ d2 ¡á óÑα- σπΦ¬Ñ ßΓÑ¬á. 2VARIABLE --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: 2VARIABLE name æ«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, αÑºÑαó¿απ∩ ó »«½Ñ »áαá¼ÑΓα«ó 4 íá⌐Γá ñ½∩ σαá¡Ñ¡¿∩ 32-αáºα∩ñ¡«ú« º¡á- τÑ¡¿∩. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñ- αÑß ºáαÑºÑαó¿α«óá¡¡«⌐ «í½áßΓ¿ »á¼∩Γ¿. ìáτá½∞¡«Ñ º¡áτÑ- ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ ¡Ñ «»αÑñÑ½Ñ¡«. 4DROP d1 d2 --- æíαáßδóáÑΓ ß« ßΓÑ¬á ñóá ñó«⌐¡δσ º¡áτÑ¡¿∩ d1 ¿ d2. : --- sys êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: : name ... ; æ«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, πßΓá¡áó½¿óáÑΓ αÑª¿¼ ¬«¼»¿½∩µ¿¿, ß½«óáα∞ CONTEXT πßΓá¡áó½¿óáÑΓ ¡á ß½«óáα∞ CURRENT. Ä»αÑñÑ½Ñ¡¡«Ñ Γá¬¿¼ «íαáº«¼ ß½«ó« ¡á- ºδóáÑΓß∩ "ñó«ÑΓ«τÑτ¡δ¼ «»αÑñÑ½Ñ¡¿Ñ¼". ÇñαÑßá ¬«¼»¿½∩µ¿¿ (áñαÑßá »«½Ñ⌐ ¬«ñá) ß½«ó, ß½ÑñπεΘ¿σ ó« óσ«ñ¡«¼ »«Γ«¬Ñ ºá ¿¼Ñ¡Ñ¼ name ¿ ¡Ñ »«¼ÑτÑ¡¡δσ »α¿º¡á¬«¼ ¡Ñ¼Ññ½Ñ¡¡«ú« óδ»«½¡Ñ¡¿∩ IMMEDIATE, »«ß½Ññ«óáΓÑ½∞¡« ºá¡«ß∩Γß∩ ó ß½«- óáα∞, ¿ ó ñá½∞¡Ñ⌐ΦÑ¼ óδ»«½¡∩εΓß∩ »α¿ óδº«óÑ ß½«óá name. æ½«óá, »«¼ÑτÑ¡¡δÑ »α¿º¡á¬«¼ IMMEDIATE óδ»«½¡∩εΓß∩ ¡Ñ- ¼Ññ½Ñ¡¡« »« ¼ÑαÑ ¿σ »«∩ó½Ñ¡¿∩ ó« óσ«ñ¡«¼ »«Γ«¬Ñ. àß½¿ «τÑαÑñ¡«Ñ ß½«ó« ¡Ñ ¡á⌐ñÑ¡« ó ß½«óáαÑ, »α«¿ºó«ñ¿Γß∩ Ñú« »αÑ«íαáº«óá¡¿Ñ ¬ τ¿ß½π ß ΓÑ¬πΘ¿¼ «ß¡«óá¡¿Ñ¼ ßτ¿ß½Ñ¡¿∩ BASE ¿ ¬«¼»¿½¿απÑΓß∩ τ¿ß½«ó«⌐ ½¿ΓÑαá½ ß««ΓóÑΓßΓóπεΘÑ⌐ αáºα∩ñ¡«ßΓ¿. Åα¿ ¡Ñπß»ÑΦ¡«¼ »αÑ«íαáº«óá¡¿¿ τ¿ß½á ó«º¡¿- ¬áÑΓ «Φ¿í«τ¡á∩ ß¿Γπáµ¿∩ ¿ ¬«¼»¿½∩µ¿∩ ß½«óá name »αÑαδ- óáÑΓß∩. æ«ºñá¡¡«Ñ ß½«ó«¼ : «»αÑñÑ½Ñ¡¿Ñ ßτ¿ΓáÑΓß∩ ºáóÑαΦÑ¡¡δ¼ ¿ ¼«ªÑΓ íδΓ∞ ¡á⌐ñÑ¡« ó ß½«óáαÑ Γ«½∞¬« »«ß½Ñ óδ»«½¡Ñ¡¿∩ ºáóÑαΦáεΘÑú« «»αÑñÑ½Ñ¡¿Ñ ß½«óá ; ¿½¿ ;CODE. ; --- çáóÑαΦáÑΓ ¬«¼»¿½∩µ¿ε ñó«ÑΓ«τÑτ¡«ú« «»αÑñÑ½Ñ¡¿∩, ¬«¼»¿- ½¿απÑΓ óδº«ó ß½«óá EXIT ó Σ«α¼¿απÑ¼πε ß½«óáα¡πε ßΓáΓ∞ε, πßΓá¡áó½¿óáÑΓ »α¿º¡á¬ ºáóÑαΦÑ¡¡«ßΓ¿ «»αÑñÑ½Ñ¡¿∩ ¿ πßΓá- ¡áó½¿óáÑΓ αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿. ;" --- è«¼»¿½¿απÑΓ ßΓα«¬π ß¿¼ó«½«ó ß íá⌐Γ«¼ ñ½¿¡δ, ºáóÑαΦáεΘπεß∩ ß¿¼ó«½«¼ ß ¬«ñ«¼ 13 (Return). êß»«½∞ºπÑΓß∩ ó αÑª¿¼áσ ¬«¼»¿½∩µ¿¿ ¿ ¿¡ΓÑα»αÑΓáµ¿¿ ó ó¿ñÑ: ;" cccc" Åα¿ óδ»«½¡Ñ¡¿¿ áñαÑß ß¬«¼»¿½¿α«óá¡¡«⌐ ßΓα«¬¿ »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. ;CODE --- Äíδτ¡« ¿ß»«½∞ºπÑΓß∩ »α¿ «»αÑñÑ½Ñ¡¿¿ «»αÑñÑ½∩εΘ¿σ ß½«ó ó ó¿ñÑ: : namex ... CREATE ... ;CODE ... END-CODE çáóÑαΦáÑΓ ¬«¼»¿½∩µ¿ε ß½«óá namex, πßΓá¡áó½¿óáÑΓ αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿ ¿ »«ñ¬½ετáÑΓ ¬ ΓÑ¬πΘÑ¼π ¬«¡ΓÑ¬ßΓπ ß½«óáα∞ ASSEMBLER ñ½∩ ¬«¼»¿½∩µ¿¿ ¼áΦ¿¡¡«ú« ¬«ñá, ºáñáóáÑ¼«ú« ¼Ñªñπ ;CODE ¿ END-CODE. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá namex ó namex name «»αÑñÑ½∩ÑΓß∩ ¡«ó«Ñ ß½«ó« name, ó »«½Ñ ¬«ñá ¬«Γ«α«ú« »«- ¼ÑΘáÑΓß∩ áñαÑß »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ¼áΦ¿¡¡δσ ¬«¼á¡ñ, ß½Ñ- ñπεΘ¿σ ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ;CODE. é ñá½∞¡Ñ⌐ΦÑ¼ óδ»«½¡Ñ- ¡¿Ñ ß½«óá name óδº«óÑΓ óδ»«½¡Ñ¡¿Ñ π¬áºá¡¡«⌐ »«ß½Ññ«óá- ΓÑ½∞¡«ßΓ¿. ;S --- çáóÑαΦáÑΓ ¿¡ΓÑα»αÑΓáµ¿ε ΓÑ¬πΘÑú« φ¬αá¡á óσ«ñ¡«ú« Σá⌐½á. < n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 ¼Ñ¡∞ΦÑ¼ n2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. <# --- ê¡¿µ¿á½¿º¿απÑΓ »αÑ«íαáº«óá¡¿Ñ τ¿ßÑ½ ó ß¿¼ó«½∞¡δ⌐ ó¿ñ ñ½∩ Σ«α¼áΓ¡«ú« óδó«ñá ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó <# # #S SIGN HOLD ¿ #> . ÅαÑ«íαáº«óá¡¿Ñ »α«¿ºó«ñ¿Γß∩ ¡áñ 32-í¿- Γ«óδ¼¿ τ¿ß½á¼¿ ß Σ«α¼¿α«óá¡¿Ñ¼ óδσ«ñ¡«⌐ ßΓα«¬¿ ó ¡á- »αáó½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó. <= n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 ¼Ñ¡∞ΦÑ¼ ½¿í« αáó¡«¼ n2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. <> n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 «Γ½¿τ¡«¼ «Γ n2, FALSE - »α¿ n1 αáó¡«¼ n2. <MARK --- addr ÄΓ¼ÑΓ¬á ΓÑ¬πΘÑú« áñαÑßá addr ñ½∩ ßßδ½¬¿ ¡áºáñ »α¿ ¬«¼»¿½∩µ¿¿ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα. <RESOLVE addr --- ÉáºαÑΦÑ¡¿Ñ ßßδ½¬¿ ¡áºáñ »« áñαÑßπ addr »α¿ ¬«¼»¿½∩µ¿¿ ßΓαπ¬Γπα π»αáó½Ñ¡¿∩. <TIB> --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß ΓÑα¼¿¡á½∞¡«ú« óσ«ñ¡«ú« íπΣÑαá (ß¼. TIB). = n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 αáó¡«¼ n2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. > n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 í«½∞ΦÑ¼ n2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. >< n1 --- n2 îÑ¡∩ÑΓ ¼ÑßΓá¼¿ íá⌐Γδ ó º¡áτÑ¡¿¿ n1, Γ.Ñ. í¿Γδ 0-7 ßΓá¡«ó∩Γß∩ í¿Γá¼¿ 8-15 ¿ ¡á«í«α«Γ. >= n1 n2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ n1 í«½∞ΦÑ¼ ½¿í« αáó¡«¼ n2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. >BODY cfa --- pfa Å« áñαÑßπ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿ cfa óδñáÑΓ áñαÑß ÑÑ »«½∩ »áαá¼ÑΓα«ó pfa. >IN --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ ß¼ÑΘÑ- ¡¿Ñ ß¿¼ó«½á ó« óσ«ñ¡«¼ »«Γ«¬Ñ. >LINK cfa --- lfa Å« áñαÑßπ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿ cfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ßó∩º¿ lfa. >MARK --- addr ÄΓ¼ÑΓ¬á ΓÑ¬πΘÑú« áñαÑßá addr ñ½∩ ßßδ½¬¿ ó»ÑαÑñ »α¿ ¬«¼»¿½∩µ¿¿ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα. >NAME cfa --- nfa Å« áñαÑßπ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿ cfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ¿¼Ñ¡¿ nfa. >PRN c --- éδó«ñ ß¿¼ó«½á ß ¬«ñ«¼ c ¡á »ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó«. >R n --- ÅÑαÑ¼ÑΘáÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n ß áα¿Σ¼ÑΓ¿τÑß¬«ú« ßΓÑ- ¬á ¡á ßΓÑ¬ ó«ºóαáΓ«ó. æ½ÑñπÑΓ »«¼¡¿Γ∞, τΓ« »α¿ óσ«ñÑ ¿ óδσ«ñÑ ¿º «»αÑñÑ½Ñ¡¿∩ ß«ßΓ«∩¡¿∩ ßΓÑ¬á ó«ºóαáΓ«ó ñ«½ª¡δ íδΓ∞ «ñ¿¡á¬«óδ¼¿. æ¼. Γá¬ªÑ R> ¿ R@. >RESOLVE addr --- ÉáºαÑΦÑ¡¿Ñ ßßδ½¬¿ ó»ÑαÑñ »« áñαÑßπ addr »α¿ ¬«¼»¿½∩µ¿¿ ßΓαπ¬Γπα π»αáó½Ñ¡¿∩. ? addr --- éδó«ñ¿Γ º¡áτÑ¡¿Ñ 16-αáºα∩ñ¡«ú« τ¿ß½á, αáß»«½«ªÑ¡¡«ú« »« áñαÑßπ addr. ÉÑá½¿º«óá¡« ó ó¿ñÑ «¬«¡¡«⌐ »α«µÑñπαδ. ?BRANCH f --- Åα«µÑñπαá óαÑ¼Ñ¡¿ óδ»«½¡Ñ¡¿∩, ¬«¼»¿½¿απÑ¼á∩ ß½«óá¼¿ IF, UNTIL ¿ WHILE. êß»«½∞ºπÑΓß∩ ñ½∩ óδ»«½¡Ñ¡¿∩ πß½«ó¡δσ »Ñ- αÑσ«ñ«ó. àß½¿ º¡áτÑ¡¿Ñ f - FALSE, ó ¬áτÑßΓóÑ ¡«ó«ú« º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ ¿¡ΓÑα»αÑΓ¿απÑ¼«⌐ ¿¡ßΓαπ¬µ¿¿ öÄÉÆ-¿¡- ΓÑα»αÑΓáΓ«αá πßΓá¡áó½¿óáÑΓß∩ º¡áτÑ¡¿Ñ, αáß»«½«ªÑ¡¡«Ñ ¡Ñ»«ßαÑñßΓóÑ¡¡« óß½Ññ ºá óδº«ó«¼ ?BRANCH, ó »α«Γ¿ó¡«¼ ß½πτáÑ Σ½áú f ß¡¿¼áÑΓß∩ ß« ßΓÑ¬á, ¡¿¬á¬¿σ ñαπú¿σ ñÑ⌐- ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. ?BREAK --- f Ä»αáΦ¿óáÑΓ ß«ßΓ«∩¡¿Ñ ¬½áó¿áΓπαδ ¿, Ñß½¿ íπΣÑα ¬½áó¿áΓπαδ »πßΓ, ºáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ ß« º¡áτÑ¡¿Ñ¼ f αáó¡δ¼ FALSE. Åα¿ ¡Ñ»πßΓ«¼ íπΣÑαÑ »ÑαÑσ«ñ¿Γ ó ß«ßΓ«∩¡¿Ñ «ª¿ñá¡¿∩ ñ« ¡áªáΓ¿∩ ¡á ¬½áó¿áΓπαÑ ½εí«⌐ óδαáíáΓδóáεΘÑ⌐ ¬«ñ ¬½áó¿Φ¿. àß½¿ óδαáí«Γá¡ ¬«ñ 27 (¬½áó¿Φá Escape), ó«ºóαáΘáÑΓß∩ º¡áτÑ¡¿Ñ TRUE, ñ½∩ ½εí«⌐ ñαπú«⌐ ¬½áó¿Φ¿ ó«ºóαáΘáÑΓß∩ º¡áτÑ¡¿Ñ FALSE. ?COLON addr --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ addr ¡Ñ ∩ó½∩ÑΓß∩ áñαÑß«¼ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿, «»αÑñÑ½Ñ¡¡«⌐ τÑαÑº ñó«ÑΓ«τ¿Ñ. ?COLOR --- b éδñáÑΓ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ µóÑΓ«ó«ú« áΓα¿íπΓá ("µóÑΓ«ó«⌐ íá⌐Γ") ñ½∩ óδó«ñ¿¼«ú« ¡á ñ¿ß»½Ñ⌐ ΓÑ¬ßΓá. æΓáαΦ¿Ñ 4 í¿Γá º¡áτÑ¡¿∩ b ß«ñÑαªáΓ µóÑΓ Σ«¡á (0..15), ¼½áñΦ¿Ñ 4 í¿Γá - µóÑΓ ß¿¼ó«½«ó (0..15). ?COMP --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ¡Ñ πßΓá¡«ó- ½Ñ¡ αÑª¿¼ ¬«¼»¿½∩µ¿¿. ?CR --- ÄßπΘÑßΓó½∩ÑΓ »ÑαÑσ«ñ ¡á ¡«óπε ßΓα«¬π, Ñß½¿ ¬παß«α ¡Ñ ¡áσ«ñ¿Γß∩ ó ¡áτá½∞¡«⌐ »«º¿µ¿¿ ßΓα«¬¿. ?CSP --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ΓÑ¬πΘÑÑ º¡á- τÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á ¡Ñ ß«ó»áñáÑΓ ß« º¡áτÑ¡¿Ñ¼ »ÑαÑ- ¼Ñ¡¡«⌐ CSP. ?CURSOR --- x y Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘ¿Ñ ¬««αñ¿¡áΓδ ¬παß«αá ó á¬Γ¿ó¡«¼ «¬¡Ñ. æ¼. Γá¬ªÑ W.X, W.Y. ?DECIMAL --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ΓÑ¬πΘÑÑ «ß¡«óá¡¿Ñ ß¿ßΓÑ¼δ ßτ¿ß½Ñ¡¿∩ (º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ BASE) «Γ½¿τ¡« «Γ 10. ?DNEGATE d --- d1 îÑ¡∩ÑΓ º¡áτÑ¡¿Ñ 32-αáºα∩ñ¡«ú« τ¿ß½á d ¡á »α«Γ¿ó«»«½«ª¡δ⌐, Ñß½¿ d - »«½«ª¿ΓÑ½∞¡«. ?DO limit index --- (run) | --- sys (comp) êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: ?DO ... LOOP ¿½¿ ?DO ... +LOOP ÄΓ¼ÑτáÑΓ ¡áτá½« µ¿¬½á ß »α«óÑα¬«⌐ º¡áτÑ¡¿⌐ ¿ßσ«ñ¡δσ »áαá¼ÑΓα«ó. àß½¿ º¡áτÑ¡¿∩ limit ¿ index αáó¡δ, µ¿¬½ ¡Ñ óδ»«½¡∩ÑΓß∩ ¡¿ «ñ¡«ú« αáºá ¿ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ºá ß««ΓóÑΓßΓóπεΘ¿¼ ß½«ó«¼ LOOP ¿½¿ +LOOP. é »α«Γ¿ó¡«¼ ß½πτáÑ µ¿¬½ óδ»«½¡∩ÑΓß∩ Γá¬ ªÑ, ¬á¬ µ¿¬½ ó¿ñá DO ... LOOP (DO ... +LOOP). ?DUP n --- n | n --- n n äπí½¿απÑΓ óÑασ¡¿⌐ φ½Ñ¼Ñ¡Γ ßΓÑ¬á n ó Γ«¼ ß½πτáÑ, Ñß½¿ n «Γ½¿τ¡« «Γ ¡π½∩. é »α«Γ¿ó¡«¼ ß½πτáÑ ß«ßΓ«∩¡¿Ñ ßΓÑ¬á ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. ?ERROR f n --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ß óδñáτÑ⌐ ñ¿áú¡«ßΓ¿τÑß¬«ú« ß««íΘÑ¡¿∩ ß ¡«¼Ñα«¼ n ó ß½πτáÑ, Ñß½¿ º¡áτÑ¡¿Ñ Σ½áúá f - TRUE. ?EXEC --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ¡Ñ πßΓá¡«ó- ½Ñ¡ αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿. ?FILESIZE handle_pars --- file_size <double> é«ºóαáΘáÑΓ αáº¼Ñα Σá⌐½á ó íá⌐Γáσ ó ó¿ñÑ »«½«ª¿ΓÑ½∞¡«ú« ñó«⌐¡«ú« µÑ½«ú« τ¿ß½á. öá⌐½ »αÑñóáα¿ΓÑ½∞¡« ñ«½ªÑ¡ íδΓ∞ «Γ¬αδΓ. éδ»«½¡Ñ¡¿Ñ φΓ«ú« ß½«óá πßΓá¡áó½¿óáÑΓ π¬áºáΓÑ½∞ τΓÑ¡¿∩-ºá»¿ß¿ ¡á ¬«¡Ñµ Σá⌐½á. ?LOADING --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ¡Ñ πßΓá¡«ó- ½Ñ¡ αÑª¿¼ ºáúαπº¬¿ óσ«ñ¡«ú« ΓÑ¬ßΓá ¿º φ¬αá¡¡«ú« Σá⌐½á. ?LSHIFT --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE ó ß½πτáÑ, Ñß½¿ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¡á ¬½áó¿áΓπαÑ ¡áªáΓá ½Ñóá∩ ¬½áó¿Φá SHIFT, ¿ FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. ?NEGATE n --- n1 îÑ¡∩ÑΓ º¡áτÑ¡¿Ñ 16-αáºα∩ñ¡«ú« τ¿ß½á n ¡á »α«Γ¿ó«»«½«ª¡δ⌐, Ñß½¿ n - »«½«ª¿ΓÑ½∞¡«. ?OFFSET handle_pars --- offset <double> é«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ τΓÑ¡¿∩-ºá»¿ß¿ Σá⌐½á ó ó¿ñÑ »«½«ª¿ΓÑ½∞¡«ú« ñó«⌐¡«ú« µÑ½«ú« τ¿ß½á. öá⌐½ »αÑñóáα¿ΓÑ½∞¡« ñ«½ªÑ¡ íδΓ∞ «Γ¬αδΓ. ?PAIRS n1 n2 --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ ¡Ñß«ó»áñÑ¡¿∩ º¡á- τÑ¡¿⌐ n1 ¿ n2. êß»«½∞ºπÑΓß∩ ñ½∩ ñ¿áú¡«ßΓ¿¬¿ ß««ΓóÑΓßΓ- ó¿∩ π»αáó½∩εΘ¿σ ßΓαπ¬Γπα »α¿ ¬«¼»¿½∩µ¿¿. ?RSHIFT --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE ó ß½πτáÑ, Ñß½¿ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¡á ¬½áó¿áΓπαÑ ¡áªáΓá »αáóá∩ ¬½áó¿Φá SHIFT, ¿ FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. ?SCROLL --- f éδñáÑΓ »α¿º¡á¬ "true" »α¿ πßΓá¡«ó½Ñ¡¡«¼ αÑª¿¼Ñ »α«Γ∩ª¬¿ ßΓα«¬ ó á¬Γ¿ó¡«¼ «¬¡Ñ (αÑª¿¼ SCROLL) ¿ »α¿º¡á¬ "false" ó »α«Γ¿ó¡«¼ ß½πτáÑ (αÑª¿¼ SCROLL-OFF). ?SCROLL-LOCK --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ πßΓá¡«ó½Ñ¡¡«¼ ¡á ¬½áó¿áΓπαÑ αÑª¿¼Ñ SCROLL-LOCK ¿ FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. ?SHIFT --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE ó ß½πτáÑ, Ñß½¿ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¡á ¬½áó¿áΓπαÑ ¡áªáΓá σ«Γ∩ íδ «ñ¡á ¿º ¬½áó¿Φ SHIFT, ¿ FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. ?STACK --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ ΓÑ¬πΘÑÑ º¡á- τÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á óδσ«ñ¿Γ ºá úαá¡¿µδ ñ«»πßΓ¿¼«⌐ ñ½∩ ßΓÑ¬á «í½áßΓ¿ »á¼∩Γ¿. ?TERMINAL --- f Ä»αáΦ¿óáÑΓ ß«ßΓ«∩¡¿Ñ ¬½áó¿áΓπαδ, ¿, Ñß½¿ ß ¬½áó¿áΓπαδ íδ½¿ óóÑñÑ¡δ ¬á¬¿Ñ-½¿í« ß¿¼ó«½δ (Γ.Ñ. íπΣÑα ¬½áó¿áΓπαδ ¡Ñ »πßΓ), óδñáÑΓ º¡áτÑ¡¿Ñ TRUE, á ó »α«Γ¿ó¡«¼ ß½πτáÑ - FALSE. ç¡áτÑ¡¿Ñ TRUE »α¿ óδº«óÑ ?TERMINAL íπñÑΓ óδñá- óáΓ∞ß∩ ñ« ΓÑσ »«α, »«¬á ¿º íπΣÑαá ¡Ñ íπñπΓ óδíαá¡δ óßÑ ß¿¼ó«½δ (¡á»α¿¼Ñα, »α¿ »«¼«Θ¿ ß½«ó KEY ¿½¿ PCKEY). ?VOCABULARY addr --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ addr ¡Ñ ∩ó½∩ÑΓß∩ áñαÑß«¼ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿, «»αÑñÑ½Ñ¡¡«⌐ τÑαÑº "VOCABULARY". ?WIDTH --- n ÆÑ¬πΘÑÑ º¡áτÑ¡¿Ñ Φ¿α¿¡δ φ¬αá¡á ó º¡á¬«»«º¿µ¿∩σ. ?WINDOW addr --- éδºδóáÑΓ «Φ¿í«τ¡πε ß¿Γπáµ¿ε ó ß½πτáÑ, Ñß½¿ addr ¡Ñ ∩ó½∩ÑΓß∩ áñαÑß«¼ »«½∩ ¬«ñá ß½«óáα¡«⌐ ßΓáΓ∞¿, «»αÑñÑ½Ñ¡¡«⌐ τÑαÑº "WINDOW". ?cs: --- n Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ αÑú¿ßΓαá CS, ß««ΓóÑΓßΓóπεΘÑú« ¬«ñ«ó«¼π ßÑú¼Ñ¡Γπ öÄÉÆá. ?vs: --- segm ÆÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ßÑú¼Ñ¡Γ¡«ú« áñαÑßá ñ½∩ óδó«ñá ¡á φ¬αá¡ (ó¿ñÑ«ßÑú¼Ñ¡Γ). @ addr --- n Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n, αáß»«½«ªÑ¡¡«Ñ »« áñαÑßπ addr. @DATE --- n1 n2 éδñáÑΓ ΓÑ¬πΘπε ß¿ßΓÑ¼¡πε ñáΓπ. n1 - ú«ñ (1980-2099); n2 ß«ñÑαª¿Γ ó ½Ñó«¼ íá⌐ΓÑ ¡«¼Ñα ¼Ñß∩µá, ó »αáó«¼ íá⌐ΓÑ - τ¿ß½«). @L n1 addr --- n2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n2, αáß»«½«ªÑ¡¡«Ñ ó ßÑú¼Ñ¡ΓÑ n1 ß« ß¼ÑΘÑ¡¿Ñ¼ addr. @TIME --- n1 n2 éδñáÑΓ ΓÑ¬πΘÑÑ ß¿ßΓÑ¼¡«Ñ óαÑ¼∩. n1 ß«ñÑαª¿Γ ó ½Ñó«¼ íá⌐ΓÑ τáßδ, ó »αáó«¼ íá⌐ΓÑ - ¼¿¡πΓδ; n2 ß«ñÑαª¿Γ ó ½Ñó«¼ íá⌐ΓÑ ßÑ¬π¡ñδ, ó »αáó«¼ íá⌐ΓÑ - ß«ΓδÑ ñ«½¿ ßÑ¬π¡ñ. A: --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ñ¿ß¬ A: ABORT --- æΓÑ¬ ßíαáßδóáÑΓß∩ ¿ óδ»«½¡∩ÑΓß∩ QUIT. ABORT" f --- (run) àß½¿ f = TRUE, óδó«ñ¿Γ ß««íΘÑ¡¿Ñ Abort: "name" text úñÑ name - ¿¼∩ ß½«óá, á text - ΓÑ¬ßΓ ß««íΘÑ¡¿∩, ß½ÑñπεΘ¿⌐ ºá ABORT", ¿ óδ»«½¡∩ÑΓ ABORT. ABS n --- u Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áíß«½εΓ¡πε óÑ½¿τ¿¡π τ¿ß½á n. Åα¿ n αáó¡«¼ -32768 º¡áτÑ¡¿Ñ u ß«ó»áñáÑΓ ß n. ACTIVE --- w_addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß í½«¬á π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. ACW --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß í½«¬á π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. AGAIN --- êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó ó¿ñÑ: BEGIN ... AGAIN é« óαÑ¼∩ ¿ß»«½¡Ñ¡¿∩ »ÑαÑñáÑΓ π»αáó½Ñ¡¿Ñ ¡á ß««ΓóÑΓßΓóπεΘÑÑ ß½«ó« BEGIN. æ«ßΓ«∩¡¿Ñ ßΓÑ¬á ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. éδ»«½¡Ñ¡¿Ñ µ¿¬½á ¼«ªÑΓ íδΓ∞ »αÑαóá¡« ß ¿ß»«½∞º«óá¡¿Ñ¼ Γá¬¿σ ß½«ó, ¬á¬ EXIT, ABORT ¿½¿ QUIT. ALARM --- éδñáτá ºóπ¬«ó«ú« ß¿ú¡á½á ΓαÑó«ú¿. ALLOT n --- ÉÑºÑαó¿απÑΓ «í½áßΓ∞ »á¼∩Γ¿ ñ½¿¡«⌐ n íá⌐Γ«ó »« áñαÑßπ, ºáñáóáÑ¼«¼π ΓÑ¬πΘ¿¼ º¡áτÑ¡¿Ñ¼ π¬áºáΓÑ½∩ ß½«óáα∩. ç¡áτÑ- ¡¿Ñ π¬áºáΓÑ½∩ ß½«óáα∩ πóÑ½¿τ¿óáÑΓß∩ ¡á óÑ½¿τ¿¡π n. AND n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ n3 »«í¿Γ¡«ú« óδ»«½¡Ñ¡¿∩ ½«- ú¿τÑß¬«⌐ «»Ñαáµ¿¿ "ê" ñ½∩ ñóπσ 16-αáºα∩ñ¡δσ º¡áτÑ¡¿⌐ n1 ¿ n2. ASCII --- c | --- (compiling) êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: ASCII c çñÑß∞ c - ß¿¼ó«½, «úαá¡¿τÑ¡¡δ⌐ »α«íÑ½á¼¿. Åα¿ ¿ß»«½¡Ñ¡¿¿ ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ ¬«ñ ñá¡¡«ú« ß¿¼ó«½á ó ¬«ñ¿α«ó¬Ñ ASCII. é αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿ ¬«ñ ß¿¼ó«½á c ¬«¼»¿½¿απÑΓß∩ ó ó¿ñÑ τ¿ß½«ó«ú« ½¿ΓÑαá½á, »«¼ÑΘáÑ¼«ú« ¡á ßΓÑ¬ »α¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¿∩. ASSEMBLER --- Å«ñ¬½ετáÑΓ ¬ ΓÑ¬πΘÑ¼π ¬«¡ΓÑ¬ßΓπ ß½«óáα∞ ASSEMBLER, ß«- ñÑαªáΘ¿⌐ «»αÑñÑ½Ñ¡¿∩, ¿ß»«½∞ºπÑ¼δÑ ñ½∩ ¬«¼»¿½∩µ¿¿ ¼á- Φ¿¡¡«ú« ¬«ñá. ATS --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ π¬áºáΓÑ½∞ ¡á CFA á¬Γ¿ó¡«ú« »α«µÑßßá. B/BUF --- n è«¡ßΓá¡Γá, «»αÑñÑ½∩εΘá∩ αáº¼Ñα íπΣÑαá, ¿ß»«½∞ºπÑ¼«ú« »α¿ αáí«ΓÑ ß ñ¿ß¬«¼. çáñáÑΓ τ¿ß½« íá⌐Γ«ó, ßτ¿ΓδóáÑ¼δσ ß ñ¿ß¬á ß½«ó«¼ BLOCK. æ«ó»áñáÑΓ »« óÑ½¿τ¿¡Ñ ß αáº¼Ñα«¼ «ñ¡«ú« º¬αá¡á φ¬αá¡¡«ú« Σá⌐½á. B: --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ñ¿ß¬ B: BACKGROUND n --- ôßΓá¡áó½¿óáÑΓ º¡áτÑ¡¿Ñ n (0..15) ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« µóÑΓá Σ«¡á ñ½∩ óδó«ñ¿¼δσ ¡á φ¬αá¡ ß¿¼ó«½«ó. ÉÑá½∞¡δ⌐ µóÑΓ Σ«¡á íπñÑΓ ºáó¿ßÑΓ∞ Γá¬ªÑ «Γ πßΓá¡«ó¬¿ αÑª¿¼á ¼Ñα- µá¡¿∩ (ß¼. BLINK, BLINK-OFF). BASE --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ º¡áτÑ- ¡¿Ñ «ß¡«óá¡¿∩ ß¿ßΓÑ¼δ ßτ¿ß½Ñ¡¿∩, ¿ß»«½∞ºπÑ¼«Ñ ñ½∩ »αÑ- «íαáº«óá¡¿∩ τ¿ß½«óδσ º¡áτÑ¡¿⌐ »α¿ óó«ñÑ ¿ óδó«ñÑ. BEEP freq duration --- Å«ñáÑΓ ºóπ¬«ó«⌐ ß¿ú¡á½ ß τáßΓ«Γ«⌐ freq (ó âÑαµáσ) ¿ »α«ñ«½ª¿ΓÑ½∞¡«ßΓ∞ε duration, óδαáªÑ¡¡«⌐ ó ß«Γδσ ñ«½∩σ ßÑ¬π¡ñδ. BEGIN --- êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó «ñ¡«¼ ¿º ß½ÑñπεΘ¿σ ó¿ñ«ó: BEGIN ... AGAIN BEGIN ... UNTIL BEGIN ... WHILE ... REPEAT æ½«ó« BEGIN «Γ¼ÑτáÑΓ ¡áτá½« »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ñÑ⌐ßΓó¿⌐ ¬«Γ«αá∩ ¼«ªÑΓ óδ»«½¡∩Γ∞ß∩ µ¿¬½¿τÑß¬¿. é »Ñαó«¼ ß½πτáÑ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ¼Ñªñπ BEGIN ¿ AGAIN óδ»«½¡∩ÑΓß∩ ó íÑß¬«¡Ñτ¡«¼ µ¿¬½Ñ, ¿º ¬«Γ«α«ú« ó«º¼«ªÑ¡ Γ«½∞¬« »α¿¡πñ¿- ΓÑ½∞¡δ⌐ óδσ«ñ (ABORT, EXIT, QUIT ¿ Γ.ñ.). Å«ß½Ññ«óá- ΓÑ½∞¡«ßΓ∞ ¼Ñªñπ BEGIN ¿ UNTIL óδ»«½¡∩ÑΓß∩ ñ« ΓÑσ »«α, »«¬á ó ¼«¼Ñ¡Γ óδ»«½¡Ñ¡¿∩ UNTIL ¡á óÑαΦ¿¡Ñ ßΓÑ¬á ¡Ñ «¬áªÑΓß∩ º¡áτÑ¡¿Ñ TRUE. é ΓαÑΓ∞Ñ¼ ß½πτáÑ »«ß½Ññ«óáΓÑ½∞- ¡«ßΓ∞ ñÑ⌐ßΓó¿⌐ ¼Ñªñπ WHILE ¿ REPEAT óδ»«½¡∩ÑΓß∩ ñ« ΓÑσ »«α, »«¬á »ÑαÑñ óδ»«½¡Ñ¡¿Ñ¼ ß½«óá WHILE ¡á ßΓÑ¬Ñ ¡áσ«ñ¿Γß∩ º¡áτÑ¡¿Ñ TRUE. BELL --- éδñáτá ºóπ¬«ó«ú« ß¿ú¡á½á »α«ñ«½ª¿ΓÑ½∞¡«ßΓ∞ε «¬«½« 0.5 ß. BL --- 32 éδñáÑΓ º¡áτÑ¡¿Ñ ASCII-¬«ñá ß¿¼ó«½á "»α«íÑ½". BLANK addr n --- çá»«½¡∩ÑΓ »α«íÑ½á¼¿ «íáßΓ∞ »á¼∩Γ¿ ß áñαÑßá addr ñ½¿¡«⌐ n íá⌐Γ«ó. BLINK --- ôßΓá¡áó½¿óáÑΓ αÑª¿¼ ¼Ñαµá¡¿∩ óδóÑñÑ¡¡«ú« ¡á φ¬αá¡ ñ¿ß- »½Ñ∩ ΓÑ¬ßΓá. ÉÑª¿¼ ¼Ñαµá¡¿∩ ñÑ⌐ßΓóπÑΓ ¡á ß¿¼ó«½δ, µóÑΓ Σ«¡á ¬«Γ«αδσ »αÑóδΦáÑΓ º¡áτÑ¡¿Ñ 7, »α¿ φΓ«¼ ó¿ñ¿¼δ⌐ µóÑΓ Σ«¡á ñ½∩ ¼ÑαµáεΘ¿σ ß¿¼ó«½«ó íπñÑΓ ¡á 8 ¼Ñ¡∞ΦÑ αÑ- á½∞¡« πßΓá¡«ó½Ñ¡¡«ú« (ß¼. BACKGROUND). BLINK-OFF --- ÄΓ¼Ñ¡∩ÑΓ αÑª¿¼ ¼Ñαµá¡¿∩ óδóÑñÑ¡¡«ú« ¡á φ¬αá¡ ñ¿ß»½Ñ∩ ΓÑ¬ßΓá. é«ßßΓá¡áó½¿óáÑΓß∩ αÑá½∞¡δ⌐ µóÑΓ Σ«¡á ñ½∩ ¼Ñαµá- εΘ¿σ ß¿¼ó«½«ó. BLK --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘ¿⌐ ¡«¼Ñα í½«¬á ¿¡ΓÑα»αÑΓ¿απÑ¼«ú« φ¬αá¡¡«ú« Σá⌐½á. Åα¿ BLK αáó¡«¼ ¡π½ε óσ«ñ¡«⌐ ΓÑ¬ßΓ óó«ñ¿Γß∩ ß ΓÑα¼¿¡á½á. BLOCK n --- addr æτ¿ΓδóáÑΓ ¿º ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á í½«¬ ß ¡«¼Ñα«¼ n ¿ óδñáÑΓ áñαÑß íπΣÑα¡«⌐ «í½áßΓ¿ addr, ó ¬«Γ«απε í½«¬ ßτ¿Γá¡. ü½«¬ Σ¿º¿τÑß¬¿ ßτ¿ΓδóáÑΓß∩ ß ñ¿ß¬á Γ«½∞¬« ó Γ«¼ ß½πτáÑ, Ñß½¿ ó ¼«¼Ñ¡Γ «íαáΘÑ¡¿∩ ¬ BLOCK «¡ ¡Ñ ¡áσ«ñ¿Γß∩ ó «ñ¡«¼ ¿º íπΣÑα«ó íπΣÑα¡«⌐ «í½áßΓ¿ öÄÉÆ-ß¿ßΓÑ¼δ. Åα¿ φΓ«¼ »α«¿ºó«ñ¿Γß∩ ºá»¿ß∞ ¡á ñ¿ß¬ »«ß½Ññ¡Ñú« ßτ¿Γá¡¡«ú« í½«¬á, Ñß½¿ ñ½∩ ¡Ñú« íδ½ πßΓá¡«ó½Ñ¡ »α¿º¡á¬ ¼«ñ¿Σ¿¬áµ¿¿ UPDATE. Åα¿ ßτ¿Γδóá¡¿¿ í½«¬á ß ¡«¼Ñα«¼, »αÑóδΦáεΘ¿¼ ΓÑ¬πΘ¿⌐ αáº¼Ñα Σá⌐½á, íπΣÑα »« áñαÑßπ addr ºá»«½¡∩ÑΓß∩ »α«íÑ½á¼¿, ¿ πßΓá¡áó½¿óáÑΓß∩ º¡áτÑ¡¿Ñ TRUE ó »ÑαÑ¼Ñ¡¡«⌐ DISK-ERROR. êº¼Ñ¡Ñ¡¿Ñ αáº¼Ñαá Σá⌐½á íπñÑΓ »α«¿ºóÑñÑ¡« Γ«½∞¬« ó ß½πτáÑ πßΓá¡«ó¬¿ »α¿º¡á¬á UPDATE. æ¼. Γá¬ªÑ BUFFER, UPDATE, FLUSH, EMPTY-BUFFERS, SAVE-BUFFERS. BLOCK-READ --- ö¿º¿τÑß¬«Ñ ßτ¿Γδóá¡¿Ñ í½«¬á ß ¡«¼Ñα«¼, ¡áσ«ñ∩Θ¿¼ß∩ ó »«½∞º«óáΓÑ½∞ß¬«⌐ »ÑαÑ¼Ñ¡¡«⌐ REC, ß ñ¿ß¬á. BLOCK-WRITE --- ö¿º¿τÑß¬á∩ ºá»¿ß∞ í½«¬á ß ¡«¼Ñα«¼, ¡áσ«ñ∩Θ¿¼ß∩ ó »«½∞º«óáΓÑ½∞ß¬«⌐ »ÑαÑ¼Ñ¡¡«⌐ REC, ¡á ñ¿ß¬. BODY> pfa --- cfa Å« áñαÑßπ »«½∩ »áαá¼ÑΓα«ó ß½«óáα¡«⌐ ßΓáΓ∞¿ pfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ¬«ñá cfa. BORDER n --- ôßΓá¡áó½¿óáÑΓ µóÑΓ «¬á⌐¼½Ñ¡¿∩ φ¬αá¡á ñ¿ß»½Ñ∩ (n=0-15). BRANCH --- Åα«µÑñπαá óαÑ¼Ñ¡¿ óδ»«½¡Ñ¡¿∩, ¬«¼»¿½¿απÑ¼á∩ ß½«óá¼¿ ELSE, REPEAT, AGAIN. UNTIL ¿ WHILE. êß»«½∞ºπÑΓß∩ ñ½∩ óδ»«½¡Ñ¡¿∩ íÑºπß½«ó¡δσ »ÑαÑσ«ñ«ó. é ¬áτÑßΓóÑ ¡«ó«ú« º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ ¿¡ΓÑα»αÑΓ¿απÑ¼«⌐ ¿¡ßΓαπ¬µ¿¿ öÄÉÆ-¿¡- ΓÑα»αÑΓáΓ«αá πßΓá¡áó½¿óáÑΓß∩ º¡áτÑ¡¿Ñ, αáß»«½«ªÑ¡¡«Ñ ¡Ñ»«ßαÑñßΓóÑ¡¡« óß½Ññ ºá óδº«ó«¼ BRANCH. BRKFL --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ (TRUE ¿½¿ FALSE) »αÑαδóá¡¿∩ «Γ ¬½áó¿áΓπαδ »« ¡áªáΓ¿∩ ¬½áó¿Φ Ctrl/Break. BS --- 8 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ASCII-¬«ñπ ß¿¼ó«½á "ó«ºóαáΓ ¬παß«αá" (Backspace). ê¼ÑÑΓ º¡áτÑ¡¿Ñ, αáó¡«Ñ 8. BTC --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ º¡áτÑ¡¿Ñ ßτÑΓτ¿¬á «íαáΘÑ¡¿⌐ ¬ φ¬αá¡¡δ¼ Σá⌐½á¼ (¿ß»«½∞ºπÑΓß∩ »α«µÑñπαá¼¿ ñ«ßΓπ»á ¬ φ¬αá¡¡δ¼ Σá⌐½á¼). BUFF-TAB --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß αáí«τÑ⌐ Γáí½¿µδ íπΣÑα«ó (¿ß»«½∞ºπÑΓß∩ »α«µÑñπαá¼¿ ñ«ßΓπ»á ¬ φ¬αá¡¡δ¼ Σá⌐½á¼). BUFFER n --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß addr »Ñαó«ú« íá⌐Γá íπΣÑαá, »α¿- »¿ßá¡¡«ú« Σ¿º¿τÑß¬«¼π í½«¬π ß ¡«¼Ñα«¼ n. é ñá¡¡«⌐ αÑá- ½¿ºáµ¿¿ ó ßÑú¼Ñ¡ΓÑ »á¼∩Γ¿ öÄÉÆ-ß¿ßΓÑ¼δ ñ½∩ αáí«Γδ ß ñ¿ß¬á¼¿ óδñÑ½Ñ¡ «ñ¿¡ íπΣÑα, áñαÑß ¡áτá½á ¬«Γ«α«ú« óßÑú- ñá óδñáÑΓß∩ ß½«ó«¼ BUFFER. æ«ñÑαª¿¼«Ñ íπΣÑαá ñ½∩ ¡«¼Ñ- αá n, «Γ½¿τ¡«ú« «Γ ¡«¼Ñαá »«ß½Ññ¡Ñú« ßτ¿Γá¡¡«ú« í½«¬á (ß¼. BLOCK), ßτ¿ΓáÑΓß∩ ¡Ñ«»αÑñÑ½Ñ¡¡δ¼. BUILD --- æ«ºñáÑΓ ºáú«½«ó«¬ ß½«óáα¡«⌐ ßΓáΓ∞¿, Σ«α¼¿απ∩ »«½Ñ ¿¼Ñ¡¿ ¿º ßΓα«¬¿, αáß»«½«ªÑ¡¡«⌐ »« ΓÑ¬πΘÑ¼π áñαÑßπ HERE. çáú«½«ó«¬ Σ«α¼¿απÑΓß∩ ó ó¿ñÑ, ¿ß»«½∞ºπÑ¼«¼ ó CODE-«»αÑñÑ½Ñ¡¿∩σ, Γ.Ñ. »«½Ñ ¬«ñá ß«ñÑαª¿Γ áñαÑß »«½∩ »áαá¼ÑΓα«ó. BYE --- ÄßπΘÑßΓó½∩ÑΓ óδσ«ñ ¿º öÄÉÆ-ß¿ßΓÑ¼δ. æ«σαá¡∩ÑΓ óßÑ ¼«ñ¿Σ¿µ¿α«óá¡¡δÑ íπΣÑαδ, ºá¬αδóáÑΓ ΓÑ¬πΘ¿⌐ φ¬αá¡¡δ⌐ Σá⌐½ ¿ »ÑαÑñáÑΓ π»αáó½Ñ¡¿Ñ «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼Ñ. Black --- 0 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ τÑα¡«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Blue --- 1 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ß¿¡Ñ¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Brown --- 6 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ¬«α¿τ¡Ñó«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. C! b addr --- æ«σαá¡∩ÑΓ 8-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ b »« áñαÑßπ addr. C!L b n addr --- æ«σαá¡∩ÑΓ 8-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ d ó ßÑú¼Ñ¡ΓÑ n ß« ß¼ÑΘÑ¡¿- ¿Ñ¼ addr. C, b --- æ«σαá¡∩ÑΓ 8-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n »« áñαÑßπ, ºáñáóáÑ¼«¼π ΓÑ¬πΘ¿¼ º¡áτÑ¡¿Ñ¼ π¬áºáΓÑ½∩ ß½«óáα∩. ô¬áºáΓÑ½∞ ß½«óáα∩ »α«ñó¿úáÑΓß∩ ¡á 1 íá⌐Γ. C-BYTE n1 n2 --- b ö«α¼¿απÑΓ µóÑΓ«ó«⌐ íá⌐Γ b »« ºáñá¡¡δ¼ º¡áτÑ¡¿∩¼ µóÑΓá Σ«¡á n1 (0..15) ¿ µóÑΓá ß¿¼ó«½«ó n2 (0..15). æ¼. Γá¬ªÑ BACKGROUND, FOREGROUND, ?COLOR. C-WORD b --- n ä½∩ ß¿¼ó«½á ß ¬«ñ«¼ b Σ«α¼¿απÑΓ ß½«ó« n ó ó¿ñÑ, ß««Γ- óÑΓßΓóπεΘÑ¼ »αÑñßΓáó½Ñ¡¿ε ß¿¼ó«½á ó íπΣÑαÑ αÑúÑ¡Ñαáµ¿¿ ñ¿ß»½Ñ∩ (ó¿ñÑ«»á¼∩Γ¿). ç¡áτÑ¡¿Ñ n ß«ñÑαª¿Γ ó ¼½áñΦ¿σ 8 í¿Γáσ ºáñá¡δ⌐ ¬«ñ b, á ó ßΓáαΦ¿σ 8 í¿Γáσ - ΓÑ¬πΘÑÑ º¡á- τÑ¡¿Ñ µóÑΓ«ó«ú« áΓα¿íπΓá (ß¼. ?COLOR). C: --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ñ¿ß¬ C: C@ addr --- b Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 8-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ b, αáß»«½«ªÑ¡¡«Ñ »« áñαÑßπ addr. C@L n addr --- b Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 8-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ b, αáß»«½«ªÑ¡¡«Ñ ó ßÑú¼Ñ¡ΓÑ n ß« ß¼ÑΘÑ¡¿Ñ¼ addr. CASE n --- n (run) | --- sys (compile) êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ñ½∩ ºáñá¡¿∩ óÑΓó½Ñ¡¿⌐ ó ó¿ñÑ CASE s1 OF ... ENDOF s2 OF ... ENDOF ... sn OF ... ENDOF . . . ENDCASE úñÑ s1,...,sn - ßÑ½Ñ¬Γ«αδ ß««ΓóÑΓßΓóπεΘ¿σ óÑΓóÑ⌐. CENTER wcb_addr --- ôßΓá¡áó½¿óáÑΓ áΓα¿íπΓδ αáß»«½«ªÑ¡¿∩ «¬¡á ß áñαÑß«¼ í½«¬á π»αáó½Ñ¡¿∩ wcb_addr ñ½∩ αáº¼ÑΘÑ¡¿∩ ó µÑ¡ΓαÑ φ¬αá¡á. éδ»«½¡Ñ¡¿Ñ ó«º¼«ª¡« Γ«½∞¬« ñ½∩ ¡Ñ«Γ¬αδΓδσ «¬«¡. CHANGE-DIR directory-par --- status ôßΓá¡áó½¿óáÑΓ ºáñá¡¡πε ñ¿αÑ¬Γ«α¿ε ó ¬áτÑßΓóÑ ΓÑ¬πΘÑ⌐. é«ºóαáΘáÑΓ ¬«ñ ºáóÑαΦÑ¡¿∩ status. Ç¡á½¿º º¡áτÑ¡¿∩ status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS CHDIR --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ CHDIR path ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑ⌐ ñ¿αÑ¬Γ«α¿¿ ¡á ΓÑ¬πΘÑ¼ ¿½¿ π¬áºá¡¡«¼ πßΓα«⌐ßΓóÑ ñ¿αÑ¬Γ«α¿ε path. CLEARSCREEN --- Äτ¿ΘáÑΓ (ºá»«½¡∩ÑΓ »α«íÑ½á¼¿) á¬Γ¿ó¡«Ñ «¬¡« ¡á φ¬αá¡Ñ ñ¿ß»½Ñ∩ ¿ »«¼ÑΘáÑΓ ¬παß«α ó ½Ñóδ⌐ óÑασ¡¿⌐ πú«½ «¬¡á. CLI --- çá»αÑΘÑ¡¿Ñ αÑá¬µ¿¿ ¡á »αÑαδóá¡¿Ñ «Γ ¬½áó¿áΓπαδ »« ¡áªáΓ¿ε ¬½áó¿Φ Ctrl/Break. CLOCK --- Åáαá½½Ñ½∞¡δ⌐ »α«µÑßß óδñáτ¿ αÑá½∞¡«ú« óαÑ¼Ñ¡¿ ó »αáó«¼ óÑασ¡Ñ¼ πú½π φ¬αá¡á. CLOSE-FILE handle_pars --- status çá¬αδóáÑΓ Σá⌐½, «ßó«í«ªñáÑΓ í½«¬ π»αáó½Ñ¡¿∩ ¿ «τ¿ΘáÑΓ ß««ΓóÑΓßΓóπεΘ¿Ñ Σ½áú¿ ó HCB. é«ºóαáΘáÑΓ ¬«ñ ºáóÑαΦÑ¡¿∩ status. Ç¡á½¿º º¡áτÑ¡¿∩ status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS CMOVE addr1 addr2 n --- ÅÑαÑßδ½áÑΓ n íá⌐Γ«ó, αáß»«½«ªÑ¡¡δσ ¡áτ¿¡á∩ ß áñαÑßá addr1 »« áñαÑßπ addr2. ÅÑαÑßδ½¬á »α«¿ºó«ñ¿Γß∩ ó ¡á»αáó- ½Ñ¡¿¿ ó«ºαáßΓá¡¿∩ áñαÑß«ó. Åα¿ n αáó¡«¼ ¡π½ε ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ óδ»«½¡∩ÑΓß∩. CMOVE> addr1 addr2 n --- ÅÑαÑßδ½áÑΓ n íá⌐Γ«ó, αáß»«½«ªÑ¡¡δσ ¡áτ¿¡á∩ ß áñαÑßá addr1 »« áñαÑßπ addr2. ÅÑαÑßδ½¬á »α«¿ºó«ñ¿Γß∩ ó ¡á»αáó- ½Ñ¡¿¿ π¼Ñ¡∞ΦÑ¡¿∩ áñαÑß«ó, ¡áτ¿¡á∩ ß íá⌐Γá »« áñαÑßπ addr1+n-1, »ÑαÑßδ½áÑ¼«ú« »« áñαÑßπ addr2+n-1. Åα¿ n αáó¡«¼ ¡π½ε ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ óδ»«½¡∩ÑΓß∩. CMOVEL n1 addr1 n2 addr2 n3 --- ÅÑαÑßδ½áÑΓ n3 íá⌐Γ«ó, αáß»«½«ªÑ¡¡δσ ó ßÑú¼Ñ¡ΓÑ n1 ß« ß¼ÑΘÑ¡¿Ñ¼ addr1 »« áñαÑßπ addr2 ó ßÑú¼Ñ¡ΓÑ n2. ÅÑαÑßδ½- ¬á »α«¿ºó«ñ¿Γß∩ ó ¡á»αáó½Ñ¡¿¿ ó«ºαáßΓá¡¿∩ áñαÑß«ó. æ¼. CMOVE. Åα¿ n αáó¡«¼ ¡π½ε ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ óδ»«½¡∩ÑΓ- ß∩. CODE --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: CODE name ... END-CODE ö«α¼¿απÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, »«ñ¬½ετáÑΓ ¬ ΓÑ¬πΘÑ¼π ¬«¡ΓÑ¬ßΓπ ß½«óáα∞ ASSEMBLER ñ½∩ ¬«¼»¿½∩µ¿¿ »«- ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ¼áΦ¿¡¡δσ ¬«¼á¡ñ, ºáñá¡¡«⌐ ¼Ñªñπ name ¿ END-CODE. ÇñαÑß ¡áτá½á ñá¡¡«⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ºá- ¡«ß¿Γß∩ ó »«½Ñ ¬«ñá ß½«óá name, ¿ Γá¬¿¼ «íαáº«¼ ßΣ«α¼¿- α«óá¡¡δ⌐ ¼áΦ¿¡¡δ⌐ ¬«ñ óδ»«½¡∩ÑΓß∩ »α¿ óδº«óÑ name. COLD --- CíαáßδóáεΓß∩ ßΓÑ¬¿, «í½áßΓ∞ ß½«óáα∩ ¿ öÄÉÆ-ß¿ßΓÑ¼á »ÑαÑσ«ñ¿Γ ó ¡áτá½∞¡«Ñ ß«ßΓ«∩¡¿Ñ. COLOR-BYTE --- addr éδñáÑΓ áñαÑß 8-í¿Γ«ó«ú« »«½∩, ß«ñÑαªáΘÑú« ΓÑ¬πΘÑÑ º¡á- τÑ¡¿Ñ µóÑΓ«ó«ú« áΓα¿íπΓá (ß¼. ?COLOR). COMPILE --- ÅÑαÑ»¿ßδóáÑΓ ñóπσíá⌐Γ«ó«Ñ º¡áτÑ¡¿Ñ, αáß»«½«ªÑ¡¡«Ñ ¡Ñ»«- ßαÑñßΓóÑ¡¡« ºá óδº«ó«¼ COMPILE »« ΓÑ¬πΘÑ¼π º¡áτÑ¡¿ε π¬áºáΓÑ½∩ ß½«óáα∩ ß »α«ñó¿ªÑ¡¿Ñ¼ Ñú« ¡á 2 íá⌐Γá. CONSOLE --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« πßΓα«⌐ßΓóá óδó«ñá ΓÑα¼¿¡á½. Å«ß½Ñ óδ»«½¡Ñ¡¿∩ ß½«óá CONSOLE óßÑ ñá¡¡δÑ, óδó«ñ¿¼δÑ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó EMIT ¿ TYPE, íπñπΓ «Γ«íαáªáΓ∞ß∩ ¡á φ¬αá¡Ñ ñ¿ß»½Ñ∩. æ¼. Γá¬ªÑ PRINTER. CONSTANT n --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: n CONSTANT name æ«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, ß«ñÑαªáΘπε ó »«½Ñ »áαá¼ÑΓα«ó º¡áτÑ¡¿Ñ n. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name º¡áτÑ¡¿Ñ n »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. CREATE --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: CREATE name æ«ºñáÑΓ ºáú«½«ó«¬ ß½«óáα¡«⌐ ßΓáΓ∞¿ ß ¿¼Ñ¡Ñ¼ name, »«ß½Ñ τÑú« ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ß½«óáα∩ ß«ó»áñáÑΓ ß áñ- αÑß«¼ »«½∩ »áαá¼ÑΓα«ó ß½«óá name. é ¼«¼Ñ¡Γ óδ»«½¡Ñ¡¿∩ ß½«óá name áñαÑß Ñú« »«½∩ »áαá¼ÑΓα«ó »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. æ½«ó« CREATE ¡Ñ αÑºÑαó¿απÑΓ »á¼∩Γ¿ ó »«½Ñ »áαá- ¼ÑΓα«ó ß½«óá name. CONTEXT --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ π¬áºáΓÑ½∞ ¡á »Ñαóδ⌐ ß½«óáα∞ ó ß»¿ß¬Ñ ß½«óáαÑ⌐, «»αÑñÑ½Ñ∩εΘÑ¼ ΓÑ¬πΘ¿⌐ »«α∩ñ«¬ »«¿ß¬á. CONVERT ud1 addr1 --- ud2 addr2 æΓα«¬á ß¿¼ó«½«ó, ¡áτ¿¡áεΘá∩ß∩ ß áñαÑßá addr1 ¿ ß«ñÑαªá- Θá∩ ¿º«íαáªÑ¡¿Ñ τ¿ß½á, »αÑ«íαáºπÑΓß∩ ¬ τ¿ß½«ó«¼π ó¿ñπ. ç¡áτÑ¡¿Ñ ud2 »«½πτáÑΓß∩ »πΓÑ¼ »α¿íáó½Ñ¡¿∩ º¡áτÑ¡¿∩ «τÑ- αÑñ¡«⌐ µ¿Σαδ ¬ »α«¼ÑªπΓ«τ¡«mπ º¡áτÑ¡¿ε ud1, π¼¡«ªÑ¡¡«¼π ¡á ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ BASE. ÅαÑ«íαáº«óá¡¿Ñ »α«ñ«½ªáÑΓß∩ ñ« ΓÑσ »«α, »«¬á ó ¿ßσ«ñ¡«⌐ ßΓα«¬Ñ ¡Ñ óßΓαÑΓ¿Γß∩ ß¿¼- ó«½, ¡Ñ ∩ó½∩εΘ¿⌐ß∩ µ¿Σα«⌐. ÇñαÑß »Ñαó«ú« ¡Ñαáß»«º¡á¡¡«- ú« ß¿¼ó«½á óδñáÑΓß∩ ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá addr2. COUNT addr1 --- addr2 n Å« áñαÑßπ addr1 ßΓα«¬¿ ß¿¼ó«½«ó ß íá⌐Γ«¼ ñ½¿¡δ »«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß ÑÑ ΓÑ¬ßΓ«ó«⌐ τáßΓ¿ addr2 ¿ ñ½¿¡π ó íá⌐Γáσ n. Äíδτ¡« ¿ß»«½∞ºπÑΓß∩ ß½«ó«¼ TYPE ñ½∩ óδó«ñá ßΓα«¬. CR --- éδó«ñ¿Γ ß¿¼ó«½δ "ó«ºóαáΓ ¬áαÑΓ¬¿" ¿ "»ÑαÑó«ñ ßΓα«¬¿", πßΓá¡áó½¿óáÑΓ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ OUT. CREATE --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: CREATE name æ«ºñáÑΓ ºáú«½«ó«¬ ß½«óáα¡«⌐ ßΓáΓ∞¿ ß ¿¼Ñ¡Ñ¼ name, »«ß½Ñ τÑú« ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ß½«óáα∩ ß«ó»áñáÑΓ ß áñ- αÑß«¼ »«½∩ »áαá¼ÑΓα«ó ß½«óá name. é ¼«¼Ñ¡Γ óδ»«½¡Ñ¡¿∩ ß½«óá name áñαÑß Ñú« »«½∩ »áαá¼ÑΓα«ó »«¼ÑΘáÑΓß∩ ¡á ßΓÑ¬. æ½«ó« CREATE ¡Ñ αÑºÑαó¿απÑΓ »á¼∩Γ¿ ó »«½Ñ »áαá- ¼ÑΓα«ó ß½«óá name. CSA --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß ΓÑ¬πΘÑ⌐ ßΓα«¬¿ αáí«τÑ⌐ Γáí½¿µδ ºá»α«úαá¼¼¿α«óá¡¡δσ ¬½áó¿Φ. CSP --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á, ¿ß- »«½∞ºπÑ¼«Ñ ñ½∩ «í¡áαπªÑ¡¿∩ «Φ¿í«¬ ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿. æ¼. Γá¬ªÑ !CSP, ?CSP. CURLEN --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ñ½¿¡π ¿ß»«½¡∩Ñ¼«ú« ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ¼πºδ¬á½∞¡«ú« Σαáú¼Ñ¡Γá (¿ß»«½∞ºπÑΓß∩ »α¿ úÑ¡Ñαáµ¿¿ ¿ ¿ß»«½¡Ñ¡¿¿ ¼Ñ½«ñ¿⌐). CURRENT --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ π¬áºáΓÑ½∞ ¡á ΓÑ¬πΘ¿⌐ ß½«óáα∞ »«- »«½¡Ñ¡¿∩. CURSOR --- é¬½ετáÑΓ ¿º«íαáªÑ¡¿Ñ ¬παß«αá ¡á φ¬αá¡Ñ. CURSOR-OFF --- "âáß¿Γ" ¿º«íαáªÑ¡¿Ñ ¬παß«αá ¡á φ¬αá¡Ñ. Cyan --- 3 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ í½Ññ¡«-ú«½πí«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. D* d1 u --- d2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ π¼¡«ªÑ¡¿∩ 32-αáºα∩ñ¡«ú« τ¿ß½á d1 ¡á 16-αáºα∩ñ¡«Ñ τ¿ß½« íÑº º¡á¬á u. ÉÑºπ½∞ΓáΓ d2 óδñáÑΓß∩ ó ó¿ñÑ 32-αáºα∩ñ¡«ú« τ¿ß½á. D+ d1 d2 --- d3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 32-αáºα∩ñ¡πε ßπ¼¼π d1+d2. D- d1 d2 --- d3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 32-αáºα∩ñ¡πε αáº¡«ßΓ∞ d1-d2. D. d --- éδó«ñ¿Γ º¡áτÑ¡¿Ñ 32-αáºα∩ñ¡«ú« τ¿ß½á d ß óÑñπΘ¿¼ º¡á¬«¼ "-" ó ß½πτáÑ, Ñß½¿ d «Γα¿µáΓÑ½∞¡«. Å«ß½Ñ óδó«ñá τ¿ß½á ñ«»«½¡¿ΓÑ½∞¡« óδó«ñ¿Γß∩ «ñ¿¡ »α«íÑ½. D.R d n --- éδó«ñ¿Γ τ¿ß½« d ß óδ¬½ετ¬«⌐ ó»αáó« ó¡πΓα¿ »«½∩ Φ¿α¿¡«⌐ n ß¿¼ó«½«ó íÑº ºáóÑαΦáεΘÑú« »α«íÑ½á. é ß½πτáÑ, Ñß½¿ ñ½∩ óδó«ñá τ¿ß½á d ¡Ññ«ßΓáΓ«τ¡« n »«º¿µ¿⌐, τ¿ß½« óδó«ñ¿Γß∩ »«½¡«ßΓ∞ε, íÑº πτÑΓá Σ«α¼áΓá n. D/ d1 u --- d2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ ñÑ½Ñ¡¿∩ 32-αáºα∩ñ¡«ú« τ¿ß½á d1 ¡á 16-αáºα∩ñ¡«Ñ τ¿ß½« íÑº º¡á¬á u. ÉÑºπ½∞ΓáΓ d2 óδñáÑΓß∩ ó ó¿ñÑ 32-αáºα∩ñ¡«ú« τ¿ß½á. D0= d --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d (32-αáºα∩ñ¡«Ñ τ¿ß- ½«) αáó¡«¼ ¡π½ε, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. D0= d --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d (32-αáºα∩ñ¡«Ñ τ¿ß- ½«) αáó¡«¼ ¡π½ε, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. D2/ d1 --- d2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ 32-αáºα∩ñ¡«Ñ τ¿ß½« d2 - αÑºπ½∞ΓáΓ µÑ½«τ¿ß½Ñ¡¡«ú« ñÑ½Ñ¡¿∩ τ¿ß½á d2 ¡á 2. D: --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ñ¿ß¬ D: D< d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d1 ¼Ñ¡∞ΦÑ¼ d2 (d1 ¿ d2 - 32-αáºα∩ñ¡δÑ τ¿ß½a ß« º¡á¬«¼), FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. D< d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d1 ¼Ñ¡∞ΦÑ¼ d2 (d1 ¿ d2 - 32-αáºα∩ñ¡δÑ τ¿ß½a ß« º¡á¬«¼), FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¼á¬ß¿¼á½∞¡«Ñ ¿º º¡áτÑ¡¿⌐ d1 ¿ d2 (d1 ¿ d2 32-αáºα∩ñ¡δÑ τ¿ß½a ß« º¡á¬«¼). D<= d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ ßαáó¡Ñ¡¿∩ ñóπσ 32-αáºα∩ñ¡δσ τ¿ßÑ½ d1 ¿ d2: TRUE - Ñß½¿ d1 ¼Ñ¡∞ΦÑ ½¿í« αáó¡« d2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. D<> d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d1 «Γ½¿τ¡«¼ «Γ d2 (d1 ¿ d2 - 32-αáºα∩ñ¡δÑ τ¿ß½a ß« º¡á¬«¼), FALSE - »α¿ d1 αáó¡«¼ d2. D= d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d1 αáó¡«¼ d2 (d1 ¿ D0= d --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ d (32-αáºα∩ñ¡«Ñ τ¿ß- ½«) αáó¡«¼ ¡π½ε, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. D>= d1 d2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ ßαáó¡Ñ¡¿∩ ñóπσ 32-αáºα∩ñ¡δσ τ¿ßÑ½ d1 ¿ d2: TRUE - Ñß½¿ d1 í«½∞ΦÑ ½¿í« αáó¡« d2, FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. DABS d1 --- +d2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áíß«½εΓ¡πε óÑ½¿τ¿¡π 32-αáºα∩ñ¡«ú« τ¿ß- ½á d1. DECIMAL --- ôßΓá¡áó½¿óáÑΓ ñÑß∩Γ¿τ¡πε ß¿ßΓÑ¼π ßτ¿ß½Ñ¡¿∩ (º¡áτÑ¡¿Ñ BASE, αáó¡«Ñ 10). DEFINITIONS --- ôßΓá¡áó½¿óáÑΓ ΓÑ¬πΘ¿⌐ ß½«óáα∞ ó ¬áτÑßΓóÑ ß½«óáα∩ »«»«½- ¡Ñ¡¿∩. DEL --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ DEL [drive][filename] ô¡¿τΓ«ªáÑΓ «ñ¿¡ ¿½¿ ¡Ñß¬«½∞¬« Σá⌐½«ó ¡á ΓÑ¬πΘÑ¼ ¿½¿ π¬áºá¡¡«¼ ñ¿ß¬Ñ. é ¬áτÑßΓóÑ filename ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ úαπ»»«ó«Ñ ¿¼∩ Σá⌐½á. DEPTH --- n éδñáÑΓ ¬«½¿τÑßΓó« n 16-í¿Γ«óδσ φ½Ñ¼Ñ¡Γ«ó, ¡áσ«ñ∩Θ¿σß∩ ¡á áα¿Σ¼ÑΓ¿τÑß¬«¼ ßΓÑ¬Ñ ñ« »«¼ÑΘÑ¡¿∩ ¡á ßΓÑ¬ º¡áτÑ¡¿∩ n. DFLTVOC --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß »«½∩ ¬«ñá ñ«»«½¡¿ΓÑ½∞¡«ú« ß½«óáα∩ »«¿ß¬á. DIGIT c n1 --- n2 true | c n1 --- false ÅαÑ«íαáºπÑΓ ß¿¼ó«½ c ó ¬«ñÑ ASCII ó τ¿ß½«ó«⌐ ó¿ñ n2 ó ß««ΓóÑΓßΓó¿¿ ß «ß¡«óá¡¿Ñ¼ ß¿ßΓÑ¼δ ßτ¿ß½Ñ¡¿∩ n1 ß ñ«- »«½¡Ñ¡¿Ñ¼ αÑºπ½∞ΓáΓá »α¿º¡á¬«¼ TRUE. àß½¿ ß¿¼ó«½ c ¡Ñ ∩ó½∩ÑΓß∩ µ¿Σα«⌐, óδñáÑΓß∩ »α¿º¡á¬ FALSE. DIR --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ DIR [drive][filename] éδñáÑΓ «ú½áó½Ñ¡¿Ñ ΓÑ¬πΘÑú« ¿½¿ π¬áºá¡¡«ú« ñ¿ß¬á ó «¬¡Ñ. é ¬áτÑßΓóÑ filename ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ úαπ»»«ó«Ñ ¿¼∩ Σá⌐½á. DIRECTORY --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: DIRECTORY name æ«ºñáÑΓ í½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ DCB ß ¿¼Ñ¡Ñ¼ name ¿ ßó∩ºδóáÑΓ Ñú« ß ¬«α¡Ñó«⌐ ñ¿αÑ¬Γ«α¿Ñ⌐ "/". Åα¿ ñá½∞- ¡Ñ⌐ΦÑ¼ ¿ß»«½∞º«óá¡¿¿ ß½«óá name, ¡á ßΓÑ¬ íπñÑΓ »«¼Ñ- ΘáΓ∞ß∩ áñαÑß ßΣ«α¼¿α«óá¡¡«ú« DCB, ¡áºδóáÑ¼δ⌐ "directo- ry_par", ¬«Γ«αδ⌐ ¿ß»«½∞ºπÑΓß∩ ¬á¬ áαúπ¼Ñ¡Γ ß½«óá¼¿ MKDIR, CHDIR ¿ RMDIR. DIRNAME directory_par --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: DCB_name DIRNAME path çá¡«ß¿Γ ß»Ñµ¿Σ¿¬áµ¿ε ñ¿αÑ¬Γ«α¿¿ path ¿º óσ«ñ¡«ú« »«Γ«¬á ó í½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ DCB_name. é αÑª¿¼Ñ ¬«¼- »¿½∩µ¿¿ Σ«α¼¿απÑΓ ßΓα«¬«óδ⌐ ½¿ΓÑαá½, ¬«»¿απÑ¼δ⌐ ó í½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐ ó« óαÑ¼∩ óδ»«½¡Ñ¡¿∩. DISK-ERROR --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ «Φ¿í«τ- ¡δσ ß¿Γπáµ¿⌐ »«ß½Ñ óδ»«½¡Ñ¡¿∩ Σ¿º¿τÑß¬«ú« τΓÑ¡¿∩ ¿½¿ ºá»¿ß¿ ¡á ñ¿ß¬. ç¡áτÑ¡¿Ñ FALSE π¬áºδóáÑΓ ¡á ¡«α¼á½∞¡«Ñ ºáóÑαΦÑ¡¿Ñ «í¼Ñ¡á. ç¡áτÑ¡¿Ñ TRUE ¼«ªÑΓ ¿ß»«½∞º«óáΓ∞ß∩ ó ¬áτÑßΓóÑ »α¿º¡á¬á ¬«¡µá Σá⌐½á »α¿ »«ß½Ññ«óáΓÑ½∞¡«¼ τΓÑ¡¿¿ í½«¬«ó (ß¼. BLOCK). DMIN d1 d2 --- d3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¼¿¡¿¼á½∞¡«Ñ ¿º º¡áτÑ¡¿⌐ d1 ¿ d2 (d1 ¿ d2 - 32-αáºα∩ñ¡δÑ τ¿ß½a ß« º¡á¬«¼). DNEGATE d1 --- d2 îÑ¡∩ÑΓ º¡á¬ 32-αáºα∩ñ¡«ú« τ¿ß½á d1 ¡á »α«Γ¿ó«»«½«ª¡δ⌐. DO n1 n2 --- êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó «ñ¡«¼ ¿º ß½ÑñπεΘ¿σ ó¿ñ«ó: DO ... LOOP DO ... +LOOP ÄΓ¼ÑτáÑΓ ¡áτá½« µ¿¬½á ß πß½«ó¿Ñ¼ «¬«¡τá¡¿∩ ó ºáó¿ß¿¼«ß- Γ¿ «Γ º¡áτÑ¡¿⌐ »áαá¼ÑΓα«ó π»αáó½Ñ¡¿∩ µ¿¬½á - ¿¡ñÑ¬ßá (index) ¿ úαá¡¿τ¡«ú« º¡áτÑ¡¿∩ n1 (limit). ìáτá½∞¡«Ñ º¡áτÑ¡¿Ñ ¿¡ñÑ¬ßá »α¿¡¿¼áÑΓß∩ αáó¡δ¼ n2, »α¿ óδ»«½¡Ñ¡¿¿ ß½«ó LOOP ¿½¿ +LOOP Ñú« º¡áτÑ¡¿Ñ ¿º¼Ñ¡∩ÑΓß∩ ¿ »α«óÑα∩- ÑΓß∩ πß½«ó¿Ñ «¬«¡τá¡¿∩ µ¿¬½á. (æ¼. LOOP ¿ +LOOP). û¿¬½ Γ¿»á DO óßÑúñá óδ»«½¡∩ÑΓß∩ »« ¬αá⌐¡Ñ⌐ ¼ÑαÑ «ñ¿¡ αáº. DOES> --- addr | --- (compile) Ä»αÑñÑ½∩ÑΓ ñÑ⌐ßΓó¿∩, óδ»«½¡∩Ñ¼δÑ »α¿ óδº«óÑ ß½«óá, ßΣ«α¼¿α«óá¡¡«ú« ß »«¼«Θ∞ε «»αÑñÑ½∩εΘ¿σ ß½«ó. êß»«½∞ºπ- ÑΓß∩ ó ó¿ñÑ: : namex ... create ... DOES> ... ; ¿ ñá½ÑÑ: namex name çñÑß∞ create - «»αÑñÑ½∩εΘÑÑ ß½«ó« CREATE ¿½¿ ¿¡«Ñ, ¿ß- »«½∞ºπεΘÑÑ Ñú«. æ½«ó« DOES> ºáóÑαΦáÑΓ «»αÑñÑ½∩εΘπε τáßΓ∞ ß½«óá namex ¿ «Γ¼ÑτáÑΓ ¡áτá½« ñÑ⌐ßΓó¿⌐, óδ»«½¡∩Ñ- ¼δσ »α¿ óδº«óÑ «»αÑñÑ½Ñ¡¡δσ ß »«¼«Θ∞ε namex ß½«ó. Åα¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¡«ú« Γá¬¿¼ «íαáº«¼ ß½«óá name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß »«½∩ »áαá¼ÑΓα«ó ß½«óá name, ¿ óδ- »«½¡∩εΓß∩ ñÑ⌐ßΓó¿∩, ºáñá¡¡δÑ ¼Ñªñπ DOES> ¿ ; . DOS --- éδ»«½¡∩ÑΓß∩ »ÑαÑσ«ñ ó ¬«¼á¡ñ¡δ⌐ ¿¡ΓÑα»αÑΓáΓ«α «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ, »α¿ φΓ«¼ ÇßΓα«öÄÉÆ «ßΓáÑΓß∩ αÑº¿ñÑ¡Γ«¼. é«ºóαáΓ ó öÄÉÆ «ßπΘÑßΓó½∩ÑΓß∩ ¬«¼á¡ñ½«⌐ EXIT «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ. DOWN --- ÅÑαÑ¼ÑΘáÑΓ ¬παß«α ó ΓÑ¬πΘÑ¼ «¬¡Ñ ¡á «ñ¡π ßΓα«¬π ó¡¿º íÑº ¿º¼Ñ¡Ñ¡¿∩ ú«α¿º«¡Γá½∞¡«⌐ »«º¿µ¿¿. Åα¿ ¡áσ«ªñÑ¡¿¿ ¬παß«αá ó ¡¿ª¡Ñ⌐ ßΓα«¬Ñ, ó ºáó¿ß¿¼«ßΓ¿ «Γ αÑª¿¼á »α«- Γ∩ª¬¿ (ß¼. SCROLL, SCROLL-OFF) «ßπΘÑßΓó½∩ÑΓß∩ ½¿í« »α«- Γ∩ª¬á ßΓα«¬ óóÑασ, ½¿í« »ÑαÑó«ñ ¬παß«αá ó ¡¿ª¡εε ßΓα«- ¬π. DP --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ß½«- óáα∩ (áñαÑß »Ñαó«ú« ßó«í«ñ¡«ú« íá⌐Γá ºá »α«ßΓαá¡ßΓó«¼, ºá¡∩Γδ¼ ß½«óáα¡δ¼¿ «»αÑñÑ½Ñ¡¿∩¼¿). æ¼. Γá¬ªÑ HERE. DPL --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ «Γ¡«ß¿ΓÑ½∞¡«Ñ »«½«ªÑ¡¿Ñ ñÑß∩Γ¿τ¡«⌐ Γ«τ¬¿ (¬«½¿τÑßΓó« µ¿Σα ó ßΓα«¬Ñ ß»αáóá «Γ Γ«τ¬¿) ó ß¿¼ó«½∞¡«¼ ¿º«íαáªÑ¡¿¿ τ¿ß½á »α¿ óó«ñÑ (ß¼. NUMBER). àß½¿ ó ¿º«íαáªÑ¡¿¿ ¿ßσ«ñ¡«ú« τ¿ß½á Γ«τ¬¿ ¡ÑΓ, πßΓá¡áó½¿óáÑΓß∩ º¡áτÑ¡¿Ñ DPL, αáó¡«Ñ -1. DRAW-BORDER --- ÄΓα¿ß«ó¬á í«αñεαá á¬Γ¿ó¡«ú« «¬¡á. DROP n --- æ¡¿¼áÑΓ ß« ßΓÑ¬á 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n. DTA --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß ¡áτá½∞¡«⌐ «í½áßΓ¿ »ÑαÑñáτ¿ ñá¡¡δσ äÄæ (Data Transfer Area), αáß»«½«ªÑ¡¡«⌐ ó »αÑΣ¿¬ßÑ »α«úαá¼¼¡«ú« ßÑú¼Ñ¡Γá. DU< ud1 ud2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ ud1 ¼Ñ¡∞ΦÑ¼ ud2 (ud1 ¿ ud2 - 32-αáºα∩ñ¡δÑ τ¿ß½a íÑº º¡á¬á), FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. DUMP addr len --- é «¬¡Ñ óδó«ñ¿Γß∩ ΦÑßΓ¡áñµáΓ¿α¿τ¡δ⌐ ¿ ΓÑ¬ßΓ«óδ⌐ ñá¼» «í½áßΓ¿ »á¼∩Γ¿ »« áñαÑßπ addr ñ½¿¡«⌐ len ó ¬«¼á¡ñ¡«¼ ßÑú¼Ñ¡ΓÑ öÄÉÆá. DUP n --- n n äπí½¿απÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n ¡á óÑαΦ¿¡Ñ ßΓÑ¬á. E: --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ñ¿ß¬ E: EDIT [ [x y] screen ] --- éδº«ó ΓÑ¬ßΓ«ó«ú« αÑñá¬Γ«αá ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ. àß½¿ »áαá¼ÑΓαδ ¡Ñ ºáñá¡δ, Γ« αÑñá¬Γ¿απÑΓß∩ »«ß½Ññ¡¿⌐ »α«ß¼«ΓαÑ¡¡δ⌐ ó αÑñá¬Γ«αÑ ¿½¿ ß½«ó«¼ LIST φ¬αá¡, ó »α«Γ¿ó¡«¼ ß½πτáÑ αÑñá¬Γ¿απÑΓß∩ φ¬αá¡ ß ¡«¼Ñα«¼ screen, á ¬παß«α πßΓá¡áó½¿óáÑΓß∩ ó »«º¿µ¿ε (x,y). EDITOR --- æ½«óáα∞ «»αÑñÑ½Ñ¡¿⌐ αÑñá¬Γ«αá ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ. ELSE --- êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó ó¿ñÑ: flag IF (tp) ... ELSE (fp) ... THEN é ß½πτáÑ óδ»«½¡Ñ¡¿∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß½«ó (tp) »« ÑÑ ºáóÑαΦÑ¡¿¿ ß½«ó« ELSE »ÑαÑñáÑΓ π»αáó½Ñ¡¿Ñ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ºá ß««ΓóÑΓßΓóπεΘ¿¼ THEN, »α«»πß¬á∩, Γá¬¿¼ «íαáº«¼, óδ»«½¡Ñ¡¿Ñ óÑΓó¿ (fp). æ¼. IF, THEN. EMIT b --- éδó«ñ¿Γ ß¿¼ó«½ ß ASCII-¬«ñ«¼ b. Åα¿ óδó«ñÑ ¬áªñ«ú« ß¿¼- ó«½á º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ OUT πóÑ½¿τ¿óáÑΓß∩ ¡á 1. ô»αáó- ½∩εΘ¿Ñ ß¿¼ó«½δ «íαáíáΓδóáεΓß∩ «ß«íδ¼ «íαáº«¼: 7 - ó¬½ετÑ¡¿Ñ ºóπ¬«ó«ú« ß¿ú¡á½á (»α«ñ«½ª¿ΓÑ½∞- ¡«ßΓ∞ε «¬«½« 0.5 ß.); 8 - ó«ºóαáΓ ¬παß«αá ¡á «ñ¡π »«º¿µ¿ε ó½Ñó« ß ºá¼Ñ¡«⌐ ß¿¼ó«½á, ¡áσ«ñ∩ΘÑú«ß∩ ó »«º¿µ¿¿ ¬παß«αá ¡á »α«íÑ½ (backspace); 10 - »ÑαÑσ«ñ ¡á ß½ÑñπεΘπε ßΓα«¬π; 13 - ó«ºóαáΓ ¬áαÑΓ¬¿ (»ÑαÑσ«ñ ¬ ¡áτá½π ΓÑ¬πΘÑ⌐ ßΓα«¬¿ ß «í¡π½Ñ¡¿Ñ¼ »ÑαÑ¼Ñ¡¡«⌐ OUT). EMPTY-BUFFERS --- Éáß»¿ßδóáÑΓ íπΣÑα¡πε «í½áßΓ∞ ¡π½Ñóδ¼¿ ¬«ñá¼¿ ¿ »«¼ÑτáÑΓ óßÑ íπΣÑαδ ¬á¬ ßó«í«ñ¡δÑ (¡Ñ ß«ñÑαªáΘ¿Ñ ßτ¿Γá¡¡δσ í½«- ¬«ó). ü½«¬¿, »«¼ÑτÑ¡¡δÑ »α¿º¡á¬«¼ UPDATE ¡á ñ¿ß¬Ñ ¡Ñ ß«σαá¡∩εΓß∩. êß»«½∞ºπÑΓß∩ ¬á¬ ¿¡¿µ¿á½¿º¿απεΘá∩ »α«µÑñπ- αá, óδ»«½¡∩Ñ¼á∩ »ÑαÑñ ¡áτá½«¼ αáí«Γδ ß ñ¿ß¬á¼¿. ENCLOSE addr1 c --- addr1 n1 n2 n3 Åα«µÑñπαá ß¬á¡¿α«óá¡¿∩ ΓÑ¬ßΓá, ¿ß»«½∞ºπÑ¼á∩ ß½«ó«¼ WORD. Å« áñαÑßπ ßΓα«¬¿ addr1 ¿ ß¿¼ó«½π-«úαá¡¿τ¿ΓÑ½ε ß ASCII-¬«ñ«¼ c óδαáíáΓδóáÑΓ ß¼ÑΘÑ¡¿Ñ («Γ¡«ß¿ΓÑ½∞¡« addr) n1 »Ñαó«ú« ¡Ñ ß«ó»áñáεΘÑú« ß αáºñÑ½¿ΓÑ½Ñ¼ ß¿¼ó«½á, ß¼Ñ- ΘÑ¡¿Ñ n2 »Ñαó«ú« αáºñÑ½¿ΓÑ½∩ ¿ ß¼ÑΘÑ¡¿Ñ n3 ñ½∩ ΓÑ¬ßΓá, ß½ÑñπεΘÑú« ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ¡á⌐ñÑ¡¡δ¼ αáºñÑ½¿ΓÑ½Ñ¼. Äí¡áαπª¿óáÑ¼δ⌐ »α¿ ß¬á¡¿α«óá¡¿¿ ß¿¼ó«½ ß ¡π½Ñóδ¼ ¬«ñ«¼ óßÑúñá αáßß¼áΓα¿óáÑΓß∩ ¬á¬ «úαá¡¿τ¿ΓÑ½∞, »α¿ φΓ«¼ º¡á- τÑ¡¿Ñ n3 αáó¡« º¡áτÑ¡¿ε n2. ENDCASE n --- (run) | sys --- (compile) çáóÑαΦáÑΓ ßΓαπ¬Γπαπ óÑΓó½Ñ¡¿∩ CASE. ENDOF --- (run) | sys --- sys (compile) çáóÑαΦáÑΓ óÑΓó∞ óδí«αá ó ßΓαπ¬ΓπαÑ óÑΓó½Ñ¡¿∩ CASE. ENVIRONMENT addr --- addr1 | 0 Å«¿ß¬ º¡áτÑ¡¿∩, ºáñáóáÑ¼«ú« ßΓα«¬«⌐ ß íá⌐Γ«¼ ñ½¿¡δ, αáß»«½«ªÑ¡¡«⌐ »« áñαÑßπ addr, ó »áαá¼ÑΓαáσ ßαÑñδ (Environment) «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ. Åα¿ πß»ÑΦ¡«¼ »«¿ß¬Ñ αÑºπ½∞ΓáΓ ó«ºóαáΘáÑΓß∩ ó ó¿ñÑ ßΓα«¬¿ ß íá⌐Γ«¼ ñ½¿¡δ »« áñαÑßπ addr1, »α¿ ¡Ñπñáτ¡«¼ »«¿ß¬Ñ óδñáÑΓß∩ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. ERASE addr n --- Éáß»¿ßδóáÑΓ «í½áßΓ∞ »á¼∩Γ¿ ñ½¿¡«⌐ n íá⌐Γ«ó, ¡áτ¿¡áεΘπε- ß∩ ß áñαÑßá addr, íá⌐Γá¼¿ ß ¡π½Ñóδ¼¿ º¡áτÑ¡¿∩¼¿. ERROR n --- éδñáÑΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ ß ¡«¼Ñα«¼ n ¿ «ßπΘÑßΓó½∩ÑΓ ¿¡¿µ¿á½¿ºáµ¿ε öÄÉÆ-¿¡ΓÑα»αÑΓáΓ«αá. éßÑ ß««íΘÑ¡¿∩ ß¿ßΓÑ- ¼δ αáº¼ÑΘáεΓß∩ ó Σá⌐½Ñ FORTH.MSG, ¡áτ¿¡á∩ ß φ¬αá¡á no. 4. èáªñ«Ñ ß««íΘÑ¡¿Ñ ºá¡¿¼áÑΓ α«ó¡« «ñ¡π ßΓα«¬π. éßÑ ß««íΘÑ¡¿∩ ¿¼ÑεΓ ß¬ó«º¡πε ¡π¼Ñαáµ¿ε (»Ñαóá∩ ßΓα«¬á 4-ú« φ¬αá¡á ß««ΓóÑΓßΓóπÑΓ ß««íΘÑ¡¿ε no. 0, »Ñαóá∩ ßΓα«¬á 5-ú« φ¬αá¡á - ß««íΘÑ¡¿ε no. 16 ¿ Γ.ñ.). ÉÑá½¿º«óá¡« ó ó¿ñÑ «¬«¡¡«⌐ »α«µÑñπαδ. EXCLUDE --- ÄΓ¬½ετÑ¡¿Ñ ΓÑ¬πΘÑú« ß½«óáα∩ ñ«»«½¡¿ΓÑ½∞¡«ú« »«¿ß¬á (ß¼. INCLUDE). EXECUTE addr --- éδ»«½¡∩ÑΓ ß½«ó« ß áñαÑß«¼ »«½∩ ¬«ñá addr. EXIT --- çáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ ΓÑ¬πΘÑú« ß½«óá ß »ÑαÑñáτÑ⌐ π»αáó- ½Ñ¡¿∩ ó Γ«τ¬π, ß½ÑñπεΘπε ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá óδº«ó«¼ ß½«óá, ó ¬«Γ«α«¼ óδ»«½¡∩ÑΓß∩ EXIT. ìÑ αáºαÑΦáÑΓß∩ ¿ß- »«½∞º«óá¡¿Ñ ß½«óá EXIT ó¡πΓα¿ µ¿¬½«ó Γ¿»á DO-LOOP. EXPECT addr n --- éó«ñ¿Γ ß ΓÑα¼¿¡á½á ßΓα«¬π ß¿¼ó«½«ó ñ½¿¡«⌐, ¡Ñ »αÑóδΦáε- ΘÑ⌐ n, »« áñαÑßπ addr. éóÑñÑ¡¡á∩ ßΓα«¬á ñ«»«½¡∩ÑΓß∩ ó ¬«¡µÑ ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼. è«½¿τÑßΓó« óóÑñÑ¡¡δσ ß½«ó«¼ EXPECT ß¿¼ó«½«ó »«¼ÑΘáÑΓß∩ ó »ÑαÑ¼Ñ¡¡πε SPAN. ÉÑá½¿º«óá¡« ó ó¿ñÑ »α«µÑñπαδ, αáí«ΓáεΘÑ⌐ ¡á á¬Γ¿ó¡«¼ «¬¡Ñ ¿ ñ«»πß¬áεΘÑ⌐ ó«º¼«ª¡«ßΓ∞ »«½¡«φ¬αá¡¡«ú« αÑñá¬Γ¿- α«óá¡¿∩ ΓÑ¬ßΓá. Åα¿ ¡áªáΓ¿¿ ¬½áó¿Φ¿ "RETURN" óó«ñ¿Γß∩ ßΓα«¬á á¬Γ¿ó¡«ú« «¬¡á, ó ¬«Γ«α«⌐ ¡áσ«ñ¿Γß∩ ¬παß«α. æ¿¼ó«½ "ó«ºóαáΓ ¬áαÑΓ¬¿", óδαáíáΓδóáÑ¼δ⌐ ¬½áó¿ΦÑ⌐ "RETURN" ó ß«ñÑαª¿¼«Ñ óó«ñ¿¼«⌐ ßΓα«¬¿ ¡Ñ óσ«ñ¿Γ. FALSE --- false è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ½«ú¿τÑß¬«¼π º¡áτÑ¡¿ε "½«ª∞" (false). ÅαÑñßΓáó½∩ÑΓß∩ 16-í¿Γ«óδ¼ ß½«ó«¼, ó ¬«Γ«α«¼ óßÑ αáºα∩ñδ ¡π½ÑóδÑ (µÑ½«Ñ º¡áτÑ¡¿Ñ 0). FCHR addr l c --- addr1 | 0 Å«¿ß¬ ß¿¼ó«½á ß ¬«ñ«¼ c ó ßΓα«¬Ñ ñ½¿¡«⌐ l, ¡áτ¿¡áεΘÑ⌐ß∩ ß áñαÑßá addr. àß½¿ ß¿¼ó«½ ¡á⌐ñÑ¡, ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá óδñáÑΓß∩ áñαÑß Ñú« »Ñαó«ú« óσ«ªñÑ¡¿∩ addr1, ó »α«Γ¿ó¡«¼ ß½πτáÑ óδñáÑΓß∩ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. FDOS function parameter --- AX-code BX-code ÄíαáΘÑ¡¿Ñ ¬ Σπ¡¬µ¿∩¼ «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ. ÉÑá½¿ºπÑΓß∩ τÑαÑº »α«úαá¼¼¡«Ñ »αÑαδóá¡¿Ñ 21H. ì«¼Ñα Σπ¡¬µ¿¿ function »ÑαÑñáÑΓß∩ τÑαÑº αÑú¿ßΓα AH, óσ«ñ¡«⌐ »áαá¼ÑΓα parameter - τÑαÑº αÑú¿ßΓα DX. é ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá óδñáεΓß∩ º¡áτÑ¡¿∩ αÑú¿ßΓα«ó AX (AX-code) ¿ BX (BX-code), ó«ºóαáΘáÑ¼δÑ «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼«⌐. FENCE --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ßΓáαΦ¿⌐ áñαÑß ºáΘ¿ΘÑ¡¡«⌐ «í½áßΓ¿ ß½«óáα¡«⌐ »á¼∩Γ¿. ïεí«Ñ ß½«óáα¡«Ñ «»αÑñÑ½Ñ¡¿∩ ß áñαÑß«¼ »«½∩ ¿¼Ñ¡¿, ¡Ñ »αÑó«ßσ«ñ∩Θ¿¼ º¡áτÑ¡¿∩ »ÑαÑ¼Ñ¡¡«⌐ FENCE, ¡Ñ ¼«ªÑΓ íδΓ∞ πñá½Ñ¡« ¿º ß½«óáα∩ »«ßαÑñßΓó«¼ «»Ñαáµ¿¿ FORGET íÑº »αÑñóáα¿ΓÑ½∞¡«ú« ¿º¼Ñ¡Ñ¡¿∩ »ÑαÑ¼Ñ¡¡«⌐ FENCE. Åα¿ ß«σαá¡Ñ¡¿¿ ΓÑ¬πΘÑú« φ¬ºÑ¼»½∩αá öÄÉÆ-ß¿ßΓÑ¼δ ó« ó¡ÑΦ¡Ñ⌐ »á¼∩Γ¿ (ß¼. SAVE) º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ FENCE áó- Γ«¼áΓ¿τÑß¬¿ πßΓá¡áó½¿óáÑΓß∩ αáó¡δ¼ ΓÑ¬πΘÑ¼π º¡áτÑ¡¿ε π¬áºáΓÑ½∩ ß½«óáα∩. FILENAME handle_pars --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: HCB_name FILENAME [path]filename çá¡«ß¿Γ ß»Ñµ¿Σ¿¬áµ¿ε Σá⌐½á [path]filename ¿º óσ«ñ¡«ú« »«Γ«¬á ó ñÑß¬α¿»Γ«α Σá⌐½á HCB_name. é αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿ Σ«α¼¿απÑΓ ßΓα«¬«óδ⌐ ½¿ΓÑαá½, ¬«»¿απÑ¼δ⌐ ó ñÑß¬α¿»Γ«α Σá⌐½á ó« óαÑ¼∩ óδ»«½¡Ñ¡¿∩. FILL addr n b --- Éáß»¿ßδóáÑΓ «í½áßΓ∞ »á¼∩Γ¿ ñ½¿¡«⌐ n íá⌐Γ«ó, ¡áτ¿¡áεΘπε- ß∩ ß áñαÑßá addr, íá⌐Γá¼¿ ß« º¡áτÑ¡¿Ñ¼ b. FIND addr1 --- addr2 n ÄΓδß¬¿óáÑΓ ó ß½«óáαÑ ó ß««ΓóÑΓßΓó¿¿ ß ΓÑ¬πΘ¿¼ »«α∩ñ¬«¼ »«¿ß¬á ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼, ºáñáóáÑ¼δ¼ ßΓα«¬«⌐ ß íá⌐Γ«¼ ñ½¿¡δ, αáß»«½«ªÑ¡¡«⌐ »« áñαÑßπ addr1. é ß½πτáÑ πß»ÑΦ¡«ú« »«¿ß¬á óδñáÑΓß∩ áñαÑß »«½∩ ¬«ñá addr2 ¡á⌐ñÑ¡- ¡«⌐ ß½«óáα¡«⌐ ßΓáΓ∞¿, á »α¿º¡á¬ n πßΓá¡áó½¿óáÑΓß∩ αáó- ¡δ¼ 1, Ñß½¿ ß½«ó« »«¼ÑτÑ¡« »α¿º¡á¬«¼ ¡Ñ¼Ññ½Ñ¡¡«ú« ¿ß- »«½¡Ñ¡¿∩ (IMMEDIATE) ¿ αáó¡δ¼ -1 ó »α«Γ¿ó¡«¼ ß½πτáÑ. àß½¿ ß½«ó« ß ºáñá¡¡δ¼ ¿¼Ñ¡Ñ¼ ó ß½«óáαÑ ¡Ñ ¡á⌐ñÑ¡«, º¡á- τÑ¡¿Ñ addr2 ß«ó»áñáÑΓ ß addr1, á »α¿º¡á¬ n πßΓá¡áó½¿- óáÑΓß∩ αáó¡δ¼ ¡π½ε. FLUSH --- çá»¿ßδóáÑΓ ¡á ñ¿ß¬ ßτ¿Γá¡¡δÑ í½«¬¿, «Γ¼ÑτÑ¡δÑ »α¿º¡á¬«¼ UPDATE, «ßó«í«ªñáÑΓ óßÑ íπΣÑαá öÄÉÆ-ß¿ßΓÑ¼δ. éδ»«½¡∩ÑΓß∩ »α¿ ß¼Ñ¡Ñ ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á, »α¿ ºáóÑαΦÑ¡¿¿ αáí«Γδ ß öÄÉÆ-ß¿ßΓÑ¼«⌐. FNCHR addr l c --- addr1 | 0 Å«¿ß¬ »Ñαó«ú« ß¿¼ó«½á ß ¬«ñ«¼, «Γ½¿τ¡δ¼ «Γ c, ó ßΓα«¬Ñ ñ½¿¡«⌐ l, ¡áτ¿¡áεΘÑ⌐ß∩ ß áñαÑßá addr. Åα¿ πñáτ¡«¼ »«¿ß¬Ñ ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá óδñáÑΓß∩ áñαÑß addr »Ñαó«ú« «Γ½¿τ¡«ú« «Γ c ß¿¼ó«½á, ó »α«Γ¿ó¡«¼ ß½πτáÑ óδñáÑΓß∩ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. FOREGROUND n --- ôßΓá¡áó½¿óáÑΓ º¡áτÑ¡¿Ñ n (0..15) ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« µóÑΓá ß¿¼ó«½«ó, óδó«ñ¿¼δσ ¡á φ¬αá¡ ñ¿ß»½Ñ∩. FORGET --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: FORGET name ôñá½∩ÑΓ ¿º ß½«óáα∩ «»αÑñÑ½Ñ¡¿Ñ ß ¿¼Ñ¡Ñ¼ name ¿ óßÑ «»- αÑñÑ½Ñ¡¿∩, ó¬½ετÑ¡¡δÑ ó ß½«óáα∞ »«ß½Ñ «»αÑñÑ½Ñ¡¿∩ name, ¡Ñºáó¿ß¿¼« «Γ ß½«óáαÑ⌐, ó ¬«Γ«αδÑ «¡¿ »«¼ÑΘÑ¡δ. àß½¿ ß½«ó« ß ¿¼Ñ¡Ñ¼ name »α¿ ΓÑ¬πΘÑ¼ »«α∩ñ¬Ñ »«¿ß¬á ó ß½«óá- αÑ ¡Ñ ¡áσ«ñ¿Γß∩, ó«º¡¿¬áÑΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ. FORTH --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ß½«óáα∩ ß½«óáα∞ ß ¿¼Ñ¡Ñ¼ FORTH. æ½«óáα∞ FORTH ∩ó½∩ÑΓß∩ ¿ßσ«ñ¡δ¼ ß½«óáαÑ¼ »«»«½¡Ñ¡¿∩ ¿ óßÑúñá ó¬½ετÑ¡ ó ΓÑ¬πΘ¿⌐ ¬«¡ΓÑ¬ßΓ, «»αÑñÑ- ½∩εΘ¿⌐ »«α∩ñ«¬ »«¿ß¬á ¿¼Ñ¡ ó ß½«óáαÑ. FORTH-83 --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« ß½«óáα∩ ¿ ß½«óáα∩ »«»«½¡Ñ¡¿∩ (CONTEXT ¿ CURRENT) ß½«óáα∞ ß ¿¼Ñ¡Ñ¼ FORTH. æ½«óáα∞ FORTH ∩ó½∩ÑΓß∩ ¿ßσ«ñ¡δ¼ ß½«óáαÑ¼ »«»«½¡Ñ¡¿∩ ¿ óßÑúñá ó¬½ετÑ¡ ó ΓÑ¬πΘ¿⌐ ¬«¡ΓÑ¬ßΓ, «»αÑñÑ½∩εΘ¿⌐ »«α∩ñ«¬ »«¿ß¬á ¿¼Ñ¡ ó ß½«óáαÑ. FSA --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß ¡áτá½∞¡«⌐ ßΓα«¬¿ αáí«τÑ⌐ Γáí½¿µδ ºá»α«úαá¼¼¿α«óá¡¡δσ ¬½áó¿Φ. GET-ATTRIB handle_pars --- attrib 0 (succesful) --- status (error) éδñáÑΓ áΓα¿íπΓδ Σá⌐½á (ß¿ßΓÑ¼¡δ⌐, Γ«½∞¬« τΓÑ¡¿Ñ ¿ Γ.».) GET-DIR drive --- status éδñáÑΓ ¿¼∩ ΓÑ¬πΘÑ⌐ ñ¿αÑ¬Γ«α¿¿ ñ½∩ ºáñá¡¡«ú« πßΓα«⌐ßΓóá drive. ê¼∩ ñ¿αÑ¬Γ«α¿¿ (»α¿ ¡π½Ñó«¼ ¬«ñÑ «Φ¿í¬¿ status) »«¼ÑΘáÑΓß∩ ó αáí«τπε «í½áßΓ∞ »á¼∩Γ¿ SCRRATCH-BUFF ó ó¿- ñÑ ASCII-ßΓα«¬¿, ñ«»«½¡Ñ¡¡«⌐ ß»αáóá ¡π½Ñóδ¼ ¬«ñ«¼. ôßΓ- α«⌐ßΓó« drive ºáñáÑΓß∩ µÑ½δ¼ τ¿ß½«¼ ó ñ¿á»áº«¡Ñ 0-63: 0 - ΓÑ¬πΘÑÑ πßΓα«⌐ßΓó«, 1 - A:, 2 - B: ¿ Γ.ñ. öπ¡¬µ¿ε GET-DIR ¡Ñ½∞º∩ óδºδóáΓ∞ ó »α«¼ÑªπΓ¬Ñ ¼Ñªñπ óδ»«½¡Ñ¡¿Ñ¼ ß½«ó SEARCH-FIRST ¿ SEARCH-NEXT. GOTOXY n1 n2 --- ôßΓá¡áó½¿óáÑΓ ¬παß«α ó »«º¿µ¿ε ß ¬««αñ¿¡áΓá¼¿ (n1,n2) «Γ¡«ß¿ΓÑ½∞¡« ½Ñó«ú« óÑασ¡Ñú« πú½á á¬Γ¿ó¡«ú« «¬¡á. ç¡á- τÑ¡¿Ñ n1 ñ«½ª¡« ½ÑªáΓ∞ ó ñ¿á»áº«¡Ñ 0..W.WIDTH-1, º¡á- τÑ¡¿Ñ n2 - ó ñ¿á»áº«¡Ñ 0..W.HEIGHT-1. àß½¿ ¬á¬á∩-½¿í« ¿º ¬««αñ¿¡áΓ n1 ¿½¿ n2 óδσ«ñ¿Γ ºá »αÑñÑ½δ «¬¡á, Γ« »« ñá¡¡«⌐ ¬««αñ¿¡áΓÑ ¬παß«α πßΓá¡áó½¿óáÑΓß∩ ó í½¿ªá⌐Φπε úαá¡¿τ¡πε »«º¿µ¿ε, ½ÑªáΘπε ó¡πΓα¿ «¬¡á. Green --- 2 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ºÑ½Ñ¡«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Grey --- 8 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ßÑα«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. H-CONTRACT --- ô¼Ñ¡∞ΦáÑΓ αáº¼Ñα á¬Γ¿ó¡«ú« «¬¡á »« ú«α¿º«¡Γá½¿ ¡á «ñ¡π »«º¿µ¿ε. Åαáóδ⌐ ßΓ«½íÑµ «¬¡á πñá½∩ÑΓß∩, »αáóá∩ úαá¡¿µá ßñó¿úáÑΓß∩ ¡á «ñ¿¡ ßΓ«½íÑµ ó½Ñó«. àß½¿ ΓÑ¬πΘá∩ Φ¿α¿¡á «¬¡á αáó¡á «ñ¡«⌐ »«º¿µ¿¿, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«- ñ¿Γß∩. H-EXPAND --- ôóÑ½¿τ¿óáÑΓ αáº¼Ñα á¬Γ¿ó¡«ú« «¬¡á »« ú«α¿º«¡Γá½¿ ¡á «ñ- ¡π »«º¿µ¿ε. é »αáó«⌐ τáßΓ¿ «¬¡á ñ«íáó½∩ÑΓß∩ ßΓ«½íÑµ, ºá»«½¡Ñ¡¡δ⌐ »α«íÑ½á¼¿ ß ΓÑ¬πΘ¿¼¿ µóÑΓ«óδ¼¿ áΓα¿íπΓá¼¿, »αáóá∩ úαá¡¿µá «¬¡á ßñó¿úáÑΓß∩ ¡á «ñ¡π »«º¿µ¿ε ó»αáó«. àß½¿ »αáóá∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß ¬αá⌐¡Ñ⌐ »αáó«⌐ »«- º¿µ¿Ñ⌐ φ¬αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. HALT --- çáóÑαΦÑ¡¿Ñ αáí«Γδ ö«αΓ-ß¿ßΓÑ¼δ, ºá¬αδΓ¿Ñ φ¬αá¡¡«ú« Σá⌐½á ¿ óδσ«ñ ó «»Ñαáµ¿«¡¡πε ß¿ßΓÑ¼π. HANDLE --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: HANDLE HCB_name æ«ºñáÑΓ ñÑß¬α¿»Γ«α Σá⌐½á (HCB), ß«ñÑαªáΘ¿⌐ ß»Ñµ¿Σ¿¬áµ¿ε Σá⌐½á, π»αáó½∩εΘπε ¿¡Σ«α¼áµ¿ε, óδñáóáÑ¼πε Σá⌐½«ó«⌐ ß¿ß- ΓÑ¼«⌐ Äæ ¿ ß»Ñµ¿á½∞¡δÑ »α¿º¡á¬¿, ¿ß»«½∞ºπÑ¼δÑ öÄÉÆ-ß¿ß- ΓÑ¼«⌐ »α¿ óδ»«½¡Ñ¡¿¿ «»Ñαáµ¿⌐ ¡áñ Σá⌐½á¼¿. Åα¿ ñá½∞¡Ñ⌐- ΦÑ¼ óδ»«½¡Ñ¡¿¿ ß½«óá HCB_name ¡á ßΓÑ¬ »«¼ÑΘáεΓß∩ »áαá- ¼ÑΓαδ ñÑß¬α¿»Γ«αá "handle_pars" - áñαÑß HCB ¿ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π»αáó½∩εΘÑ⌐ ¿¡Σ«α¼áµ¿¿. HELLO --- çá»πß¬áÑΓ φ¬ºÑ¼»½∩α ö«αΓ-¿¡ΓÑα»αÑΓáΓ«αá ó á¬Γ¿ó¡«¼ «¬¡Ñ. HELP --- éδñáτá ß»αáó«τ¡«⌐ ¿¡Σ«α¼áµ¿¿ »« ß¿ßΓÑ¼Ñ ÇßΓα«öÄÉÆ. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ HELP [name] úñÑ name - ¿¼∩ ß½«óá. àß½¿ name ¡Ñ ºáñá¡«, óδó«ñ¿Γß∩ ¿¡Σ«α¼áµ¿∩ « αáí«ΓÑ ß ¬½áó¿áΓπα«⌐ (¬á¬ »α¿ ¡áªáΓ¿¿ ¬½áó¿Φ¿ F1), ó »α«Γ¿ó¡«¼ ß½πτáÑ óδñáÑΓß∩ «»¿ßá¡¿Ñ ºáñá¡¡«ú« ß½«óá. HERE --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ß½«óáα∩. HEX --- ôßΓá¡áó½¿óáÑΓ ΦÑßΓ¡áñµáΓ¿α¿τ¡πε ß¿ßΓÑ¼π ßτ¿ß½Ñ¡¿∩ (º¡á- τÑ¡¿Ñ BASE, αáó¡«Ñ 16). HIDDEN --- æ½«óáα∞ ß¬αδΓδσ «»αÑñÑ½Ñ¡¿⌐ ß¿ßΓÑ¼δ ÇßΓα«öÄÉÆ. HLD --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß »«ß½Ññ¡Ñ- ú« ß¿¼ó«½á, »«¼ÑΘÑ¡¡«ú« ó óδσ«ñ¡πε ßΓα«¬π, Σ«α¼¿απÑ¼πε »α«µÑñπαá¼¿ »αÑ«íαáº«óá¡¿∩ τ¿ßÑ½ ó ΓÑ¬ßΓ«óδ⌐ ó¿ñ (æ¼. <# # #S SIGN HOLD ¿ #> ). HOLD c --- Åα¿»¿ßδóáÑΓ ¬ óδσ«ñ¡«⌐ ßΓα«¬Ñ, ¿ß»«½∞ºπÑ¼«⌐ »α«µÑñπαá¼¿ »αÑ«íαáº«óá¡¿∩ τ¿ßÑ½ ó ΓÑ¬ßΓ«óδ⌐ ó¿ñ, ß¿¼ó«½ ß ASCII- ¬«ñ«¼ c. (æ¼. Γá¬ªÑ <# # #S SIGN HOLD ¿ #> ). HOME --- ôßΓá¡áó½¿óáÑΓ ¬παß«α ó ½Ñóπε óÑασ¡εε »«º¿µ¿ε á¬Γ¿ó¡«ú« «¬¡á. I --- n êß»«½∞ºπÑΓß∩ ó¡πΓα¿ µ¿¬½«ó Γ¿»á DO-LOOP. Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ¿¡ñÑ¬ßá ñ½∩ ßá¼«ú« ó¡πΓαÑ¡¡Ñú« µ¿¬½á. æ¼. Γá¬ªÑ J. IF f --- (run) | --- sys (compile) êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó «ñ¡«¼ ¿º ß½ÑñπεΘ¿σ ó¿ñ«ó: IF (tp) ... ELSE (fp) ... THEN IF (tp) ... THEN Åα¿ óδ»«½¡Ñ¡¿¿ »α«óÑα∩ÑΓ º¡áτÑ¡¿Ñ Σ½áúá f ¡á óÑαΦ¿¡Ñ ßΓÑ¬á. Åα¿ f «Γ½¿τ¡«¼ «Γ ¡π½∩ (TRUE) óδ»«½¡∩ÑΓß∩ óÑΓó∞ tp (true-part), »α¿ f αáó¡«¼ FALSE - óÑΓó∞ fp (false- part). Å« ºáóÑαΦÑ¡¿¿ óδ»«½¡Ñ¡¿∩ Γ«⌐ ¿½¿ ¿¡«⌐ óÑΓó¿ π»- αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ó Γ«τ¬π, ß½ÑñπεΘπε ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ THEN. éÑΓó∞ ELSE ¼«ªÑΓ íδΓ∞ «»πΘÑ¡á, ¿ ó φΓ«¼ ß½πτáÑ »α¿ f αáó¡«¼ FALSE π»αáó½Ñ¡¿Ñ ßαáºπ »ÑαÑñáÑΓß∩ ó Γ«τ¬π, ß½ÑñπεΘπε ºá THEN. IFL --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ αáºαÑΦÑ¡¿∩ »αÑαδóá¡¿⌐ «Γ ¬½áó¿áΓπαδ »« ¡áªáΓ¿ε ¬½áó¿Φ Ctrl/Break: TRUE - »αÑαδóá¡¿∩ αáºαÑΦÑ¡δ, FALSE - »αÑαδóá¡¿∩ ¿ú¡«α¿απεΓß∩. IMMEDIATE --- ôßΓá¡áó½¿óáÑΓ »α¿º¡á¬ ¡Ñ¼Ññ½Ñ¡¡«ú« ¿ß»«½¡Ñ¡¿∩ ñ½∩ »«- ß½Ññ¡Ñú« «»αÑñÑ½Ñ¡¡«ú« ó ß½«óáαÑ ß½«óá. INCLUDE --- ôßΓá¡«ó¬á ß½«óáα∩ ñ«»«½¡¿ΓÑ½∞¡«ú« »«¿ß¬á. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: INCLUDE name , úñÑ name - ¿¼∩ ß½«óáα∩. é ñá½∞¡Ñ⌐ΦÑ¼ »α¿ ¡Ñπñáτ¡«¼ »«¿ß¬Ñ ¡Ñ¬«Γ«α«ú« ß½«óá ó ΓÑ¬πΘÑ¼ ¬«¡ΓÑ¬ßΓÑ «¡« íπñÑΓ ¿ß¬áΓ∞ß∩ ñ«»«½¡¿ΓÑ½∞¡« ó ß½«óáαÑ name. INDEX [n1 n2] --- é «¬¡Ñ óδó«ñ¿Γß∩ ¿¡ñÑ¬ß π¬áºá¡¡«ú« ñ¿á»áº«¡á φ¬αá¡«ó ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á. àß½¿ ñ¿á»áº«¡ φ¬αá¡«ó ¡Ñ π¬áºá¡, óδó«ñ¿Γß∩ ¿¡ñÑ¬ß óßÑú« φ¬αá¡¡«ú« Σá⌐½á. INPUT-DIRNAME directory_par --- éó«ñ¿Γ ß»Ñµ¿Σ¿¬áµ¿ε ñ¿αÑ¬Γ«α¿¿ ß ΓÑα¼¿¡á½á ó í½«¬ π»- αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐, ºáñáóáÑ¼δ⌐ »áαá¼ÑΓα«¼ directo- ry_par. îá¬ß¿¼á½∞¡á∩ ñ«»πßΓ¿¼á∩ ñ½¿¡á ¿¼Ñ¡¿ ñ¿αÑ¬Γ«α¿¿ ß«ßΓáó½∩ÑΓ 63 ß¿¼ó«½á. INPUT-FILENAME handle_pars --- éó«ñ¿Γ ß»Ñµ¿Σ¿¬áµ¿ε Σá⌐½á ß ΓÑα¼¿¡á½á ó ñÑß¬α¿»Γ«α Σá⌐- ½á, ºáñáóáÑ¼δ⌐ »áαá¼ÑΓα«¼ handle_pars. îá¬ß¿¼á½∞¡á∩ ñ«- »πßΓ¿¼á∩ ñ½¿¡á ¿¼Ñ¡¿ Σá⌐½á ß«ßΓáó½∩ÑΓ 63 ß¿¼ó«½á. INTERPRET --- éδ»«½¡∩ÑΓ ¿¡ΓÑα»αÑΓáµ¿ε ΓÑ¬ßΓá, óó«ñ¿¼«ú« ß ΓÑα¼¿¡á½á ¿º φ¬αá¡¡«ú« Σá⌐½á, »«ß½Ññ«óáΓÑ½∞¡« óδ»«½¡∩∩ ¿½¿ ¬«¼»¿- ½¿απ∩ (ó ºáó¿ß¿¼«ßΓ¿ «Γ αÑª¿¼á STATE) ß½«óá ¿º óσ«ñ¡«ú« »«Γ«¬á. é ß½πτáÑ, Ñß½¿ «τÑαÑñ¡«Ñ ß½«ó« ¡Ñ ¡á⌐ñÑ¡« ó ß½«óáαÑ, »α«¿ºó«ñ¿Γß∩ Ñú« »αÑ«íαáº«óá¡¿Ñ ¬ τ¿ß½«ó«¼π ½¿ΓÑαá½π ó ß««ΓóÑΓßΓó¿¿ ß ΓÑ¬πΘ¿¼ «ß¡«óá¡¿Ñ¼ ßτ¿ß½Ñ¡¿∩ BASE. Åα¿ ¡Ñπß»ÑΦ¡«¼ »αÑ«íαáº«óá¡¿¿ τ¿ß½á ó«º¡¿¬áÑΓ «Φ¿í«τ¡á∩ ß¿Γπáµ¿∩ ¿ ¿¡ΓÑα»αÑΓáµ¿∩ óσ«ñ¡«ú« »«Γ«¬á »αÑ- αδóáÑΓß∩. J --- n êß»«½∞ºπÑΓß∩ ó¡πΓα¿ µ¿¬½«ó Γ¿»á DO-LOOP. Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ ¿¡ñÑ¬ßá ñ½∩ µ¿¬½á, «íΩÑ¼½εΘÑú« µ¿¬½, ó ¬«Γ«α«¼ ¿ß»«½∞º«óá¡« ß½«ó« J. æ¼. Γá¬ªÑ I. KEY --- b Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ASCII-¬«ñ «τÑαÑñ¡«ú« óóÑñÑ¡¡«ú« ß ¬½á- ó¿áΓπαδ ß¿¼ó«½á. àß½¿ ó ¼«¼Ñ¡Γ óδ»«½¡Ñ¡¿∩ ß½«óá KEY íπ- ΣÑα ¬½áó¿áΓπαδ »πßΓ, »α«¿ßσ«ñ¿Γ »ÑαÑσ«ñ ó ß«ßΓ«∩¡¿Ñ «ª¿ñá¡¿∩ óó«ñá ß¿¼ó«½á. æ½«ó« KEY ¼«ªÑΓ íδΓ∞ ¿ß»«½∞º«- óá¡« Γ«½∞¬« ñ½∩ αÑá¬µ¿¿ ¡á ¡áªáΓ¿Ñ ¬½áó¿Φ, óδαáíáΓδóáε- Θ¿σ ASCII-¬«ñδ. Åα¿ ¡áªáΓ¿¿ ¬½áó¿Φ, óδαáíáΓδóáεΘ¿σ π»- αáó½∩εΘ¿Ñ ¬«ñδ ß½«ó« KEY «ßΓáÑΓß∩ ó ß«ßΓ«∩¡¿¿ «ª¿ñá¡¿∩. ä½∩ óó«ñá π»αáó½∩εΘ¿σ ¬«ñ«ó ¡Ñ«íσ«ñ¿¼« ¿ß»«½∞º«óáΓ∞ ß½«ó« PCKEY. KEYBRD --- b Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ íá⌐Γ b ß«ßΓ«∩¡¿∩ ¬½áó¿áΓπαδ. ç¡áτÑ¡¿Ñ "1" ó ß««ΓóÑΓßΓóπεΘÑ¼ í¿ΓÑ íá⌐Γá ß«ßΓ«∩¡¿∩ ¿¼ÑÑΓ ß½ÑñπεΘ¿⌐ ß¼δß½: 0: ¡áªáΓá »αáóá∩ ¬½áó¿Φá Shift; 1: ¡áªáΓá »αáóá∩ ¬½áó¿Φá Shift; 2: ¡áªáΓá ¬½áó¿Φá Ctrl; 3: ¡áªáΓá ¬½áó¿Φá Alt; 4: πßΓá¡«ó½Ñ¡ αÑª¿¼ Scroll Lock; 5: πßΓá¡«ó½Ñ¡ αÑª¿¼ Num Lock; 6: πßΓá¡«ó½Ñ¡ αÑª¿¼ Shift/Caps Lock; 7: πßΓá¡«ó½Ñ¡ αÑª¿¼ Insert. KILL --- ô¡¿τΓ«ªÑ¡¿Ñ »α«µÑßßá. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ KILL name úñÑ name - ¿¼∩ »α«µÑßßá. ¥Γ« ß½«ó« ¼«ªÑΓ óδ»«½¡∩Γ∞ß∩ Γ«½∞¬« ¿º »α«µÑßßá MAIN. KILL-DIR directory_par --- status ôñá½∩ÑΓ ñ¿αÑ¬Γ«α¿ε. ä¿αÑ¬Γ«α¿∩ íπñÑΓ π¡¿τΓ«ªÑ¡á Γ«½∞¬« ó Γ«¼ ß½πτáÑ, ¬«úñá ó ¡Ñ⌐ ¡ÑΓ Σá⌐½«ó. é »α«Γ¿ó¡«¼ ß½πτáÑ ñ¿αÑ¬Γ«α¿∩ ¡Ñ íπñÑΓ π¡¿τΓ«ªÑ¡á. ìá ßΓÑ¬Ñ ó«ºóαáΘáÑΓß∩ ¬«ñ ºáóÑαΦÑ¡¿∩ ñá¡¡«⌐ «»Ñαáµ¿¿. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS KILL-FILE handle_pars --- status ôñá½∩ÑΓ Σá⌐½ ß ñÑß¬α¿»Γ«α«¼ handle_pars. àß½¿ Σá⌐½ «Γ¬αδΓ, «¡ »αÑñóáα¿ΓÑ½∞¡« ºá¬α«ÑΓß∩. àß½¿ Σá⌐½ ¿¼ÑÑΓ áΓα¿íπΓ "read-only", Σá⌐½ πñá½Ñ¡ ¡Ñ íπñÑΓ. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS L>NAME lfa --- nfa Å« áñαÑßπ »«½∩ ßó∩º¿ ß½«óáα¡«⌐ ßΓáΓ∞¿ lfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ¿¼Ñ¡¿ nfa. LAST --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ º¡áτÑ¡¿Ñ »«ß½Ññ¡Ñú« óóÑñÑ¡¡«ú« ß ¬½áó¿áΓπαδ ß¿¼ó«½á. LATEST --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß »«½∩ ¿¼Ñ¡¿ »«ß½Ññ¡Ñú« ß½«óá, «»αÑñÑ½Ñ¡¡«ú« ó ΓÑ¬πΘÑ¼ ß½«óáαÑ »«»«½¡Ñ¡¿∩. LEAVE --- çáóÑαΦáÑΓ óδ»«½¡Ñ¡¿Ñ ΓÑ¬πΘÑú« µ¿¬½á Γ¿»á DO-LOOP. ô»- αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ó Γ«τ¬π, ß½ÑñπεΘπε ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ ñá¡¡«¼π µ¿¬½π «úαá¡¿τ¿óáεΘÑ¼π ß½«óπ LOOP ¿½¿ +LOOP. êß»«½∞ºπÑΓß∩ ó¡πΓα¿ µ¿¬½á ó ó¿ñÑ: DO ... LEAVE ... LOOP ¿½¿ DO ... LEAVE ... +LOOP î«ªÑΓ Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ß∩ ¿ ó µ¿¬½áσ ?DO-LOOP. æ½«ó« LEAVE ¼«ªÑΓ »«¼ÑΘáΓ∞ß∩ ó¡πΓα¿ ñαπú¿σ π»αáó½∩εΘ¿σ ¬«¡- ßΓαπ¬µ¿⌐, ¿ß»«½∞ºπÑ¼δσ ó¡πΓα¿ µ¿¬½á. é¡πΓα¿ «ñ¡«ú« µ¿¬- ½á ó«º¼«ª¡« ¼¡«ú«¬αáΓ¡«Ñ ¿ß»«½∞º«óá¡¿Ñ LEAVE. LEFT --- ÅÑαÑ¼ÑΘáÑΓ ¬παß«α ó ΓÑ¬πΘÑ¼ «¬¡Ñ ¡á «ñ¡π »«º¿µ¿ε ó½Ñó«. Åα¿ ¡áσ«ªñÑ¡¿¿ ¬παß«αá ó ¬αá⌐¡Ñ⌐ ½Ñó«⌐ »«º¿µ¿¿ »α«¿º- ó«ñ¿Γß∩ Ñú« »ÑαÑó«ñ ó ¬αá⌐¡εε »αáóπε »«º¿µ¿ε ¿ »ÑαÑ¼Ñ- ΘÑ¡¿Ñ ¡á «ñ¡π ßΓα«¬π óóÑασ, »α¿ φΓ«¼ ó αÑª¿¼Ñ SCROLL ó«º¼«ª¡á »α«Γ∩ª¬á á¬Γ¿ó¡«ú« «¬¡á (ß¼. UP). LINK> lfa --- cfa Å« áñαÑßπ »«½∩ ßó∩º¿ ß½«óáα¡«⌐ ßΓáΓ∞¿ lfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ¬«ñá cfa. LIST n --- éδó«ñ φ¬αá¡á n ¿º ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á. LITERAL n --- (compile) è«¼»¿½¿απÑΓ »α«µÑñπαπ LIT ñ½∩ »«¼ÑΘÑ¡¿∩ ¡á ßΓÑ¬ 16- αáºα∩ñ¡«ú« τ¿ß½á n, ¿½¿ BLIT ñ½∩ τ¿ßÑ½ ó ñ¿á»áº«¡Ñ 0-0FFh),αáº¼ÑΘá∩ º¡áτÑ¡¿Ñ n ¡Ñ»«ßαÑñßΓóÑ¡¡« óß½Ññ ºá óδº«ó«¼ ß½«óá LIT ¿½¿ BLIT. LOAD n --- ê¡ΓÑα»αÑΓ¿απÑΓ óσ«ñ¡«⌐ ΓÑ¬ßΓ, ¡áτ¿¡áεΘ¿⌐ß∩ ß n-ú« φ¬αá- ¡á ΓÑ¬πΘÑú« Σá⌐½á. çá»«¼¿¡áεΓß∩ º¡áτÑ¡¿∩ »ÑαÑ¼Ñ¡¡δσ >IN ¿ BLK, «»αÑñÑ½∩εΘ¿σ ΓÑ¬πΘ¿⌐ óσ«ñ¡«⌐ »«Γ«¬, óσ«ñ¡«⌐ »«Γ«¬ »ÑαÑ¬½ετáÑΓß∩ ¡á ¡áτá½« n-ú« φ¬αá¡á πßΓá¡«ó¬«⌐ ¡π½Ñó«ú« º¡áτÑ¡¿∩ >IN ¿ BLK αáó¡«ú« n. ê¡ΓÑα»αÑΓáµ¿∩ (ºáúαπº¬á) ΓÑ¬ßΓá ºáóÑαΦáÑΓß∩ »« ¿ßτÑα»á¡¿¿ ΓÑ¬ßΓá ½¿í« »α¿ ó«º¡¿¬¡«óÑ¡¿¿ «Φ¿í«τ¡δσ ß¿Γπáµ¿⌐. ÄΦ¿í«τ¡á∩ ß¿Γπá- µ¿∩ ó«º¡¿¬áÑΓ Γá¬ªÑ »α¿ »«»δΓ¬Ñ ºáúαπº¬¿ φ¬αá¡á ß ¡«¼Ñ- α«¼ n ¼Ñ¡∞ΦÑ¼ ½¿í« αáó¡δ¼ ¡π½ε. æ¼. Γá¬ªÑ >IN, BLK, -->, BLOCK. LOAD-USING n --- çáúαπº¬á φ¬αá¡¡«ú« Σá⌐½á. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ n LOAD-USING [drive]filename[.filetype] ÆÑ¬πΘ¿⌐ φ¬αá¡¡δ⌐ Σá⌐½ ºá¬αδóáÑΓß∩, á π¬áºá¡¡δ⌐ Σá⌐½ ßΓá¡«ó¿Γß∩ ΓÑ¬πΘ¿¼ φ¬αá¡¡δ¼. àß½¿ Γ¿» Σá⌐½á ¡Ñ π¬áºá¡, ¿ΘÑΓß∩ Σá⌐½ Γ¿»á .SCR. Å«ß½Ñ ºáóÑαΦÑ¡¿∩ ºáúαπº¬¿ (ß¼. LOAD) ó«ßßΓá¡áó½¿óáÑΓß∩ ΓÑ¬πΘ¿⌐ φ¬αá¡¡δ⌐ Σá⌐½. LOOP n --- ( run ) | sys --- ( compile ) êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡«¼ «»αÑñÑ½Ñ¡¿¿ ó ó¿ñÑ: DO ... LOOP Åáαá¼ÑΓα µ¿¬½á index πóÑ½¿τ¿óáÑΓß∩ ¡á 1. àß½¿ ¡«ó«Ñ º¡áτÑ¡¿Ñ ¿¡ñÑ¬ßá αáó¡« º¡áτÑ¡¿ε »áαá¼ÑΓαá µ¿¬½á limit, µ¿¬½ ºáóÑαΦáÑΓß∩, ¿ »áαá¼ÑΓαδ π»αáó½Ñ¡¿∩ µ¿¬½«¼ ßíαáßδ- óáεΓß∩ ß« ßΓÑ¬á ó«ºóαáΓ«ó. é »α«Γ¿ó¡«¼ ß½πτáÑ »ÑαÑñáÑΓ- ß∩ π»αáó½Ñ¡¿Ñ ¡á óδ»«½¡Ñ¡¿Ñ ¬«ñá, αáß»«½«ªÑ¡¡«ú« ¡Ñ»«- ßαÑñßΓóÑ¡¡« ºá ß««ΓóÑΓßΓóπεΘ¿¼ ºáú«½«ó¬«¼ µ¿¬½á DO ¿½¿ ?DO. æ¼. Γá¬ªÑ DO, ?DO, LOOP, LEAVE. LSEARCH s1 addr1 l1 s2 addr2 l2 --- addr | 0 îÑªßÑú¼Ñ¡Γ¡δ⌐ »«¿ß¬ óσ«ªñÑ¡¿∩ ßΓα«¬¿ »« áñαÑßπ s1:addr1 ñ½¿¡«⌐ l1 ó ßΓα«¬Ñ »« áñαÑßπ s2:addr2 ¿ ñ½¿¡«⌐ l2. Åα¿ πß»ÑΦ¡«¼ »«¿ß¬Ñ ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá óδñáÑΓß∩ áñαÑß »Ñαó«ú« ¡á⌐ñÑ¡¡«ú« óσ«ªñÑ¡¿∩ addr, »α¿ ¡Ñπß»ÑΦ¡«¼ - ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. Light-Blue --- 9 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-ß¿¡Ñ¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Light-Cyan --- 11 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-ú«½πí«¼π µóÑΓπ »α¿ óδ- ó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Light-Green --- 10 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-ºÑ½Ñ¡«¼π µóÑΓπ »α¿ óδ- ó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Light-Magenta --- 13 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-ß¿αÑ¡Ñó«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Light-Red --- 12 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-¬αáß¡«¼π µóÑΓπ »α¿ óδ- ó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. Light-White --- 15 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ∩α¬«-íÑ½«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. MAIN --- Äß¡«ó¡«⌐ »α«µÑßß óºá¿¼«ñÑ⌐ßΓó¿∩ ß »«½∞º«óáΓÑ½Ñ¼. MAKE-DIR directory_par --- status æ«ºñáÑΓ ¡«óπε ñ¿αÑ¬Γ«α¿ε. ê¼∩ ñ¿αÑ¬Γ«α¿¿ ¿ ÑÑ »«½¡á∩ ß»Ñµ¿Σ¿¬áµ¿∩ íÑαπΓß∩ ¿º DCB (í½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐). ìá ßΓÑ¬Ñ ó«ºóαáΘáÑΓß∩ ¬«ñ ºáóÑαΦÑ¡¿∩ ñá¡¡«⌐ «»Ñαáµ¿¿. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS MAKE-FILE handle_pars --- status æ«ºñáÑΓ Σá⌐½ ¿ «Γ¬αδóáÑΓ Ñú« ¡á ºá»¿ß∞. àß½¿ Σá⌐½ πªÑ ßπΦÑßΓóπÑΓ, Γ« Ñú« ñ½¿¡á ßΓá¡«ó¿Γß∩ αáó¡«⌐ 0. ê¼∩ Σá⌐½á ¿ Ñú« »«½¡á∩ ß»Ñµ¿Σ¿¬áµ¿∩ íÑαπΓß∩ ¿º ñÑß¬α¿»Γ«αá Σá⌐½á. æ«ºñá¡¡«¼π Σá⌐½π »α¿»¿ßδóáÑΓß∩ áΓΓα¿íπΓ "normal", ¬«Γ«αδ⌐ ¼«ªÑΓ íδΓ∞ ¿º¼Ñ¡Ñ¡ ß »«¼«Θ∞ε ß½«óá SET-ATTRIB. ìá ßΓÑ¬Ñ ó«ºóαáΘáÑΓß∩ ¬«ñ ºáóÑαΦÑ¡¿∩ ñá¡¡«⌐ «»Ñαáµ¿¿. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS MAX n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¼á¬ß¿¼á½∞¡«Ñ ¿º º¡áτÑ¡¿⌐ n1 ¿ n2. MESSAGE n --- Åα¿ »«½«ª¿ΓÑ½∞¡δσ º¡áτÑ¡¿∩σ »ÑαÑ¼Ñ¡¡«⌐ WARNING óδó«ñ¿Γ ΓÑ¬ßΓ ß««íΘÑ¡¿∩ ß ¡«¼Ñα«¼ n ¿º Σá⌐½á FORTH.MSG (ß¼. ERROR), »α¿ ¡π½Ñó«¼ º¡áτÑ¡¿¿ WARNING óδó«ñ¿Γ ß««íΘÑ¡¿Ñ ó¿ñá "Message: n", »α¿ «Γα¿µáΓÑ½∞¡δσ º¡áτÑ¡¿∩σ ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. MIN n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ¼¿¡¿¼á½∞¡«Ñ ¿º º¡áτÑ¡¿⌐ n1 ¿ n2. MOD n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ «ßΓáΓ«¬ «Γ ñÑ½Ñ¡¿∩ n1/n2. ÄßΓáΓ«¬ n3 ¿¼ÑÑΓ Γ«Γ ªÑ º¡á¬, τΓ« ¿ ñÑ½¿ΓÑ½∞ n2, ½¿í« αáóÑ¡ ¡π½ε. MODBLK --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ (TRUE ¿½¿ FALSE) ¼«ñ¿Σ¿¬áµ¿¿ »«ß½Ññ¡Ñú« ßτ¿Γá¡¡«ú« íπΣÑαá (¿ß»«½∞ºπÑΓß∩ »α«µÑñπαá¼¿ ñ«ßΓπ»á ¬ φ¬αá¡¡δ¼ Σá⌐½á¼). MODSCR --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ ¼«ñ¿Σ¿¬áµ¿¿ ΓÑ¬πΘÑú« φ¬αá¡á (¿ß»«½∞ºπÑΓß∩ αÑñá¬Γ«α«¼ φ¬αá¡¡«ú« Σá⌐½á). MOVE addr1 addr2 n --- ÅÑαÑßδ½áÑΓ n 16-í¿Γ«óδσ ß½«ó αáß»«½«ªÑ¡¡δσ ¡áτ¿¡á∩ ß áñαÑßá addr1 »« áñαÑßπ addr2. ÅÑαÑßδ½¬á »α«¿ºó«ñ¿Γß∩ ó ¡á»αáó½Ñ¡¿¿ ó«ºαáßΓá¡¿∩ áñαÑß«ó. Åα¿ n αáó¡«¼ ¡π½ε ¡¿- ¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ óδ»«½¡∩ÑΓß∩. MOVE-DOWN --- ÅÑαÑ¼ÑΘáÑΓ á¬Γ¿ó¡«Ñ «¬¡« ¡á φ¬αá¡Ñ ¡á «ñ¡π ßΓα«¬π ó¡¿º. àß½¿ ¡¿ª¡∩∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß ¡¿ª¡Ñ⌐ ßΓα«¬«⌐ φ¬- αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. MOVE-LEFT --- ÅÑαÑ¼ÑΘáÑΓ á¬Γ¿ó¡«Ñ «¬¡« ¡á φ¬αá¡Ñ ¡á «ñ¡π »«º¿µ¿ε ó½Ñó«. àß½¿ ½Ñóá∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß ¬αá⌐¡Ñ⌐ ½Ñ- ó«⌐ »«º¿µ¿Ñ⌐ φ¬αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. MOVE-RIGHT --- ÅÑαÑ¼ÑΘáÑΓ á¬Γ¿ó¡«Ñ «¬¡« ¡á φ¬αá¡Ñ ¡á «ñ¡π »«º¿µ¿ε ó»αáó«. àß½¿ »αáóá∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß ¬αá⌐¡Ñ⌐ »αáó«⌐ »«º¿µ¿Ñ⌐ φ¬αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γ- ß∩. MOVE-UP --- ÅÑαÑ¼ÑΘáÑΓ á¬Γ¿ó¡«Ñ «¬¡« ¡á φ¬αá¡Ñ ¡á «ñ¡π ßΓα«¬π óóÑασ. àß½¿ óÑασ¡∩∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß óÑασ¡Ñ⌐ ßΓα«¬«⌐ φ¬αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. MOVEL segm1 disp1 segm2 disp2 n --- îÑªßÑú¼Ñ¡Γ¡á∩ »ÑαÑßδ½¬á «í½áßΓ¿ »á¼∩Γ¿ ñ½¿¡«⌐ n ß½«ó (2n íá⌐Γ«ó) ß áñαÑßá segm1:disp1 »« áñαÑßπ segm2:disp2. ÅÑαÑßδ½¬á «ßπΘÑßΓó½∩ÑΓß∩ ó ¡á»αáó½Ñ¡¿¿ ó«ºαáßΓá¡¿∩ áñαÑß«ó. MOVEL> segm1 disp1 segm2 disp2 n --- îÑªßÑú¼Ñ¡Γ¡á∩ »ÑαÑßδ½¬á «í½áßΓ¿ »á¼∩Γ¿ ñ½¿¡«⌐ n ß½«ó (2n íá⌐Γ«ó) ß áñαÑßá segm1:disp1 »« áñαÑßπ segm2:disp2. ÅÑαÑßδ½¬á «ßπΘÑßΓó½∩ÑΓß∩ ó ¡á»αáó½Ñ¡¿¿ πíδóá¡¿∩ áñαÑß«ó. MS n --- Åáπºá ó ΓÑτÑ¡¿Ñ »α¿¼Ñα¡« n ¼¿½½¿ßÑ¬π¡ñ. (Åαáó¿½∞¡«Ñ óδ»«½¡Ñ¡¿Ñ «íÑß»Ñτ¿óáÑΓß∩ Γ«½∞¬« ¡á »α«µÑßß«αÑ Γ¿»á i8088). MU/MOD d n --- rem dquot éδñáÑΓ 16-αáºα∩ñ¡«Ñ τáßΓ¡«Ñ rem ¿ 32-αáºα∩ñ¡δ⌐ «ßΓáΓ«¬ dquot «Γ ñÑ½Ñ¡¿∩ 32-αáºα∩ñ¡«ú« τ¿ß½á d ¡á 16-αáºα∩ñ¡«Ñ τ¿ß½« n. Magenta --- 5 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ß¿αÑ¡Ñó«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. N>LINK nfa --- lfa Å« áñαÑßπ »«½∩ ¿¼Ñ¡¿ ß½«óáα¡«⌐ ßΓáΓ∞¿ nfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ßó∩º¿ lfa. NAME> nfa --- cfa Å« áñαÑßπ »«½∩ ¿¼Ñ¡¿ ß½«óáα¡«⌐ ßΓáΓ∞¿ nfa óδñáÑΓ áñαÑß ÑÑ »«½∩ ¬«ñá cfa. NEGATE n1 --- n2 îÑ¡∩ÑΓ º¡á¬ τ¿ß½á n1 ¡á »α«Γ¿ó«»«½«ª¡δ⌐. NEXT --- ÅÑαÑσ«ñ ¬ ¿¡ΓÑα»αÑΓáµ¿¿ ß½ÑñπεΘÑú« ö«αΓ-«»αÑñÑ½Ñ¡¿∩ ("»πßΓ«Ñ ß½«ó«"). NOT n1 --- n2 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ n2 »«í¿Γ¡«ú« óδ»«½¡Ñ¡¿∩ ½«- ú¿τÑß¬«⌐ «»Ñαáµ¿¿ "ìà" ñ½∩ 16-αáºα∩ñ¡«ú« º¡áτÑ¡¿∩ n1. NUMBER addr --- d ÅαÑ«íαáºπÑΓ ß¿¼ó«½∞¡πε ßΓα«¬π ß íá⌐Γ«¼ ñ½¿¡δ, αáß»«½«- ªÑ¡¡πε »« áñαÑßπ addr ¿ ñ«»«½¡Ñ¡¡πε ß»αáóá »α«íÑ½«¼ ¿½¿ ß¿¼ó«½«¼ ß ¡π½Ñóδ¼ ¬«ñ«¼, ó 32-í¿Γ«ó«Ñ τ¿ß½« ó ß««ΓóÑΓ- ßΓó¿¿ ß ΓÑ¬πΘ¿¼ º¡áτÑ¡¿Ñ¼ «ß¡«óá¡¿∩ ßτ¿ß½Ñ¡¿∩ BASE. àß½¿ ó ß¿¼ó«½∞¡«¼ ¿º«íαáªÑ¡¿¿ τ¿ß½á óßΓαÑτáÑΓß∩ ñÑß∩- Γ¿τ¡á∩ Γ«τ¬á ".", Γ« ÑÑ «Γ¡«ß¿ΓÑ½∞¡«Ñ »«½«ªÑ¡¿Ñ ó ßΓα«- ¬Ñ ºá»«¼¿¡áÑΓß∩ ó »ÑαÑ¼Ñ¡¡«⌐ DPL, »αÑ«íαáº«óá¡¿Ñ τ¿ß½á »α¿ φΓ«¼ «ßπΘÑßΓó½∩ÑΓß∩ íÑº πτÑΓá »«½«ªÑ¡¿∩ Γ«τ¬¿. àß½¿ ó ¿º«íαáªÑ¡¿¿ τ¿ß½á óßΓαÑτáεΓß∩ ¡Ññ«»πßΓ¿¼δÑ ó ΓÑ- ¬πΘÑ⌐ ß¿ßΓÑ¼Ñ ßτ¿ß½Ñ¡¿∩ ß¿¼ó«½δ, ó«º¡¿¬áÑΓ «Φ¿í«τ¡á∩ ß¿Γπáµ¿∩. æ¼. Γá¬ªÑ CONVERT. OF n --- n (run) | sys --- sys (compile) ìáτ¿¡áÑΓ óÑΓó∞ óδí«αá ó ßΓαπ¬ΓπαÑ óÑΓó½Ñ¡¿∩ CASE. OPEN-FILE handle_pars --- status ÄΓ¬αδóáÑΓ Σá⌐½ ¡á ºá»¿ß∞ ¿ ¡á τΓÑ¡¿Ñ. ê¼∩ Σá⌐½á ¿ Ñú« »«½¡á∩ ß»Ñµ¿Σ¿¬áµ¿∩ íÑαπΓß∩ ¿º ñÑß¬α¿»Γ«αá Σá⌐½á. àß½¿ Σá⌐½ »«¼ÑτÑ¡ ¬á¬ "read-only" (ñ«ßΓπ»¡δ⌐ ñ½∩ «Γ¬αδΓ¿∩ Γ«½∞¬« ¡á τΓÑ¡¿Ñ), Γ« íπñÑΓ ºáΣ¿¬ß¿α«óá¡á «Φ¿í¬á. é φΓ«¼ ß½πτáÑ ß½ÑñπÑΓ ó«ß»«½∞º«óáΓ∞ß∩ ß½«ó«¼ OPEN-FILE-R/O. ìá ßΓÑ¬Ñ ó«ºóαáΘáÑΓß∩ ¬«ñ ºáóÑαΦÑ¡¿∩ ñá¡¡«⌐ «»Ñαáµ¿¿. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS OPEN-FILE-R/O handle_pars --- status ÄΓ¬αδóáÑΓ Σá⌐½ Γ«½∞¬« ¡á τΓÑ¡¿Ñ. Åα¿ »«»δΓ¬Ñ ºá»¿ßáΓ∞ ¬á¬πε ½¿í« ¿¡Σ«α¼áµ¿ε ó «Γ¬αδΓδ⌐ Γá¬¿¼ «íαáº«¼ Σá⌐½ íπñÑΓ ºáΣ¿¬ß¿α«óá¡á «Φ¿í¬á. àß½¿ Σá⌐½ »«¼ÑτÑ¡ ¬á¬ "read-only" (Γ«½∞¬« τΓÑ¡¿Ñ), Γ« «Γ¬αδΓ∞ Ñú« ¼«ª¡« Γ«½∞¬« ß »«¼«Θ∞ε φΓ«ú« ß½«óá. ìá ßΓÑ¬Ñ ó«ºóαáΘáÑΓß∩ ¬«ñ ºáóÑαΦÑ¡¿∩ ñá¡¡«⌐ «»Ñαáµ¿¿. Ç¡á½¿º status »α«¿ºó«ñ¿Γß∩ ß½«ó«¼ .STATUS OR n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ n3 »«í¿Γ¡«ú« óδ»«½¡Ñ¡¿∩ ½«- ú¿τÑß¬«⌐ «»Ñαáµ¿¿ "êïê" ñ½∩ ñóπσ 16-αáºα∩ñ¡δσ º¡áτÑ¡¿⌐ n1 ¿ n2. OUT --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ ¬«½¿- τÑßΓó« ß¿¼ó«½«ó, óδóÑñÑ¡¡δσ ó »«ß½Ññ¡Ñ⌐ ßΓα«¬Ñ. î«ªÑΓ íδΓ∞ ¿ß»«½∞º«óá¡á ñ½∩ π»αáó½Ñ¡¿∩ Σ«α¼áΓ«¼ óδó«ñá. OVER n1 n2 --- n1 n2 n1 è«»¿απÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á óΓ«α«Ñ ßóÑασπ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n1. P! n1 n2 --- éδó«ñ¿Γ ñóπσíá⌐Γ«ó«Ñ º¡áτÑ¡¿Ñ n1 ó« ó¡ÑΦ¡¿⌐ »«αΓ ß ¡«- ¼Ñα«¼ n2. P@ n1 --- n2 æτ¿ΓδóáÑΓ º¡áτÑ¡¿Ñ n1 ¿º ñóπσíá⌐Γ«ó«ú« ó¡ÑΦ¡Ñú« »«αΓá ß ¡«¼Ñα«¼ n1. PAD --- addr éδñáÑΓ áñαÑß íπΣÑα¡«⌐ «í½áßΓ¿, ¿ß»«½∞ºπÑ¼«⌐ ñ½∩ »α«¼Ñ- ªπΓ«τ¡«⌐ «íαáí«Γ¬¿ ñá¡¡δσ. ÇñαÑß PAD ¿º¼Ñ¡∩ÑΓß∩ »α¿ ¿º- ¼Ñ¡Ñ¡¿¿ º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ ß½«óáα∩, »α¿ φΓ«¼ »«¼ÑΘÑ¡¡δÑ ó π¬áºá¡¡πε íπΣÑα¡πε «í½áßΓ∞ ñá¡¡δÑ ¼«úπΓ «¬áºáΓ∞ß∩ πΓ- αáτÑ¡¡δ¼¿. PARSE-FILENAME FCB_addr addr --- Ç¡á½¿º ¿¼Ñ¡¿ Σá⌐½á, ºáñáóáÑ¼«ú« ßΓα«¬«⌐ »« áñαÑßπ addr, ¿ ºá¡ÑßÑ¡¿Ñ Ñú« ó í½«¬ π»αáó½Ñ¡¿∩ Σá⌐½«¼, αáß»«½«ªÑ¡¡δ⌐ »« áñαÑßπ FCB_addr. PAUSE --- Åα¿¡πñ¿ΓÑ½∞¡«Ñ »ÑαÑ¬½ετÑ¡¿Ñ »α«µÑßß«ó. Ç¬Γ¿ó¡δ⌐ »α«µÑßß »αÑαδóáÑΓß∩ ¿ á¬Γ¿ó¿º¿απÑΓß∩ ß½ÑñπεΘ¿⌐ ó ß»¿ß¬Ñ »α«µÑßß«ó. àß½¿ ßπΘÑßΓóπÑΓ óßÑú« «ñ¿¡ »α«µÑßß, Γ« »ÑαÑ¬½ετÑ¡¿Ñ »α«µÑßß«ó ¡¿τÑú« ¡Ñ ¿º¼Ñ¡∩ÑΓ, Γá¬ ¬á¬ ß»¿ß«¬ »α«µÑßß«ó ∩ó½∩ÑΓß∩ µ¿¬½¿τÑß¬¿¼. PC! b n --- éδó«ñ¿Γ «ñ¡«íá⌐Γ«ó«Ñ º¡áτÑ¡¿Ñ b ó« ó¡ÑΦ¡¿⌐ »«αΓ ß ¡«me- α«¼ n. PC@ n --- b æτ¿ΓδóáÑΓ º¡áτÑ¡¿Ñ b ¿º «ñ¡«íá⌐Γ«ó«ú« ó¡ÑΦ¡Ñú« »«αΓá ß ¡«¼Ñα«¼ n. PCKEY --- b | --- b 0 éó«ñ ñá¡¡δσ ß ¬½áó¿áΓπαδ. ä½∩ ¬½áó¿Φ, óδαáíáΓδóáεΘ¿σ ASCII-¬«ñδ, óδñáÑΓß∩ ¬«ñ ß¿¼ó«½á b, ñ½∩ π»αáó½∩εΘ¿σ ¬½áó¿Φ - ¬«ñ ¬½áó¿Φ¿ b ¿ ¡π½Ñó«⌐ Σ½áú. PERFORM addr --- éδ»«½¡∩ÑΓ ß½«ó«, áñαÑß »«½∩ ¬«ñá ¬«Γ«α«ú« αáß»«½«ªÑ¡ ó »á¼∩Γ¿ »« áñÑßπ addr (¬«ßóÑ¡¡δ⌐ EXECUTE). PICK n1 --- n2 è«»¿απÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á n1-«Ñ ßóÑασπ 16-í¿Γ«ó«Ñ º¡á- τÑ¡¿Ñ n2. ¥½Ñ¼Ñ¡Γδ ßΓÑ¬á ¡π¼ÑαπεΓß∩ «Γ óÑαΦ¿¡δ, ¡áτ¿- ¡á∩ ß ¡π½Ñó«ú« ¡«¼Ñαá. PLAY addr --- é«ß»α«¿ºó«ñ¿Γ ó Σ«¡«ó«¼ αÑª¿¼Ñ ¼Ñ½«ñ¿ε, ºáñáóáÑ¼πε ¼πºδ¬á½∞¡δ¼ Σαáú¼Ñ¡Γ«¼, ßΣ«α¼¿α«óá¡¡δ¼ »« áñαÑßπ addr. PLAYPTR --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ñ½∩ ºóπ¬«ó«ú« úÑ¡ÑαáΓ«αá. PRINT n1 n2 --- Åáαá½½Ñ½∞¡δ⌐ »α«µÑßß αáß»ÑτáΓ¬¿ ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á. n1 ¿ n2 ºáñáεΓ ñ¿á»áº«¡ αáß»ÑτáΓδóáÑ¼δσ φ¬αá¡«ó. æ¼Ñ¡á ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á ¡Ñ ó½¿∩ÑΓ ¡á αáí«Γπ »α«µÑßßá PRINT. PRINTER --- ôßΓá¡áó½¿óáÑΓ ó ¬áτÑßΓóÑ ΓÑ¬πΘÑú« πßΓα«⌐ßΓóá óδó«ñá »ÑτáΓáεΘÑÑ πßΓα«⌐ßΓó« (»α¿¡ΓÑα). Å«ß½Ñ óδ»«½¡Ñ¡¿∩ ß½«óá PRINTER óßÑ ñá¡¡δÑ, óδó«ñ¿¼δÑ ß ¿ß»«½∞º«óá¡¿Ñ¼ ß½«ó EMIT ¿ TYPE, íπñπΓ óδó«ñ¿Γ∞ß∩ ¡á »α¿¡ΓÑα. æ¼. Γá¬ªÑ CONSOLE. QUERY --- éó«ñ¿Γ ßΓα«¬π ß ΓÑα¼¿¡á½á (ß ¿ß»«½∞º«óá¡¿Ñ¼ EXPECT) ó« óσ«ñ¡«⌐ ΓÑ¬ßΓ«óδ⌐ íπΣÑα TIB, »«¼ÑΘáÑΓ ¬«½¿τÑßΓó« ß¿¼ó«- ½«ó ó« óóÑñÑ¡¡«⌐ ßΓα«¬Ñ ó »ÑαÑ¼e¡¡πε #TIB ¿ πßΓá¡áó½¿- óáÑΓ ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ >IN. QUIT --- ê¡¿µ¿á½¿º¿απÑΓ µ¿¬½ öÄÉÆ-¿¡ΓÑα»αÑΓáΓ«αá - «»πßΓ«ΦáÑΓ ßΓÑ¬ ó«ºóαáΓ«ó, πßΓá¡áó½¿óáÑΓ º¡áτÑ¡¿Ñ BLK αáó¡δ¼ ¡π½ε ñ½∩ óó«ñá óσ«ñ¡«ú« »«Γ«¬á ß ΓÑα¼¿¡á½á. R0 --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á ó«ºóαáΓ«ó. R> --- n ÅÑαÑ¼ÑΘáÑΓ φ½Ñ¼Ñ¡Γ ß óÑαΦ¿¡δ ßΓÑ¬á ó«ºóαáΓ«ó ¡á áα¿Σ- ¼ÑΓ¿τÑß¬¿⌐ ßΓÑ¬. æ¼. Γá¬ªÑ >R ¿ R@. R@ --- n è«»¿απÑΓ ¡á áα¿Σ¼ÑΓ¿τÑß¬¿⌐ ßΓÑ¬ óÑασ¡¿⌐ φ½Ñ¼Ñ¡Γ ßΓÑ¬á ó«ºóαáΓ«ó. æ«ßΓ«∩¡¿Ñ ßΓÑ¬á ó«ºóαáΓá ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. æ¼. Γá¬ªÑ >R ¿ R>. READ handle_pars length buf --- bytes_read 0 --- -1 (EOF) --- status (error) ùΓÑ¡¿Ñ ¿º Σá⌐½á ¿½¿ ß πßΓα«⌐ßΓóá. ìÑ úáαá¡Γ¿απÑΓß∩, τΓ« óßÑ íá⌐Γδ íπñπΓ »α«τ¿Γá¡δ. àß½¿ τΓÑ¡¿Ñ »α«¿ßσ«ñ¿Γ, ¡á»α¿¼Ñα, ß ¬½áó¿áΓπαδ, Γ« ß¿¼ó«½δ ó«ºóαáΓá ¬áαÑΓ¬¿ ¿ »ÑαÑσ«ñá ¡á ¡«óπε ßΓα«¬π íπñπΓ ñ«íáó½Ñ¡δ ¬ τ¿ΓáÑ¼δ¼ ñá¡¡δ¼ ¿ πτΓÑ¡δ ó ßτÑΓτ¿¬Ñ »α«τ¿Γá¡¡δσ ñá¡¡δσ. REC --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘ¿⌐ ¡«¼Ñα í½«¬á ΓÑ¬πΘÑú« φ¬αá¡¡«ú« Σá⌐½á. êß»«½∞ºπÑΓß∩ «»Ñαáµ¿∩¼¿ τΓÑ¡¿∩ ¿ ºá»¿ß¿ BLOCK-READ ¿ BLOCK-WRITE. RECURSE --- è«¼»¿½¿απÑΓ αÑ¬παß¿ó¡δ⌐ óδº«ó «»αÑñÑ½∩Ñ¼«ú« ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ ß½«óá. êß»«½∞ºπÑΓß∩ Γ«½∞¬« ó αÑª¿¼Ñ ¬«¼»¿½∩µ¿¿. RENAME-FILE handle1_pars handle2_pars --- status êº¼Ñ¡∩ÑΓ ¿¼∩ Σá⌐½á. ¥Γ« ß½«ó« ¼«ªÑΓ íδΓ∞ Γá¬ªÑ ¿ß»«½∞º«óá¡« ñ½∩ »ÑαÑ¼ÑΘÑ¡¿∩ Σá⌐½á ¿º «ñ¡«⌐ ñ¿αÑ¬Γ«α¿¿ ó ñαπúπε ó »αÑñÑ½áσ «ñ¡«ú« πßΓα«⌐ßΓóá. REPEAT --- çáóÑαΦáÑΓ ßΓαπ¬Γπαπ π»αáó½Ñ¡¿∩ ó¿ñá BEGIN ... WHILE ... THEN --- çáóÑαΦáÑΓ ßΓαπ¬Γπαδ π»αáó½Ñ¡¿∩ ó¿ñá IF ... THEN ¿ IF ... ELSE ... THEN. RIGHT --- ÅÑαÑ¼ÑΘáÑΓ ¬παß«α ó ΓÑ¬πΘÑ¼ «¬¡Ñ ¡á «ñ¡π »«º¿µ¿ε ó»αá- ó«. Åα¿ ¡áσ«ªñÑ¡¿¿ ¬παß«αá ó ¬αá⌐¡Ñ⌐ »αáó«⌐ »«º¿µ¿¿ »α«¿ºó«ñ¿Γß∩ Ñú« »ÑαÑó«ñ ó ¬αá⌐¡εε ½Ñóπε »«º¿µ¿ε ¿ »Ñ- αÑ¼ÑΘÑ¡¿Ñ ¡á «ñ¡π ßΓα«¬π ó¡¿º, »α¿ φΓ«¼ ó αÑª¿¼Ñ SCROLL ó«º¼«ª¡á »α«Γ∩ª¬á á¬Γ¿ó¡«ú« «¬¡á (ß¼. DOWN). ROLL n1 --- n2 Åα«¬απΓ¬á ßΓÑ¬á. ÅÑαÑ¼ÑΘáÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á n1-«Ñ ßóÑασπ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n2. ¥½Ñ¼Ñ¡Γδ ßΓÑ¬á ¡π¼ÑαπεΓß∩ «Γ óÑαΦ¿¡δ, ¡áτ¿¡á∩ ß ¡π½Ñó«ú« ¡«¼Ñαá. ROOT --- directory_par ü½«¬ π»αáó½Ñ¡¿∩ ñ¿αÑ¬Γ«α¿Ñ⌐, »αÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñ½∩ ¬«α¡Ñó«⌐ ñ¿αÑ¬Γ«α¿¿ "\". ROT n1 n2 n3 --- n2 n3 n1 ÅÑαÑ¼ÑΘáÑΓ ¡á óÑαΦ¿¡π ßΓÑ¬á ΓαÑΓ∞Ñ ßóÑασπ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n1. RP! addr --- ôßΓá¡áó½¿óáÑΓ ¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á ó«º- óαáΓ«ó (»ÑαÑ¼Ñ¡¡á∩ R0) αáó¡δ¼ addr. RP@ --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßΓÑ¬á ó«º- óαáΓ«ó. RUN --- êß»«½∞ºπÑΓß∩ ó ó¿ñÑ RUN [path]filename parameters éδ»«½¡∩ÑΓ π¬áºá¡¡δ⌐ Σá⌐½ «»Ñαáµ¿«¡¡«⌐ ß¿ßΓÑ¼δ, ¬á¬ »α«úαá¼¼π. Äí∩ºáΓÑ½∞¡« ñ«½ªÑ¡ íδΓ∞ π¬áºá¡ Γ¿» Σá⌐½á (.COM ¿½¿ .EXE). öá⌐½δ Γ¿»á .BAT óδ»«½¡∩Γ∞ Γá¬¿¼ «íαáº«¼ ¡Ñ½∞º∩ (¡« ¼«ª¡« óδ»«½¡¿Γ∞ COMMAND.COM, »ÑαÑñáó Ñ¼π »áαá¼ÑΓα«¼ ¬«¼á¡ñπ óδ»«½¡Ñ¡¿∩ Σá⌐½á Γ¿»á .BAT) Red --- 4 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ¬αáß¡«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. S0 --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ áα¿Σ¼ÑΓ¿τÑß¬«ú« ßΓÑ¬á. S= addr1 addr2 length --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ ßαáó¡Ñ¡¿∩ (TRUE ¿½¿ FALSE) ñóπσ »«ß½Ññ«óáΓÑ½∞¡«ßΓÑ⌐ íá⌐Γ«ó ñ½¿¡«⌐ length. Å«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ¡áτ¿¡áεΓß∩ ß««ΓóÑΓßΓóÑ¡¡« ß áñαÑß«ó addr1 ¿ addr2. S>D n --- d ÅαÑ«íαáºπÑΓ 16-αáºα∩ñ¡«Ñ τ¿ß½« ß« º¡á¬«¼ ó 32-αáºα∩ñ¡«Ñ τ¿ß½« ß« º¡á¬«¼. SAVE --- æ«σαá¡Ñ¡¿Ñ ΓÑ¬πΘÑú« ß«ßΓ«∩¡¿∩ öÄÉÆ-ß¿ßΓÑ¼δ ¡á ñ¿ß¬Ñ. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ SAVE [drive]filename[.filetype] ô¬áºá¡¿Ñ πßΓα«⌐ßΓóá ¿ Γ¿»á Σá⌐½á ¼«ªÑΓ íδΓ∞ «»πΘÑ¡«, ó Γá¬«¼ ß½πτáÑ ß¿ßΓÑ¼á ß«σαá¡∩ÑΓß∩ ¡á ΓÑ¬πΘÑ¼ πßΓα«⌐ßΓóÑ ó Σá⌐½Ñ Γ¿»á .COM SAVE-BUFFERS --- çá»¿ßδóáÑΓ ¡á ñ¿ß¬ í½«¬¿, »«¼ÑτÑ¡¡δÑ »α¿º¡á¬«¼ UPDATE. æ«ñÑαª¿¼«Ñ íπΣÑα«ó ß«σαá¡∩ÑΓß∩, ß¡¿¼áÑΓß∩ »α¿º¡á¬ UPDATE. SCF --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ »α¿º¡á¬ (TRUE ¿½¿ FALSE) »α«Γ∩ª¬¿ φ¬αá¡á. SCR --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ¡«¼Ñα φαá¡á ΓÑ- ¬πΘÑú« Σá⌐½á, π¬áºá¡¡«ú« »α¿ »«ß½Ññ¡Ñ¼ «íαáΘÑ¡¿¿ ¬ ß½«- óπ LIST, ¿½¿ πßΓá¡«ó½Ñ¡¡«ú« »α¿ óδσ«ñÑ ¿º αÑñá¬Γ«αá EDIT. SCRATCH-FILE --- handle_pars Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ »áαá¼ÑΓαδ αáí«τÑú« ñÑß¬α¿»Γ«αá handle_pars, ¿ß»«½∞ºπÑ¼«ú« ñ½∩ αáí«Γδ ß óαÑ¼Ñ¡¡δ¼¿ Σá⌐½á¼¿ (ß¼. HANDLE). SCROLL --- ôßΓá¡áó½¿óáÑΓ αÑª¿¼ áóΓ«¼áΓ¿τÑß¬«⌐ »α«Γ∩ª¬¿ ßΓα«¬ ó á¬- Γ¿ó¡«¼ «¬¡Ñ »α¿ óδó«ñÑ ΓÑ¬ßΓá ¿ »α¿ »ÑαÑ¼ÑΘÑ¡¿¿ ¬παß«- αá. Åα¿ »«½¡«¼ ºá»«½¡Ñ¡¿¿ ¡¿ª¡Ñ⌐ ßΓα«¬¿ á¬Γ¿ó¡«ú« «¬¡á ¿½¿ »α¿ »ÑαÑ¼ÑΘÑ¡¿¿ ó¡¿º ¬παß«αá, ¡áσ«ñ∩ΘÑú«ß∩ ó ¡¿ª¡Ñ⌐ ßΓα«¬Ñ, «ßπΘÑßΓó½∩ÑΓß∩ »α«Γ∩ª¬á ß«ñÑαª¿¼«ú« «¬¡á óóÑασ, á »α¿ »ÑαÑ¼ÑΘÑ¡¿¿ óóÑασ ¬παß«αá, ¡áσ«ñ∩ΘÑú«ß∩ ó óÑασ¡Ñ⌐ ßΓα«¬Ñ - »α«Γ∩ª¬á ó¡¿º. SCROLL-DOWN --- ÄßπΘÑßΓó½∩ÑΓ »α«Γ∩ª¬π ¡á «ñ¡π ßΓα«¬π ó¡¿º ß«ñÑαª¿¼«ú« á¬Γ¿ó¡«ú« «¬¡á. Äßó«í«ªñáεΘá∩ß∩ óÑασ¡∩∩ ßΓα«¬á ºá»«½¡∩- ÑΓß∩ »α«íÑ½á¼¿ ß ΓÑ¬πΘ¿¼ µóÑΓ«óδ¼ áΓα¿íπΓ«¼. Å«½«ªÑ¡¿Ñ ¬παß«αá ó «¬¡Ñ ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. SCROLL-OFF --- ÄΓ¼Ñ¡∩ÑΓ αÑª¿¼ áóΓ«¼áΓ¿τÑß¬«⌐ »α«Γ∩ª¬¿ ßΓα«¬ ó á¬Γ¿ó¡«¼ «¬¡Ñ »α¿ óδó«ñÑ ΓÑ¬ßΓá ¿ »α¿ »ÑαÑ¼ÑΘÑ¡¿¿ ¬παß«αá (ß¼. SCROLL). Å«ß½Ñ ºá»«½¡Ñ¡¿∩ ¡¿ª¡Ñ⌐ ßΓα«¬¿ á¬Γ¿ó¡«ú« «¬¡á óδó«ñ ΓÑ¬ßΓá »α«ñ«½ªáÑΓß∩ ß óÑασ¡Ñ⌐ ßΓα«¬¿. Åα¿ »ÑαÑ¼Ñ- ΘÑ¡¿¿ óóÑασ (ó¡¿º) ¬παß«αá, ¡áσ«ñ∩ΘÑú«ß∩ ó óÑασ¡Ñ⌐ (¡¿ª¡Ñ⌐) ßΓα«¬Ñ «¬¡á, ¬παß«α »ÑαÑó«ñ¿Γß∩ ß««ΓóÑΓßΓóÑ¡¡« ó ¡¿ª¡εε (óÑασ¡εε) ßΓα«¬π íÑº ¿º¼Ñ¡Ñ¡¿∩ ú«α¿º«¡Γá½∞¡«⌐ »«º¿µ¿¿. SCROLL-UP --- ÄßπΘÑßΓó½∩ÑΓ »α«Γ∩ª¬π ¡á «ñ¡π ßΓα«¬π óóÑασ ß«ñÑαª¿¼«ú« á¬Γ¿ó¡«ú« «¬¡á. Äßó«í«ªñáεΘá∩ß∩ ¡¿ª¡∩∩ ßΓα«¬á ºá»«½¡∩- ÑΓß∩ »α«íÑ½á¼¿ ß ΓÑ¬πΘ¿¼ µóÑΓ«óδ¼ áΓα¿íπΓ«¼. Å«½«ªÑ¡¿Ñ ¬παß«αá ó «¬¡Ñ ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. SD --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ ßó«í«ñ¡«⌐ »á¼∩Γ¿ ó ñ«»«½¡¿ΓÑ½∞¡«¼ ßÑú¼Ñ¡ΓÑ ö«αΓ-ß¿ßΓÑ¼δ. SEARCH addr1 l1 addr2 l2 --- addr | 0 Å«¿ß¬ óσ«ªñÑ¡¿∩ ßΓα«¬¿ »« áñαÑßπ addr1 ñ½¿¡«⌐ l1 ó ßΓα«¬Ñ »« áñαÑßπ addr2 ¿ ñ½¿¡«⌐ l2. Åα¿ πß»ÑΦ¡«¼ »«¿ß¬Ñ ó ¬áτÑßΓóÑ αÑºπ½∞ΓáΓá óδñáÑΓß∩ áñαÑß »Ñαó«ú« ¡á⌐ñÑ¡¡«ú« óσ«ªñÑ¡¿∩ addr, »α¿ ¡Ñπß»ÑΦ¡«¼ - ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ. SEARCH-FIRST handle_pars attrib --- status Å«¿ß¬ Σá⌐½á ß π¬áºá¡¡«⌐ ß»Ñµ¿Σ¿¬áµ¿Ñ⌐. Å«ß½Ñ ¡áσ«ªñÑ¡¿∩ Σá⌐½á »«¿ß¬ »αÑ¬αáΘáÑΓß∩. Å«¿ß¬ ¼«ª¡« ºáñáóáΓ∞ »« «íαáºµπ. é«ºóαáΘáÑΓ αÑºπ½∞ΓáΓ ó «í½áßΓ¿ »ÑαÑñáτ¿ ñá¡¡δσ äÄæ »« áñαÑßπ DTA (Data Transfer Area). æ¼«Γα¿ SEARCH-NEXT. SEARCH-NEXT --- status Å«¿ß¬ ß½ÑñπεΘÑú« Σá⌐½á ß π¬áºá¡¡«⌐ ß»Ñµ¿Σ¿¬áµ¿Ñ⌐. êß»«½∞ºπÑΓß∩ »«ß½Ñ óδ»«½¡Ñ¡¿∩ ß½«óá SEARCH-FIRST. éσ«ñ¡δÑ »áαá¼ÑΓαδ íÑαÑΓ ¿º SCRATCH_BUF. é«ºóαáΘáÑΓ αÑºπ½∞ΓáΓ ó «í½áßΓ¿ »ÑαÑñáτ¿ ñá¡¡δσ äÄæ »« áñαÑßπ DTA (Data Transfer Area).æ¼«Γα¿ SEARCH-FIRST. SEEK-ABS handle_pars offset<d> --- status ôßΓá¡áó½¿óáÑΓ π¬áºáΓÑ½∞ τΓÑ¡¿∩/ºá»¿ß¿ Σá⌐½á »« áíß«½εΓ¡«¼π ß¼ÑΘÑ¡¿ε «Γ ¡áτá½á Σá⌐½á. æ¼ÑΘÑ¡¿Ñ ñ«½ª¡« íδΓ∞ »«½«ª¿ΓÑ½∞¡δ¼ ñó«⌐¡δ¼ µÑ½δ¼. SEEK-EOF handle_pars offset<d> --- status ôßΓá¡áó½¿óáÑΓ π¬áºáΓÑ½∞ τΓÑ¡¿∩/ºá»¿ß¿ Σá⌐½á «Γ¡«ß¿ΓÑ½∞¡« ¬«¡µá Σá⌐½á. ¥Γ« ß½«ó« ¿ß»«½∞ºπÑΓß∩ ß½«ó«¼ ?FILESIZE, ¬«Γ«α«Ñ ó«ºóαáΘáÑΓ ñ½¿¡π Σá⌐½á ó íá⌐Γáσ. æ¼ÑΘÑ¡¿Ñ ñ«½ª¡« íδΓ∞ »«½«ª¿ΓÑ½∞¡δ¼ ñó«⌐¡δ¼ µÑ½δ¼. SEEK-REL handle_pars offset<d> --- status ôßΓá¡áó½¿óáÑΓ π¬áºáΓÑ½∞ τΓÑ¡¿∩/ºá»¿ß¿ Σá⌐½á ¡á π¬áºá¡¡«Ñ ß¼ÑΘÑ¡¿Ñ «Γ ΓÑ¬πΘÑú« º¡áτÑ¡¿∩ π¬áºáΓÑ½∩ τΓÑ¡¿∩/ºá»¿ß¿. æ¼ÑΘÑ¡¿Ñ ñ«½ª¡« íδΓ∞ ñó«⌐¡δ¼ µÑ½δ¼ ß« º¡á¬«¼. SET-ATTRIB handle_pars attrib --- status ôßΓá¡áó½¿óáÑΓ íá⌐Γ áΓα¿íπΓá ñ½∩ Σá⌐½á (áΓα¿íπΓ Σá⌐½á). ¥Γá ¬«¼á¡ñá ¿ß»«½∞ºπÑΓß∩ ñ½∩ Γ«ú«, τΓ«íδ »«¼ÑΓ¿Γ∞ Σá⌐½ ¬á¬ "read-only", "system", "hidden" ¿ Γ.ñ.. SET-BORDER n w_addr --- ôßΓá¡áó½¿óáÑΓ Γ¿» «¬á⌐¼½Ñ¡¿∩ (í«αñεαá) «¬¡á ß áñαÑß«¼ í½«¬á π»αáó½Ñ¡¿∩ (áñαÑß »«½∩ ¬«ñá) w_addr. ç¡áτÑ¡¿Ñ n αáó¡«Ñ ¡π½ε «º¡áτáÑΓ «ΓßπΓßΓó¿Ñ í«αñεαá, 1 - í«αñεα, ó ó¿ñÑ «ñ¿¡áα¡«⌐ αá¼¬¿, 2 - í«αñεα ó ó¿ñÑ ñó«⌐¡«⌐ αá¼¬¿ ¿ Γ.». éßÑú« «»αÑñÑ½Ñ¡« ó«ßÑ¼∞ Γ¿»«ó í«αñεα«ó. æ¿¼ó«½δ, ¬«Γ«αδ¼¿ í«αñεαδ «Γα¿ß«óδóáεΓß∩ ¡á φ¬αá¡Ñ, σαá¡∩Γß∩ ó »Ñαó«⌐ ßΓα«¬Ñ τÑΓóÑαΓ«ú« φ¬αá¡á Σá⌐½á ñ¿áú¡«ßΓ¿τÑß¬¿σ ß««íΘÑ¡¿⌐ FORTH.MSG (»« ó«ßÑ¼∞ ß¿¼ó«½«ó ¡á ¬áªñδ⌐ Γ¿» í«αñεαá). Åα¿ πßΓá¡«ó¬Ñ Γ¿»á í«αñεαá ñ½∩ á¬Γ¿ó¡«ú« «¬¡á »α«¿ºó«ñ¿Γß∩ «Γα¿ß«ó¬á ¡«ó«ú« í«αñεαá ¡á φ¬αá¡Ñ, »α¿ φΓ«¼ ¡Ñ αáºαÑΦáÑΓß∩ ºáñá¡¿Ñ n αáó¡δ¼ ¡π½ε »α¿ ¡á½¿τ¿¿ í«αñεαá π á¬Γ¿ó¡«ú« «¬¡á ¿ n «Γ½¿τ¡«ú« «Γ ¡π½∩ ó ß½πτáÑ «ΓßπΓßΓó¿∩ í«αñεαá. Å« π¼«½τá¡¿ε »α¿ «»αÑñÑ½Ñ¡¿¿ «¬¡á πßΓá¡áó½¿óáÑΓß∩ Γ¿» í«αñεαá, ß««ΓóÑΓßΓóπεΘ¿⌐ n αáó¡«¼π 1 («ñ¿¡áα¡á∩ αá¼¬á). SET-BRDCOL background foreground w_addr --- ôßΓá¡áó½¿óáÑΓ µóÑΓ«óδÑ áΓα¿íπΓδ í«αñεαá «¬¡á ß áñαÑß«¼ í½«¬á π»αáó½Ñ¡¿∩ (áñαÑß »«½∩ ¬«ñá) w_addr. Åáαá¼ÑΓα background ºáñáÑΓ µóÑΓ Σ«¡á, á foreground - µóÑΓ ß¿¼ó«- ½«ó, ¬«Γ«αδ¼¿ «Γα¿ß«óδóáÑΓß∩ í«αñεα. Åα¿ πßΓá¡«ó¬Ñ µóÑ- Γá í«αñεαá ñ½∩ á¬Γ¿ó¡«ú« «¬¡á »α«¿ºó«ñ¿Γß∩ »ÑαÑ¬αáß¬á ¡«ó«ú« í«αñεαá ¡á φ¬αá¡Ñ. Å« π¼«½τá¡¿ε »α¿ «»αÑñÑ½Ñ¡¿¿ «¬¡á ó ¬áτÑßΓóÑ µóÑΓ«óδσ áΓα¿íπΓ«ó í«αñεαá πßΓá¡áó½¿óá- εΓß∩ º¡áτÑ¡¿∩ Black ¿ White (íÑ½δÑ ß¿¼ó«½δ ¡á τÑα¡«¼ Σ«¡Ñ). SET-CURSOR n1 n2 --- ôßΓá¡áó½¿óáÑΓ αáº¼Ñα ¬παß«αá ¡á φ¬αá¡Ñ. n1 - ¡áτá½∞¡á∩ ßΓα«¬á αáºóÑαΓ¬¿ ß¿¼ó«½á, n2 - ¬«¡Ñτ¡á∩ ßΓα«¬á αáºóÑαΓ¬¿. æΓα«¬¿ ¡π¼ÑαπεΓß∩ ß ¡π½∩ ßóÑασπ ó¡¿º φ¬αá¡á, 0 <= n1 <= n2 <= 7. SET-INF n w_addr --- æ«σαá¡∩ÑΓ 16-í¿Γ«ó«Ñ º¡áτÑ¡¿Ñ n ó »«½Ñ ñ«»«½¡¿ΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ í½«¬á π»αáó½Ñ¡¿∩ «¬¡«¼ ß áñαÑß«¼ w_addr. Äíδτ¡« ¿ß»«½∞ºπÑΓß∩ ñ½∩ σαá¡Ñ¡¿∩ »«½∞º«óáΓÑ½∞ß¬«⌐ ¿¡- Σ«α¼áµ¿¿, ßó∩ºá¡¡«⌐ ß ñá¡¡δ¼ «¬¡«¼. SET-INTCOL background foreground w_addr --- ôßΓá¡áó½¿óáÑΓ µóÑΓ«óδÑ áΓα¿íπΓδ ó¡πΓαÑ¡¡Ñ⌐ τáßΓ¿ «¬¡á ß áñαÑß«¼ í½«¬á π»αáó½Ñ¡¿∩ (áñαÑß »«½∩ ¬«ñá) w_addr. Åáαá¼ÑΓα background ºáñáÑΓ µóÑΓ Σ«¡á, á foreground - µóÑΓ ß¿¼ó«½«ó. Åα¿ πßΓá¡«ó¬Ñ µóÑΓ«óδσ áΓα¿íπΓ«ó ñ½∩ á¬- Γ¿ó¡«ú« «¬¡á »α«¿ºó«ñ¿Γß∩ »ÑαÑ¬αáß¬á Ñú« ó¡πΓαÑÑ¡Ñ⌐ «í- ½áßΓ¿ ¡á φ¬αá¡Ñ, ¬α«¼Ñ Γ«ú«, π¬áºá¡¡δÑ áΓα¿íπΓδ πßΓá- ¡áó½¿óáεΓß∩ ó ¬áτÑßΓóÑ ΓÑ¬πΘ¿σ µóÑΓ«óδσ áΓα¿íπΓ«ó ñ½∩ »α«µÑñπα óδó«ñá. Å« π¼«½τá¡¿ε »α¿ «»αÑñÑ½Ñ¡¿¿ «¬¡á ó ¬áτÑßΓóÑ µóÑΓ«óδσ áΓα¿íπΓ«ó ó¡πΓαÑ¡¡«ßΓ¿ «¬¡á πßΓá¡áó- ½¿óáεΓß∩ º¡áτÑ¡¿∩ Black ¿ White (íÑ½δÑ ß¿¼ó«½δ ¡á τÑα- ¡«¼ Σ«¡Ñ). SET-KEY addr key --- Åα«úαá¼¼¿α«óá¡¿Ñ π»αáó½∩εΘ¿σ ¬½áó¿Φ: ¬½áó¿ΦÑ ß ß«ßΓáó¡δ¼ ¬«ñ«¼ "key 0" (ß¼. PCKEY) »α¿»¿ßδóáÑΓß∩ »«ß½Ññ«óáΓÑ½∞¡«ßΓ∞ ß¿¼ó«½«ó, ºáñáóáÑ¼á∩ ßΓα«¬«⌐ ß íá⌐Γ«¼ ñ½¿¡δ, αáß»«½«ªÑ¡¡«⌐ »« áñαÑßπ addr. é ñá½∞¡Ñ⌐ΦÑ¼ ¬áªñ«Ñ ¡áªáΓ¿Ñ ºá»α«úαá¼¼¿α«óá¡¡«⌐ ¬½áó¿Φ¿ ¼«ª¡« αáßß¼áΓα¿óáΓ∞ ¬á¬ »«ß½Ññ«óáΓÑ½∞¡δ⌐ óó«ñ ß ¬½áó¿áΓπαδ ºáñá¡¡«⌐ »«ß½Ññ«óáΓÑ½∞¡«ßΓ¿ ß¿¼ó«½«ó. SET-LOCATION lx uy width height w_addr --- ôßΓá¡áó½¿óáÑΓ áΓα¿íπΓδ αáß»«½«ªÑ¡¿∩ «¬¡á ß í½«¬«¼ π»- αáó½Ñ¡¿∩ »« áñαÑßπ w_addr. ìÑ αáºαÑΦáÑΓß∩ ¿ß»«½∞º«óá¡¿Ñ ñá¡¡«ú« ß½«óá ñ½∩ πªÑ «Γ¬αδΓδσ «¬«¡. SET-PROC cfa w_addr --- çáñáÑΓ »α«µÑñπαπ, óδ»«½¡∩Ñ¼πε ó «¬¡Ñ ß í½«¬«¼ π»αáó½Ñ- ¡¿∩ w_addr. Åα«µÑñπαá ºáñáÑΓß∩ áñαÑß«¼ »«½∩ ¬«ñá cfa. SIGN n --- àß½¿ τ¿ß½« n «Γα¿µáΓÑ½∞¡«, »α¿»¿ßδóáÑΓ ¬ óδσ«ñ¡«⌐ ßΓα«- ¬Ñ, ¿ß»«½∞ºπÑ¼«⌐ »α«µÑñπαá¼¿ »αÑ«íαáº«óá¡¿∩ τ¿ßÑ½ ó ΓÑ¬ßΓ«óδ⌐ ó¿ñ, ß¿¼ó«½ "-", ó »α«Γ¿ó¡«¼ ß½πτáÑ n ß¡¿¼á- ÑΓß∩ ß« ßΓÑ¬á ¿ ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. (æ¼. Γá¬ªÑ <# # #S SIGN HOLD ¿ #> ). SIREN --- éδñáτá ºóπ¬«ó«ú« ß¿ú¡á½á ß¿αÑ¡δ. SMUDGE --- ôßΓá¡áó½¿óáÑΓ »α¿º¡á¬ ¡ÑºáóÑαΦÑ¡¡«ßΓ¿ «»αÑñÑ½Ñ¡¿∩ ñ½∩ »«ß½Ññ¡Ñú« ß«ºñá¡¡«ú« ó ß½«óáαÑ ß½«óá. æ½«óá, »«¼ÑτÑ¡¡δÑ »α¿º¡á¬«¼ SMUDGE ¿ú¡«α¿απεΓß∩ »α¿ ß½«óáα¡«¼ »«¿ß¬Ñ. æ¼. Γá¬ªÑ UNSMUDGE. SOUND --- ÄΓ¬½ετÑ¡¿Ñ ºóπ¬«ó«ú« úÑ¡ÑαáΓ«αá. SOUND-OFF --- é¬½ετÑ¡¿Ñ ºóπ¬«ó«ú« úÑ¡ÑαáΓ«αá. SP! addr --- ôßΓá¡áó½¿óáÑΓ ¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ áα¿Σ¼ÑΓ¿τÑß- ¬«ú« ßΓÑ¬á (»ÑαÑ¼Ñ¡¡á∩ S0) αáó¡δ¼ addr. SP@ --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ π¬áºáΓÑ½∩ áα¿Σ¼ÑΓ¿- τÑß¬«ú« ßΓÑ¬á. SPACE --- éδó«ñ¿Γ ß¿¼ó«½ "»α«íÑ½" ó ¬«ñÑ ASCII. SPACES n --- éδó«ñ¿Γ n ß¿¼ó«½«ó "»α«íÑ½" ó ¬«ñÑ ASCII. Åα¿ n ¼Ñ¡∞ΦÑ¼ ½¿í« αáó¡δ¼ ¡π½ε ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. SPAN --- addr ÇñαÑß »ÑαÑ¼Ñ¡¡«⌐, ß«ñÑαªáΘÑ⌐ ¬«½¿τÑßΓó« óóÑñÑ¡¡δσ ß ΓÑα¼¿¡á½á ß¿¼ó«½«ó »α¿ »«ß½Ññ¡Ñ¼ óδ»«½¡Ñ¡¿¿ ß½«óá EXPECT. SS --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ ßÑú¼Ñ¡Γ¡δ⌐ áñαÑß ñ½∩ ñ«»«½¡¿ΓÑ½∞¡«ú« ßÑú¼Ñ¡Γá ö«αΓ-ß¿ßΓÑ¼δ. STATE --- addr Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ áñαÑß »ÑαÑ¼Ñ¡¡«⌐, ß«ñÑαªáΘÑ⌐ »α¿º¡á¬ αÑª¿¼á ¬«¼»¿½∩µ¿¿. ç¡áτÑ¡¿Ñ TRUE ß««ΓóÑΓßΓóπÑΓ αÑª¿¼π ¬«¼»¿½∩µ¿¿, FALSE - αÑª¿¼π ¿¡ΓÑα»αÑΓáµ¿¿. STD-AUX --- handle_pars ÅαÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñÑß¬α¿»Γ«α ñ½∩ ßΓá¡ñáαΓ¡«ú« ñ«»«½¡¿ΓÑ½∞¡«ú« πßΓα«⌐ßΓóá. ÅÑαÑ«»αÑñÑ½∩Γ∞ φΓ« ½«ú¿τÑß¬«Ñ πßΓα«⌐ßΓó« ¡Ñ½∞º∩. STD-ERROR --- handle_pars ÅαÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñÑß¬α¿»Γ«α ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá óδó«ñá ß««íΘÑ¡¿⌐ «í «Φ¿í¬áσ. ÅÑαÑ«»αÑñÑ½∩Γ∞ φΓ« ½«ú¿τÑß¬«Ñ πßΓα«⌐ßΓó« ¡Ñ½∞º∩. STD-INPUT --- handle_pars ÅαÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñÑß¬α¿»Γ«α ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá óó«ñá. ôßΓα«⌐ßΓó« ¼«ª¡« »ÑαÑ«»αÑñÑ½¿Γ∞. STD-LIST --- handle_pars ÅαÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñÑß¬α¿»Γ«α ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá »ÑτáΓ¿. ÅÑαÑ«»αÑñÑ½∩Γ∞ φΓ« ½«ú¿τÑß¬«Ñ πßΓα«⌐ßΓó« ¡Ñ½∞º∩. STD-OUTPUT --- handle_pars ÅαÑñ«»αÑñÑ½Ñ¡¡δ⌐ ñÑß¬α¿»Γ«α ñ½∩ ßΓá¡ñáαΓ¡«ú« πßΓα«⌐ßΓóá óδó«ñá. ôßΓα«⌐ßΓó« ¼«ª¡« »ÑαÑ«»αÑñÑ½¿Γ∞. STI --- é¬½ετÑ¡¿Ñ αÑª¿¼á αÑá¬µ¿¿ ¡á »αÑαδóá¡¿∩ «Γ ¬½áó¿áΓπαδ »« ¡áªáΓ¿ε ¬½áó¿Φ Ctrl/Break. SWAP n1 n2 --- n2 n1 îÑ¡∩ÑΓ ¼ÑßΓá¼¿ ñóá 16-í¿Γ«óδσ º¡áτÑ¡¿∩ n1 ¿ n2 ¡á óÑα- σπΦ¬Ñ ßΓÑ¬á. TASK --- Ä»αÑñÑ½Ñ¡¿Ñ »áαá½½Ñ½∞¡«ú« »α«µÑßßá. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ TASK name ... ; Åα¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¡«ú« Γá¬¿¼ «íαáº«¼ ß½«óá ß«ºñáÑΓß∩ »áαá½½Ñ½∞¡δ⌐ »α«µÑßß ß« ßó«¿¼¿ ßΓÑ¬á¼¿. æ«ñÑαª¿¼«Ñ ßΓÑ¬á »«α«ªñáεΘÑú« »α«µÑßßá ¬«»¿απÑΓß∩ ¡á ßΓÑ¬ ß«ºñá¡¡«ú« »α«µÑßßá. ÅÑαÑ¬½ετÑ¡¿Ñ »α«µÑßß«ó »α«¿ºó«ñ¿Γß∩ αáó¡«¼Ñα¡δ¼ µ¿¬½¿τÑß¬¿¼ ¬óá¡Γ«óá¡¿Ñ¼ »« »αÑαδóá¡¿ε «Γ Γá⌐¼Ñαá ¿½¿ »α¿¡πñ¿ΓÑ½∞¡« óδ»«½¡Ñ¡¿Ñ¼ ß½«óá PAUSE ó »α«úαá¼¼Ñ »α«µÑßßá. Åα¿ ßΓáαΓÑ ÇßΓα«öÄÉÆá ¿¼ÑÑΓß∩ Γ«½∞¬« «ñ¿¡ »α«µÑßß MAIN. TASKS --- éδó«ñ¿Γß∩ ß»¿ß«¬ á¬Γ¿ó¡δσ »α«µÑßß«ó (ó «¬¡Ñ). THEN --- çáóÑαΦáÑΓ ßΓαπ¬Γπαδ π»αáó½Ñ¡¿∩ ó¿ñá IF ... THEN ¿ IF ... ELSE ... THEN. TIB --- addr ìá ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß ¡áτá½á ΓÑ¬ßΓ«ó«ú« íπΣÑαá, ¿ß»«½∞ºπÑ¼«ú« »α¿ óó«ñÑ óσ«ñ¡«ú« »«Γ«¬á ß ΓÑα¼¿¡á½á. TOGGLE addr b --- éδ»«½¡∩ÑΓ ½«ú¿τÑß¬πε «»Ñαáµ¿ε "êïê" ñ½∩ íá⌐Γá, αáß»«½«- ªÑ¡¡«ú« »« áñαÑßπ addr, ß 8-í¿Γ«óδ¼ º¡áτÑ¡¿Ñ¼ b. TONE n --- çáñá¡¿Ñ τáßΓ«Γδ ºóπτá¡¿∩ ºóπ¬«ó«ú« úÑ¡ÑαáΓ«αá. n - º¡áτÑ¡¿Ñ τáßΓ«Γδ ó âÑαµáσ. TRACE --- ¥áñá¡¿Ñ αÑª¿¼á Γαáßß¿α«ó¬¿ ß½«óá. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ TRACE name é ñá½∞¡Ñ⌐ΦÑ¼ »α¿ óδ»«½¡Ñ¡¿¿ ß½«óá name «¡« íπñÑΓ Γαáßß¿α«óáΓ∞ß∩. Æαáßß¿α«óáΓ∞ ¼«ª¡« Γ«½∞¬« ñó«ÑΓ«τÑτ¡δÑ «»αÑñÑ½Ñ¡¿∩. TRACE-OFF --- æ¡∩Γ¿Ñ αÑª¿¼á Γαáßß¿α«ó¬¿ ñó«ÑΓ«τÑτ¡«ú« «»αÑñÑ½Ñ¡¿∩. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ TRACE-OFF name TRAVERSE addr1 n --- addr2 Å« áñαÑßπ addr1 óδñáÑΓ áñαÑß ¡áτá½á (»α¿ n αáó¡«¼ -1) ¿½¿ áñαÑß ¬«¡µá (»α¿ n αáó¡«¼ 1) »«½∩ ¿¼Ñ¡¿ ó ºáú«½«ó¬Ñ ß½«óáα¡«⌐ ßΓáΓ∞¿. æ««ΓóÑΓßΓóÑ¡¡«, »α¿ n αáó¡«¼ -1 addr1 ºáñáÑΓ áñαÑß ¬«¡µá »«½∩ ¿¼Ñ¡¿, á »α¿ n αáó¡«¼ 1 - áñαÑß Ñú« ¡áτá½á. TRUE --- true è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ½«ú¿τÑß¬«¼π º¡áτÑ¡¿ε "¿ßΓ¿- ¡á" (true). ÅαÑñßΓáó½∩ÑΓß∩ 16-í¿Γ«óδ¼ ß½«ó«¼, ó ¬«Γ«α«¼ óßÑ αáºα∩ñδ αáó¡δ 1 (µÑ½«Ñ º¡áτÑ¡¿Ñ -1, ¿½¿, ó ΦÑßΓ¡áñ- µáΓ¿α¿τ¡«¼ ó¿ñÑ - FFFF). TYPE addr n --- éδó«ñ¿Γ ßΓα«¬π ß¿¼ó«½«ó ñ½¿¡«⌐ n íá⌐Γ«ó, ¡áτ¿¡áεΘπεß∩ ß áñαÑßá addr. é «Γ½¿τ¿Ñ «Γ óδó«ñá ß ¿ß»«½∞º«óá¡¿Ñ¼ EMIT ¡¿¬á¬¿Ñ ß¿¼ó«½δ ßΓα«¬¿ ¡Ñ «íαáíáΓδóáεΓß∩ ß»Ñµ¿á½∞- ¡δ¼ «íαáº«¼. U. u --- éδó«ñ¿Γ º¡áτÑ¡¿Ñ u ó ó¿ñÑ µÑ½«ú« τ¿ß½á íÑº º¡á¬á ó ß¿ß- ΓÑ¼Ñ ßτ¿ß½Ñ¡¿∩ ß ΓÑ¬πΘ¿¼ «ß¡«óá¡¿Ñ¼ BASE, ñ«»«½¡Ñ¡«Ñ ß»αáóá «ñ¡¿¼ »α«íÑ½«¼. U.R u n --- éδó«ñ¿Γ µÑ½«Ñ τ¿ß½« íÑº º¡á¬á u ß óδ¬½ετ¬«⌐ ó»αáó« ó¡πΓα¿ »«½∩ Φ¿α¿¡«⌐ n ß¿¼ó«½«ó íÑº ºáóÑαΦáεΘÑú« »α«íÑ½á. é ß½πτáÑ, Ñß½¿ ñ½∩ óδó«ñá τ¿ß½á u ¡Ññ«ßΓáΓ«τ¡« n »«º¿µ¿⌐, τ¿ß½« óδó«ñ¿Γß∩ »«½¡«ßΓ∞ε, íÑº πτÑΓá Σ«α¼áΓá n. U< u1 u2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ u1 ¼Ñ¡∞ΦÑ¼ u2 (u1 ¿ u2 - 16-αáºα∩ñ¡δÑ τ¿ß½a íÑº º¡á¬á), FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. U> u1 u2 --- f Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ TRUE »α¿ u1 í«½∞ΦÑ¼ u2 (u1 ¿ u2 - 16-αáºα∩ñ¡δÑ τ¿ß½a íÑº º¡á¬á), FALSE - ó »α«Γ¿ó¡«¼ ß½πτáÑ. UM* u1 u2 --- ud Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ π¼¡«ªÑ¡¿∩ ñóπσ 16-αáºα∩ñ¡δσ τ¿ßÑ½ íÑº º¡á¬á u1 ¿ u2 ó ó¿ñÑ 32-αáºα∩ñ¡«ú« τ¿ß½á íÑº º¡á¬á. UM/MOD ud u1 --- u2 u3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ «ßΓáΓ«¬ u2 ¿ τáßΓ¡«Ñ u3 «Γ ñÑ½Ñ¡¿∩ 32- αáºα∩ñ¡«ú« τ¿ß½á íÑº º¡á¬á ud ¡á 16-αáºα∩ñ¡«Ñ τ¿ß½« íÑº º¡á¬á u1. ÉÑºπ½∞ΓáΓδ u2 ¿ u3 »αÑñßΓáó½Ñ¡δ ó ó¿ñÑ 16- αáºα∩ñ¡δσ τ¿ßÑ½ íÑº º¡á¬á. UNSMUDGE --- ÄΓ¼ÑτáÑΓ »«ß½Ññ¡ÑÑ «»αÑñÑ½Ñ¡¡«Ñ ó ß½«óáαÑ ß½«ó« ¬á¬ ñ«ßΓπ»¡«Ñ »α¿ ß½«óáα¡«¼ »«¿ß¬Ñ. æ¼. Γá¬ªÑ SMUDGE. UNTIL f --- (run) | --- (sys) çáóÑαΦáÑΓ ßΓαπ¬Γπαπ π»αáó½Ñ¡¿∩ ó¿ñá BEGIN ... UNTIL. UP --- ÅÑαÑ¼ÑΘáÑΓ ¬παß«α ó ΓÑ¬πΘÑ¼ «¬¡Ñ ¡á «ñ¡π ßΓα«¬π óóÑασ íÑº ¿º¼Ñ¡Ñ¡¿∩ ú«α¿º«¡Γá½∞¡«⌐ »«º¿µ¿¿. Åα¿ ¡áσ«ªñÑ¡¿¿ ¬παß«αá ó óÑασ¡Ñ⌐ ßΓα«¬Ñ, ó ºáó¿ß¿¼«ßΓ¿ «Γ αÑª¿¼á »α«- Γ∩ª¬¿ (ß¼. SCROLL, SCROLL-OFF) «ßπΘÑßΓó½∩ÑΓß∩ ½¿í« »α«- Γ∩ª¬á ßΓα«¬ ó¡¿º, ½¿í« »ÑαÑó«ñ ¬παß«αá ó ¡¿ª¡εε ßΓα«¬π. UPDATE --- Å«¼ÑτáÑΓ »«ß½Ññ¡¿⌐ ßτ¿Γá¡¡δ⌐ ß ñ¿ß¬á í½«¬ (ß¼. BLOCK) »α¿º¡á¬«¼, «º¡áτáεΘ¿ε¼, τΓ« Ñú« ß«ñÑαª¿¼«Ñ íδ½« ¼«ñ¿Σ¿- µ¿α«óá¡«. ü½«¬¿, »«¼ÑτÑ¡¡δÑ ñá¡¡δ¼ »α¿º¡á¬«¼, áóΓ«¼áΓ¿- τÑß¬¿ ºá»¿ßδóáεΓß∩ ¡á ñ¿ß¬ »α¿ ¡Ñ«íσ«ñ¿¼«ßΓ¿ ¿ß»«½∞º«- óá¡¿∩ ºá¡¿¼áÑ¼«ú« ¿¼¿ íπΣÑαá ñ½∩ ßτ¿Γδóá¡¿∩ ñαπú¿σ í½«- ¬«ó, á Γá¬ªÑ »α¿ óδ»«½¡Ñ¡¿¿ «»Ñαáµ¿⌐ SAVE-BUFFERS ¿ FLUSH. USER n --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: n USER name æ«ºñáÑΓ »ÑαÑ¼Ñ¡¡πε ó «í½áßΓ¿ »«½∞º«óáΓÑ½∞ß¬¿σ »ÑαÑ¼Ñ¡- ¡δσ ß« ß¼ÑΘÑ¡¿Ñ¼ n «Γ ¡áτá½á «í½áßΓ¿. Åα¿ óδ»«½¡Ñ¡¿¿ name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñαÑß ñóπσíá⌐Γ¡«ú« ß½«óá. ìá- τá½∞¡«Ñ º¡áτÑ¡¿Ñ »«½∞º«óáΓÑ½∞ß¬¿σ »ÑαÑ¼Ñ¡¡δσ ¡Ñ «»αÑñÑ- ½Ñ¡«. îá¬ß¿¼á½∞¡« ñ«»πßΓ¿¼«Ñ ß¼ÑΘÑ¡¿Ñ n ºáó¿ß¿Γ «Γ αáº- ¼Ñαá «í½áßΓ¿ »«½∞º«óáΓÑ½∞ß¬¿σ »ÑαÑ¼Ñ¡¡δσ. USING --- æ¼Ñ¡á φ¬αá¡¡«ú« Σá⌐½á. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ USING [drive]filename[.filetype] ÆÑ¬πΘ¿⌐ φ¬αá¡¡δ⌐ Σá⌐½ ºá¬αδóáÑΓß∩, á π¬áºá¡¡δ⌐ Σá⌐½ ßΓá¡«ó¿Γß∩ ΓÑ¬πΘ¿¼ φ¬αá¡¡δ¼. àß½¿ Γ¿» Σá⌐½á ¡Ñ π¬áºá¡, ¿ΘÑΓß∩ Σá⌐½ Γ¿»á .SCR V! n x y --- Å«¼ÑΘáÑΓ º¡áτÑ¡¿Ñ n - ß¿¼ó«½ ß µóÑΓ«óδ¼¿ áΓα¿íπΓá¼¿ - ó »«º¿µ¿ε φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y). V-CONTRACT --- ô¼Ñ¡∞ΦáÑΓ αáº¼Ñα á¬Γ¿ó¡«ú« «¬¡á »« óÑαΓ¿¬á½¿ ¡á «ñ¡π ßΓα«¬π. ì¿ª¡∩∩ ßΓα«¬á «¬¡á πñá½∩ÑΓß∩, ¡¿ª¡∩∩ úαá¡¿µá ßñó¿úáÑΓß∩ ¡á «ñ¡π ßΓα«¬π óóÑασ. àß½¿ ΓÑ¬πΘá∩ óδß«Γá «¬¡á αáó¡á «ñ¡«⌐ ßΓα«¬Ñ, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«- ñ¿Γß∩. V-EXPAND --- ôóÑ½¿τ¿óáÑΓ αáº¼Ñα á¬Γ¿ó¡«ú« «¬¡á »« óÑαΓ¿¬á½¿ ¡á «ñ¡π ßΓα«¬π. é ¡¿ª¡Ñ⌐ τáßΓ¿ «¬¡á ñ«íáó½∩ÑΓß∩ ßΓα«¬á, ºá»«½- ¡Ñ¡¡á∩ »α«íÑ½á¼¿ ß ΓÑ¬πΘ¿¼¿ µóÑΓ«óδ¼¿ áΓα¿íπΓá¼¿, ¡¿ª- ¡∩∩ úαá¡¿µá «¬¡á ßñó¿úáÑΓß∩ ¡á «ñ¡π ßΓα«¬π ó¡¿º. àß½¿ ¡¿ª¡∩∩ úαá¡¿µá «¬¡á ß«ó»áñáÑΓ ß ¡¿ª¡Ñ⌐ ßΓα«¬«⌐ φ¬αá¡á, ¡¿¬á¬¿σ ñÑ⌐ßΓó¿⌐ ¡Ñ »α«¿ºó«ñ¿Γß∩. V@ x y --- n Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ n - ß¿¼ó«½ ß µóÑΓ«óδ¼¿ áΓα¿íπΓá¼¿ ¿º »«º¿µ¿¿ φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y). VARIABLE --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: VARIABLE name æ«ºñáÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, αÑºÑαó¿απ∩ ó »«½Ñ »áαá¼ÑΓα«ó 2 íá⌐Γá ñ½∩ σαá¡Ñ¡¿∩ 16-αáºα∩ñ¡«ú« º¡á- τÑ¡¿∩. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name ¡á ßΓÑ¬ »«¼ÑΘáÑΓß∩ áñ- αÑß ºáαÑºÑαó¿α«óá¡¡«⌐ «í½áßΓ¿ »á¼∩Γ¿. ìáτá½∞¡«Ñ º¡áτÑ- ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ αáó¡« ¡π½ε. VC! b x y --- Å«¼ÑΘáÑΓ ß¿¼ó«½ b ó »«º¿µ¿ε φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y). VC@ x y --- b Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ß¿¼ó«½ b ¿º »«º¿µ¿¿ φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y). VIDEO --- é¬½ετÑ¡¿Ñ ¿º«íαáªÑ¡¿∩ ¡á φ¬αá¡Ñ. VIDEO-ADDR x y --- n Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ º¡áτÑ¡¿Ñ n - ß¼ÑΘÑ¡¿Ñ ó ßÑú¼Ñ¡ΓÑ íπΣÑαá αÑúÑ¡Ñαáµ¿¿ ¿º«íαáªÑ¡¿∩ (ó¿ñÑ«ßÑú¼Ñ¡ΓÑ) »«º¿µ¿¿ φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y). VIDEO-OFF --- âáΦÑ¡¿Ñ ¿º«íαáªÑ¡¿∩ ¡á φ¬αá¡Ñ («Γ¬½ετÑ¡¿Ñ ó¿ñÑ«ß¿ú¡½á). VMOVE x1 y2 x2 y2 n --- ÅÑαÑßδ½¬á ßΓα«¬¿ ß¿¼ó«½«ó ¡á φ¬αá¡Ñ. (x1,x2) - ¬««αñ¿¡áΓδ ¡áτá½á ¿ßσ«ñ¡«⌐ ßΓα«¬¿, (x2,y2) - »«º¿µ¿∩ ó ¬«Γ«απε «ßπΘÑßΓó½∩ÑΓß∩ »ÑαÑßδ½¬á, n - ¬«½¿τÑßΓó« »ÑαÑßδ½áÑ¼δσ ß¿¼ó«½«ó. ÅÑαÑßδ½¬á «ßπΘÑßΓó½∩ÑΓß∩ ó ¡á»αáó½Ñ¡¿¿ ó«ºαáßΓá¡¿∩ áñαÑß«ó ó« óαÑ¼∩ óÑαΓ¿¬á½∞¡«ú« «íαáΓ¡«ú« σ«ñá ½πτá. îá¬ß¿¼á½∞¡á∩ ñ½¿¡á ßΓα«¬¿, »ÑαÑßδ½áÑ¼«⌐ íÑº »«¼Ñσ ¡á φ¬αá¡Ñ ("ß¡Ñú") ß«ßΓáó½∩ÑΓ «¬«½« 200 ß¿¼ó«½«ó. æ¼. Γá¬ªÑ VMOVE>. VMOVE> x1 y2 x2 y2 n --- ÅÑαÑßδ½¬á ßΓα«¬¿ ß¿¼ó«½«ó ¡á φ¬αá¡Ñ. (x1,x2) - ¬««αñ¿¡áΓδ ¡áτá½á ¿ßσ«ñ¡«⌐ ßΓα«¬¿, (x2,y2) - »«º¿µ¿∩ ó ¬«Γ«απε «ßπΘÑßΓó½∩ÑΓß∩ »ÑαÑßδ½¬á, n - ¬«½¿τÑßΓó« »ÑαÑßδ½áÑ¼δσ ß¿¼ó«½«ó. ÅÑαÑßδ½¬á «ßπΘÑßΓó½∩ÑΓß∩ ó ¡á»αáó½Ñ¡¿¿ πíδóá¡¿∩ áñαÑß«ó ó« óαÑ¼∩ óÑαΓ¿¬á½∞¡«ú« «íαáΓ¡«ú« σ«ñá ½πτá. îá¬ß¿¼á½∞¡á∩ ñ½¿¡á ßΓα«¬¿, »ÑαÑßδ½áÑ¼«⌐ íÑº »«¼Ñσ ¡á φ¬αá¡Ñ ("ß¡Ñú") ß«ßΓáó½∩ÑΓ «¬«½« 200 ß¿¼ó«½«ó. æ¼. Γá¬ªÑ VMOVE. VOC-LINK --- addr ÅÑαÑ¼Ñ¡¡á∩, ß«ñÑαªáΘá∩ áñαÑß »«½∩ ß½«óáα¡«⌐ ßó∩º¿ ñ½∩ »«ß½Ññ¡Ñú« ß«ºñá¡¡«ú« ß½«óáα∩. éßÑ ß½«óáα¿ ßó∩ºá¡δ ß »«¼«Θ∞ε π¬áºá¡¡«ú« »«½∩ ó ß»¿ß«¬ ñ½∩ «íÑß»ÑτÑ¡¿∩ »αá- ó¿½∞¡«ú« óδ»«½¡Ñ¡¿∩ «»Ñαáµ¿¿ FORGET »α¿ αáí«ΓÑ ß ¡Ñß- ¬«½∞¬¿¼¿ ß½«óáα∩¼¿. VOCABULARY --- Ä»αÑñÑ½∩εΘÑÑ ß½«ó«, ¿ß»«½∞ºπÑΓß∩ ó ó¿ñÑ: VOCABULARY name ö«α¼¿απÑΓ ß½«óáα¡πε ßΓáΓ∞ε, «»αÑñÑ½∩εΘπε ß½«óáα∞ ß ¿¼Ñ- ¡Ñ¼ name. Åα¿ óδ»«½¡Ñ¡¿¿ ß½«óá name π¬áºá¡¡δ⌐ ß½«óáα∞ »«ñ¬½ετáÑΓß∩ ¬ ΓÑ¬πΘÑ¼π ¬«¡ΓÑ¬ßΓπ ¿ »α«ß¼áΓα¿óáÑΓß∩ »Ñαóδ¼ »α¿ »«¿ß¬Ñ ß½«óáα¡δσ «»αÑñÑ½Ñ¡¿⌐. ä½∩ Γ«ú«, τΓ«- íδ »«ß½ÑñπεΘ¿Ñ «»αÑñÑ½Ñ¡¿∩ »«¼ÑΘá½¿ß∞ ó ΓαÑíπÑ¼δ⌐ ß½«- óáα∞, ¡Ñ«íσ«ñ¿¼« »«ß½Ñ »«ñ¬½ετÑ¡¿∩ ¬ ΓÑ¬πΘÑ¼π ¬«¡ΓÑ¬ßΓπ «íΩ∩ó¿Γ∞ Ñú« ß½«óáαÑ¼ »«»«½¡Ñ¡¿∩ (ß¼. DEFINITIONS). VOCS --- é «¬¡Ñ óδñáÑΓß∩ ß»¿ß«¬ óßÑσ ß½«óáαÑ⌐. æ½«óáα¿, ∩ó½∩εΘ¿Ñß∩ ΓÑ¬πΘ¿¼ ß½«óáαÑ¼ »«»«½¡Ñ¡¿∩ ¿ ΓÑ¬πΘ¿¼ ¬«¡ΓÑ¬ßΓ«¼, óδñÑ½∩εΓß∩ ó φΓ«¼ ß»¿ß¬Ñ µóÑΓ«¼. W-BRDCOL --- addr ÇñαÑß »«½∩ µóÑΓ«ó«ú« íá⌐Γá í«αñεαá (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-BRDTYPE --- addr ÇñαÑß »«½∩ Γ¿»á í«αñεαá (2 íá⌐Γá) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á (ß¼. W.bRDTYPE). W-HEIGHT --- addr ÇñαÑß »«½∩ óδß«Γδ «¬¡á (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-INF --- addr ÇñαÑß »«½∩ ñ«»«½¡¿ΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ (2 íá⌐Γá) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-INTCOL --- addr ÇñαÑß »«½∩ µóÑΓ«ó«ú« íá⌐Γá ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-LINK --- addr ÇñαÑß »«½∩ «¬«¡¡«⌐ ßó∩º¿ (2 íá⌐Γá) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-LX --- addr ÇñαÑß »«½∩ X-¬««αñ¿¡áΓδ ½Ñó«ú« óÑασ¡Ñú« πú½á (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-PROC --- addr ÇñαÑß »«½∩ »«½∞º«óáΓÑ½∞ß¬«⌐ »α«µÑñπαδ (2 íá⌐Γá) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-SAVEADDR --- addr ÇñαÑß »«½∩ ñ½∩ áñαÑßá «í½áßΓ¿ ß«σαá¡Ñ¡¿∩ (2 íá⌐Γá) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-UY --- addr ÇñαÑß »«½∩ Y-¬««αñ¿¡áΓδ ½Ñó«ú« óÑασ¡Ñú« πú½á (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-WIDTH --- addr ÇñαÑß »«½∩ Φ¿α¿¡δ «¬¡á (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-X --- addr ÇñαÑß »«½∩ X-¬««αñ¿¡áΓδ ¬παß«αá (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W-Y --- addr ÇñαÑß »«½∩ Y-¬««αñ¿¡áΓδ ¬παß«αá (1 íá⌐Γ) ó í½«¬Ñ π»αáó½Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W.BRDCOL --- color_byte Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘ¿⌐ µóÑΓ«ó«⌐ íá⌐Γ í«αñεαá á¬Γ¿ó- ¡«ú« «¬¡á. W.BRDTYPE --- n ÇñαÑß 8-íá⌐Γ«ó«⌐ Γáí½¿µδ »ßÑóñ«úαáΣ¿τÑß¬¿σ ß¿¼ó«½«ó, ¿ß»«½∞ºπÑ¼«⌐ ñ½∩ «Γα¿ß«ó¬¿ í«αñεαá á¬Γ¿ó¡«ú« «¬¡á. ìπ½Ñó«Ñ º¡áτÑ¡¿Ñ n «º¡áτÑΓ «ΓßπΓßΓó¿Ñ í«αñεαá. W.DY --- n Y-¬««αñ¿¡áΓá ¡¿ª¡Ñ⌐ ßΓα«¬¿ á¬Γ¿ó¡«ú« «¬¡á (ó¡πΓαÑ¡¡∩∩ «í½áßΓ∞ «¬¡á). W.DY' --- n Y-¬««αñ¿¡áΓá ¡¿ª¡Ñ⌐ úαá¡¿µδ á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ í«αñεαá. W.HEIGHT --- height Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε óδß«Γπ ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ á¬- Γ¿ó¡«ú« «¬¡á. W.HEIGHT' --- n éδß«Γá á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ ¡á½¿τ¿∩ í«αñεαá. W.INF --- n Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘÑÑ º¡áτÑ¡¿Ñ »«½∩ ñ«»«½¡¿ΓÑ½∞¡«⌐ ¿¡Σ«α¼áµ¿¿ á¬Γ¿ó¡«ú« «¬¡á. W.INTCOL --- color_byte Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘ¿⌐ µóÑΓ«ó«⌐ íá⌐Γ ó¡πΓαÑ¡¡Ñ⌐ «í- ½áßΓ¿ á¬Γ¿ó¡«ú« «¬¡á. W.LINK --- n ç¡áτÑ¡¿Ñ »«½∩ «¬«¡¡«⌐ ßó∩º¿ ñ½∩ á¬Γ¿ó¡«ú« «¬¡á. W.LX --- lx Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε x-¬««αñ¿¡áΓπ ½Ñó«ú« óÑασ¡Ñú« πú½á ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ á¬Γ¿ó¡«ú« «¬¡á. W.LX' --- n X-¬««αñ¿¡áΓá ½Ñó«⌐ úαá¡¿µδ á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ í«αñεαá. W.RX --- n X-¬««αñ¿¡áΓá »αáó«ú« ßΓ«½íµá á¬Γ¿ó¡«ú« «¬¡á (ó¡πΓαÑ¡¡∩∩ «í½áßΓ∞ «¬¡á). W.RX' --- n X-¬««αñ¿¡áΓá »αáó«⌐ úαá¡¿µδ á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ í«αñεαá. W.SAVEADDR --- n ÇñαÑß «í½áßΓ¿ ß«σαá¡Ñ¡¿∩ (ß¼ÑΘÑ¡¿Ñ ó ñ«»«½¡¿ΓÑ½∞¡«¼ ßÑú¼Ñ¡ΓÑ ö«αΓ-ß¿ßΓÑ¼δ, ß¼. SS, SD) ñ½∩ Σ¬Γ¿ó¡«ú« «¬¡á. W.SIZE' --- n Éáº¼Ñα ó íá⌐Γáσ «í½áßΓ¿ »á¼∩Γ¿, ΓαÑíπÑ¼«⌐ ñ½∩ ß«σαá¡Ñ¡¿∩ á¬Γ¿ó¡«ú« «¬¡á. W.UY --- uy Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε y-¬««αñ¿¡áΓπ ½Ñó«ú« óÑασ¡Ñú« πú½á ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ á¬Γ¿ó¡«ú« «¬¡á. W.UY' --- n Y-¬««αñ¿¡áΓá óÑασ¡Ñ⌐ úαá¡¿µδ á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ í«αñεαá. W.WIDTH --- width Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε Φ¿α¿¡π ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ á¬- Γ¿ó¡«ú« «¬¡á. W.WIDTH' --- n ÿ¿α¿¡á á¬Γ¿ó¡«ú« «¬¡á ß πτÑΓ«¼ ¡á½¿τ¿∩ í«αñεαá. W.X --- x Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε x-¬««αñ¿¡áΓπ ¬παß«αá ó á¬Γ¿ó- ¡«¼ «¬¡Ñ. è««αñ¿¡áΓá ºáñáÑΓß∩ «Γ¡«ß¿ΓÑ½∞¡« ½Ñó«ú« óÑασ- ¡Ñú« πú½á «¬¡á, Γá¬¿¼ «íαáº«¼ ÑÑ º¡áτÑ¡¿Ñ ¼«ªÑΓ ½ÑªáΓ∞ ó ñ¿á»áº«¡Ñ «Γ 0 ñ« width-1. W.Y --- y Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ ΓÑ¬πΘπε y-¬««αñ¿¡áΓπ ¬παß«αá ó á¬Γ¿ó- ¡«¼ «¬¡Ñ. è««αñ¿¡áΓá ºáñáÑΓß∩ «Γ¡«ß¿ΓÑ½∞¡« ½Ñó«ú« óÑασ- ¡Ñú« πú½á «¬¡á, Γá¬¿¼ «íαáº«¼ ÑÑ º¡áτÑ¡¿Ñ ¼«ªÑΓ ½ÑªáΓ∞ ó ñ¿á»áº«¡Ñ «Γ 0 ñ« height-1. WAIT --- Äª¿ñá¡¿Ñ ¡áªáΓ¿∩ ¬½áó¿Φ¿ ¡á ¬½áó¿áΓπαÑ. WARNING --- addr Å«½∞º«óáΓÑ½∞ß¬á∩ »ÑαÑ¼Ñ¡¡á∩, «»αÑñÑ½∩εΘá∩ Σ«α¼π óδó«ñá ñ¿áú¡«ßΓ¿τÑß¬¿σ ß««íΘÑ¡¿⌐ (ß¼. MESSAGE). WHILE f --- (run) | sys1 --- sys2 (compile) êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó ó¿ñÑ: BEGIN ... WHILE (tp) ... REPEAT é« óαÑ¼∩ ¿ß»«½¡Ñ¡¿∩ ß½«ó« WHILE »α«óÑα∩ÑΓ º¡áτÑ¡¿Ñ Σ½áúá f ¡á óÑαΦ¿¡Ñ ßΓÑ¬á. Åα¿ f «Γ½¿τ¡«¼ «Γ ¡π½∩ (TRUE) óδ»«½¡Ñ¡¿Ñ »α«ñ«½ªáÑΓß∩ ñ« ß½«óá REPEAT ß »«ß½ÑñπεΘ¿¼ ó«ºóαáΓ«¼ ¬ ¡áτá½π µ¿¬½á ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá ß½«ó«¼ BEGIN. é »α«Γ¿ó¡«¼ ß½πτáÑ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ ¡á ¬«ñ, αáß»«½«ªÑ¡¡δ⌐ ºá REPEAT. WINDOW lx uy w h --- (compile) | --- (run) Ä»αÑñÑ½Ñ¡¿Ñ «¬«¡¡«⌐ »α«µÑñπαδ. êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: lx uy width height WINDOW name ... ; ö«α¼¿απÑΓ ß½«óáα¡πε ßΓáΓ∞ε ß ¿¼Ñ¡Ñ¼ name, í½«¬ π»αáó½Ñ- ¡¿∩ «¬¡«¼ ¿ ΓÑ½« óδ»«½¡∩Ñ¼«⌐ ó «¬¡Ñ »α«µÑñπαδ. Åáαá¼ÑΓ- αδ αáß»«½«ªÑ¡¿∩ «¬¡á: (lx,uy) - (x,y)-¬««αñ¿¡áΓδ ½Ñó«ú« óÑασ¡Ñú« πú½á ó¡πΓαÑ¡¡Ñ⌐ τáßΓ¿ «¬¡á, width - Φ¿α¿¡á ó¡πΓαÑ¡¡Ñ⌐ τáßΓ¿ «¬¡á ó º¡á¬«»«º¿µ¿∩σ, height - óδß«Γá ó¡πΓαÑ¡¡Ñ⌐ τáßΓ¿ «¬¡á ó ßΓα«¬áσ. ÆÑ½« óδ»«½¡∩Ñ¼«⌐ ó «¬¡Ñ »α«µÑñπαδ ºáñáÑΓß∩ ó ó¿ñÑ, á¡á½«ú¿τ¡«¼ ñó«ÑΓ«τÑτ- ¡«¼π «»αÑñÑ½Ñ¡¿ε. Åα¿ óδ»«½¡Ñ¡¿¿ «»αÑñÑ½Ñ¡¡«ú« Γá¬¿¼ «íαáº«¼ ß½«óá name óßÑ »α«µÑñπαδ, ßó∩ºá¡¡δÑ ß óδó«ñ«¼ ¡á φ¬αá¡ ¿ »ÑαÑ¼ÑΘÑ¡¿Ñ¼ ¬παß«αá, αáí«ΓáεΓ Γ«½∞¬« ó αá¼- ¬áσ ñá¡¡«ú« «¬¡á. Å« ºáóÑαΦÑ¡¿¿ óδ»«½¡Ñ¡¿∩ ß½«óá ó«ß- ßΓá¡áó½¿óáÑΓß∩ ß«ñÑαª¿¼«Ñ ß¬αδΓ«⌐ ¡á óαÑ¼∩ Ñú« óδ»«½¡Ñ- ¡¿∩ «í½áßΓ¿ φ¬αá¡á. WORD c --- addr éó«ñ¿Γ ¿º óσ«ñ¡«ú« »«Γ«¬á ßΓα«¬π ß¿¼ó«½«ó, «úαá¡¿τÑ¡¡πε ß »αáó«ú« ¬«¡µá ß¿¼ó«½«¼ ß ASCII-¬«ñ«¼ c. éÑñπΘ¿Ñ óσ«ª- ñÑ¡¿∩ ß¿¼ó«½«ó c ¿ú¡«α¿απεΓß∩. éóÑñÑ¡¡á∩ ßΓα«¬á αáº¼Ñ- ΘáÑΓß∩ ó »á¼∩Γ¿ »« áñαÑßπ addr ó ó¿ñÑ »«ß½Ññ«óáΓÑ½∞¡«ß- Γ¿ ß¿¼ó«½«ó, ¡áτ¿¡áεΘÑ⌐ß∩ ß íá⌐Γá, ß«ñÑαªáΘÑú« ¬«½¿- τÑßΓó« ß¿¼ó«½«ó ó ßΓα«¬Ñ, ¿ ñ«»«½¡Ñ¡¡«⌐ ß»αáóá ß¿¼ó«½«¼ "»α«íÑ½", ¡Ñ πτ¿ΓδóáεΘÑ¼ß∩ ó íá⌐ΓÑ ñ½¿¡δ. é ß½πτáÑ, Ñß- ½¿ «úαá¡¿τ¿ΓÑ½∞ ó« óσ«ñ¡«¼ »«Γ«¬Ñ ¡á⌐ñÑ¡, ó »ÑαÑ¼Ñ¡¡πε >IN ºá¡«ß¿Γß∩ »«º¿µ¿∩ ß¿¼ó«½á ¿º óσ«ñ¡«ú« »«Γ«¬á, ß½Ñ- ñπεΘÑú« ¡Ñ»«ßαÑñßΓóÑ¡¡« ºá «úαá¡¿τ¿ΓÑ½Ñ¼. æ¿¼ó«½ ß ¡π- ½Ñóδ¼ ¬«ñ«¼ ó« óσ«ñ¡«¼ »«Γ«¬Ñ óßÑúñá αáßß¼áΓα¿óáÑΓß∩ ß½«ó«¼ WORD ¬á¬ «úαá¡¿τ¿ΓÑ½∞ óó«ñ¿¼«⌐ ßΓα«¬¿. ç¡áτÑ¡¿Ñ »ÑαÑ¼Ñ¡¡«⌐ #TIB ¡Ñ ¿º¼Ñ¡∩ÑΓß∩. WORDS --- éδñáÑΓ ß»¿ß«¬ ß½«óáα¡δσ «»αÑñÑ½Ñ¡¿⌐, ¿¼ÑεΘ¿σß∩ ó ß½«óá- α∩σ, ó¬½ετÑ¡¡δσ ó ΓÑ¬πΘ¿⌐ ¬«¡ΓÑ¬ßΓ. ä½∩ ¬áªñ«ú« «»αÑñÑ- ½Ñ¡¿∩ óδñáεΓß∩ Ñú« ¿¼∩ NAME, áñαÑß »«½∩ ¿¼Ñ¡¿ NFA, áñ- αÑß »«½∩ ßó∩º¿ LFA, áñαÑß »«½∩ ¬«ñá (áñαÑß ¬«¼»¿½∩µ¿¿) CFA ¿ áñαÑß »«½∩ »áαá¼ÑΓα«ó PFA. ÉÑá½¿º«óá¡« ó ó¿ñÑ «¬«¡¡«⌐ »α«µÑñπαδ. WRITE handle_pars bytes buf --- bytes_written 0 --- status (error) çá»¿ß∞ ó Σá⌐½ ¿½¿ ¡á πßΓα«⌐ßΓó«. àß½¿ ºá»¿ß∞ »α«¿ºó«ñ¿Γß∩ ¡á ßΓá¡ñáαΓ¡«Ñ πßΓα«⌐ßΓó« óδó«ñá (STD-OUTPUT), Γ« óδó«ñ ¼«ªÑΓ íδΓ∞ »ÑαÑ«»αÑñÑ½Ñ¡. àß½¿ τ¿ß½« bytes_written «Γ½¿τáÑΓß∩ «Γ bytes, Γ« φΓ« ñ«½ª¡« αáßß¼áΓα¿óáΓ∞ß∩ ¬á¬ «Φ¿í¬á; »α¿τ¿¡«⌐ φΓ«ú« ß¬«αÑÑ óßÑú« ¼«ªÑΓ íδΓ∞ «ΓßπΓßΓó¿Ñ ßó«í«ñ¡«ú« »α«ßΓαá¡ßΓóá ¡á ñ¿ß¬Ñ ñ½∩ ºá»¿ßδóáÑ¼«ú« Σá⌐½á. White --- 7 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ íÑ½«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. XOR n1 n2 --- n3 Å«¼ÑΘáÑΓ ¡á ßΓÑ¬ αÑºπ½∞ΓáΓ n3 »«í¿Γ¡«ú« óδ»«½¡Ñ¡¿∩ ½«- ú¿τÑß¬«⌐ «»Ñαáµ¿¿ "êæèï₧ùÇ₧Öàà êïê" ñ½∩ ñóπσ 16-αáºα∩ñ- ¡δσ º¡áτÑ¡¿⌐ n1 ¿ n2. Yellow --- 14 è«¡ßΓá¡Γá, ß««ΓóÑΓßΓóπεΘá∩ ªÑ½Γ«¼π µóÑΓπ »α¿ óδó«ñÑ ¡á µóÑΓ¡«⌐ ñ¿ß»½Ñ⌐. [ --- ôßΓá¡áó½¿óáÑΓ αÑª¿¼ ¿¡ΓÑα»αÑΓáµ¿¿, ºáñáÑΓ º¡áτÑ¡¿Ñ »Ñ- αÑ¼Ñ¡¡«⌐ STATE αáó¡δ¼ FALSE. ['] --- addr (run) | --- (compile) êß»«½∞ºπÑΓß∩ ó ó¿ñÑ: ['] name è«¼»¿½¿απÑΓ áñαÑß »«½∩ ¬«ñá ß½«óá name ¬á¬ τ¿ß½«ó«⌐ ½¿ΓÑαá½, »«¼ÑΘáÑ¼δ⌐ ¡á ßΓÑ¬ ó« óαÑ¼∩ ¿ß»«½¡Ñ¡¿∩. Åα¿ «ΓßπΓßΓó¿¿ ß½«óá name ó ß½«óáαÑ ó«º¡¿¬áÑΓ «Φ¿í«τ¡á∩ ß¿Γπáµ¿∩. [COMPILE] --- êß»«½∞ºπÑΓß∩ ó ñó«ÑΓ«τÑτ¡δσ «»αÑñÑ½Ñ¡¿∩σ ó ó¿ñÑ: [COMPILE] name è«¼»¿½¿απÑΓ ß½«ó« name, »«¼ÑτÑ¡¡«Ñ »α¿º¡á¬«¼ ¡Ñ¼Ññ½Ñ¡¡«ú« ¿ß»«½¡Ñ¡¿∩ IMMEDIATE, ó Σ«α¼¿απÑ¼πε ß½«óáα¡πε ßΓáΓ∞ε. [HW] --- Éáí«τÑÑ «¬¡« ö«αΓ-ß¿ßΓÑ¼δ. [MESSAGE] --- Éáí«τÑÑ «¬¡« ö«αΓ-ß¿ßΓÑ¼δ, ß«ñÑαªáΘÑÑ óδó«ñ ¿ñÑ¡Γ¿Σ¿¬áΓ«αá ß¿ßΓÑ¼δ ¿ ºá»πß¬ «ß¡«ó¡«ú« ¿¡ΓÑα»αÑΓáΓ«αá. [SCREEN] --- Éáí«τÑÑ «¬¡« ö«αΓ-ß¿ßΓÑ¼δ - «ß¡«ó¡«⌐ ¿¡ΓÑα»αÑΓáΓ«α. ] --- ôßΓá¡áó½¿óáÑΓ αÑª¿¼ ¬«¼»¿½∩µ¿¿, ºáñáÑΓ º¡áτÑ¡¿Ñ »ÑαÑ- ¼Ñ¡¡«⌐ STATE αáó¡δ¼ TRUE. gotoxy x y --- ôßΓá¡áó½¿óáÑΓ ¬παß«α ó »«º¿µ¿ε φ¬αá¡á ß ¬««αñ¿¡áΓá¼¿ (x,y) «Γ¡«ß¿ΓÑ½∞¡« ½Ñó«ú« óÑασ¡Ñú« πú½á ó¡πΓαÑ¡¡Ñ⌐ «í½áßΓ¿ á¬Γ¿ó¡«ú« «¬¡á. é «Γ½¿τ¿Ñ «Γ ß½«óá GOTOXY ñ«»πß¬áÑΓß∩ πßΓá¡«ó¬á ¬παß«αá ó »α«¿ºó«½∞¡πε »«º¿µ¿ε φ¬αá¡á, ó τácΓ¡«ßΓ¿, ¡á í«αñεαÑ ¿½¿ ó¡Ñ «¬«¡¡«⌐ «í½áßΓ¿. ok --- éδó«ñ¿Γ »α¿ú½áΦÑ¡¿Ñ ö«αΓ-¿¡ΓÑα»αÑΓáΓ«αá "«¬". video-io dx cx bx ax --- dx cx bx ax ÄíαáΘÑ¡¿Ñ ¬ íáº«ó«⌐ ß¿ßΓÑ¼Ñ óó«ñá-óδó«ñá (BIOS) ñ½∩ αáí«Γδ ß ñ¿ß»½ÑÑ¼ (»αÑαδóá¡¿Ñ 10H). Çαúπ¼Ñ¡Γδ ¿ αÑºπ½∞ΓáΓδ ß««ΓóÑΓßΓóπεΓ º¡áτÑ¡¿∩¼ αÑú¿ßΓα«ó DX, CX, BX ¿ AX »α¿ «íαáΘÑ¡¿¿ ¬ »αÑαδóá¡¿ε ¿ »α¿ óδσ«ñÑ ¿º ¡Ñú«.