‫ﻛﺸﻖ اﻟﻜﺮب ﺑﺒﺮﺷﺎﻣﮫ اﻻﺗﻮﻟﯿﺴﺐ‬

‫ﻟﺘﺤﻮﯾﻞ اﻟﻨﺺ اﻟﻰ رﻗﻢ ﺣﻘﯿﻘﻲ‬

‫‪WWW.AMRSELIM.NET‬‬

‫‪atof‬‬

‫ﺗﻌﺮﯾﻒ اﻟﺪاﻟﺔ‬

‫)(اﺳﻢ اﻟﺪاﻟﺔ‪defun c:‬‬

‫ﻟﺘﺤﻮﯾﻞ اﻟﻨﺺ اﻟﻰ رﻗﻢ ﻃﺒﯿﻌﻲ‬

‫‪atoi‬‬

‫ﻟﻠﺘﺄﻛﺪ ھﻞ اﻟﻨﺎﺗﺞ ﺻﻔﺮ ام ﻻ‬

‫‪zerop‬‬

‫ﻟﺘﺤﻮﯾﻞ اﻟﺮﻗﻢ اﻟﻰ ﻧﺺ‬

‫‪rtos‬‬

‫ﺗﻌﻄﻲ اﻟﻘﯿﻤﺔ اﻻﺳﯿﮫ‬

‫‪exp‬‬

‫اﻟﺘﺤﻮﯾﻞ ﻣﻦ وﺣﺪة اﻟﻰ وﺣﺪة اﺧﺮى‬

‫‪cvunit‬‬

‫ﻣﺘﻤﻢ اﻟﻌﺪد‬

‫~‬

‫ﺗﻌﻄﯿﻨﺎ ﻧﻮع اﻟﻤﺘﻐﯿﺮ‬

‫‪TYPE‬‬

‫اﻟﺮﻗﻢ اﻻﻛﺒﺮ‬

‫‪MAX‬‬

‫اﻇﮭﺎر رﺳﺎﻟﮫ ﻋﻠﻰ ﺳﻄﺮ اﻻواﻣﺮ‬

‫‪princ‬‬

‫اﻟﺮﻗﻢ اﻻﺻﻐﺮ‬

‫‪MIN‬‬

‫اﻇﮭﺎر رﺳﺎﻟﮫ ﻟﻠﻤﺴﺘﺨﺪم‬

‫‪ALERT‬‬

‫اﻟﻤﺘﺒﻘﻲ ﻣﻦ اﻟﻘﺴﻤﺔ‬

‫‪REM‬‬

‫ﻻﻋﻄﺎء اواﻣﺮ اﻻﺗﻮﻛﺎد‬

‫‪COMMAND‬‬

‫ﺗﻘﺮﯾﺐ ﻻﻗﺮب ﻋﺪد ﺻﺤﯿﺢ و اﻟﻐﺎء اﻟﻜﺴﻮر‬

‫‪FIX‬‬

‫ﻟﺘﺤﻤﯿﻞ ﻣﻠﻒ‬

‫‪LOAD‬‬

‫ﺗﺤﻮل اﻟﻌﺪد اﻟﻰ ﻛﺴﺮ‬

‫‪FLOAT‬‬

‫ﺗﺤﺪﯾﺪ ﻗﯿﻤﺔ ﻟﻤﺘﻐﯿﺮ‬

‫‪setq‬‬

‫اﯾﺠﺎد اﻟﻠﻮﻏﺮﯾﺘﻢ‬

‫‪LOG‬‬

‫ﻟﺘﺤﺪﯾﺪ ﻧﻘﻄﺔ‬

‫‪getpoint‬‬

‫اﻟﺠﺬر اﻟﺘﺮﺑﯿﻌﻲ‬

‫‪SQRT‬‬

‫ﯾﺴﺘﺨﺪم ﻟﻤﻌﺮﻓﮫ اﻟﻤﺴﺎﻓﺔ ﺑﯿﻦ ﻧﻘﻄﺘﯿﻦ‬

‫‪getdist‬‬

‫ﺟﺎ اﻟﺰاوﯾﺔ‬

‫‪sin‬‬

‫ﯾﺴﺘﺨﺪم ﻟﻤﻌﺮﻓﮫ اﻟﻤﺴﺎﻓﺔ ﺑﯿﻦ ﻧﻘﻄﺘﯿﻦ‬

‫‪distance‬‬

‫ﺟﺘﺎ اﻟﺰاوﯾﺔ‬

‫‪cos‬‬

‫ﻟﻠﺤﺼﻮل ﻋﻠﻰ رﻗﻢ ﺻﺤﯿﺢ ﻣﻦ اﻟﻤﺴﺘﺨﺪم‬

‫‪getint‬‬

‫ﻇﻞ اﻟﺰاوﯾﺔ‬

‫‪atan‬‬

‫ﻟﻠﺤﺼﻮل ﻋﻠﻰ اي رﻗﻢ ﺻﺤﯿﺢ او ﻛﺴﺮ‬

‫‪getreal‬‬

‫اﻟﺰاوﯾﺔ‬

‫‪angle‬‬

‫ﻟﻠﺤﺼﻮل ﻋﻠﻰ ﻧﺺ ﻣﻦ اﻟﻤﺴﺘﺨﺪم‬

‫‪getstring‬‬

‫اﻟﺮﻗﻢ اﻟﻤﻌﻄﻰ ﺳﺎﻟﺐ ام ﻻ‬

‫‪minusp‬‬

‫اﻋﻄﺎء رﻗﻢ اﻻﺳﻜﻲ ﻟﻠﺤﺮف‬

‫‪ascii‬‬

‫ﻧﻘﻄﺔ ﺗﻼﻗﻲ ارﺑﻊ ﻧﻘﻂ‬

‫‪inters‬‬

‫اﻋﻄﺎء اﻟﺤﺮف اﻟﻤﻘﺎﺑﻞ ﻟﺮﻗﻢ اﻻﺳﻜﻲ‬

‫‪chr‬‬

‫ﻻ ﯾﺴﺎوي‬

‫=‪/‬‬

‫و ﺗﻌﻄﻲ ‪ nil‬اذا ﻛﺎن ﺳﻠﺴﻠﮫ و ‪ t‬اذا ﻟﻢ ﯾﻜﻦ‬

‫‪atom‬‬

‫اﻟﺴﻠﺴﻠﺘﯿﻦ ﻣﺘﺴﺎوﯾﯿﻦ ام ﻻ‬

‫‪eq‬‬

‫ﺗﺨﺒﺮﻧﻲ ﺑﺎﻟﻘﯿﻤﺔ اﻟﻤﺴﺠﻠﺔ ﻓﻲ اﻟﻤﺘﻐﯿﺮ‬

‫‪eval‬‬

‫ﻣﻘﺎرﻧﺔ ﺑﯿﻦ ﺳﻠﺴﻠﺘﯿﻦ‬

‫‪equal‬‬

‫ﺗﺠﻌﻞ اﻟﺤﺮوف ﻛﺒﯿﺮة‬

‫‪quote‬‬

‫ﻻﻇﮭﺎر ﻋﺪد ﻣﻌﯿﻦ ﻣﻦ اﻻﺣﺮف ﻣﻦ ﺳﻠﺴﻠﮫ ﻧﺼﯿﺔ‬

‫‪SUBSTR‬‬

‫اﻋﻄﺎء ﻗﯿﻤﮫ ﻟﻤﺘﻐﯿﺮ اﻻﺗﻮﻛﺎد‬

‫‪setvar‬‬

‫ﺗﻀﻢ ﺟﻤﻠﺘﯿﻦ ﻓﻲ ﺟﻤﻠﺔ واﺣﺪة‬

‫‪strcat‬‬

‫اﻟﺤﺼﻮل ﻋﻠﻰ ﻗﯿﻤﺔ ﻣﺘﻐﯿﺮ اﻻﺗﻮﻛﺎد‬

‫‪getvar‬‬

‫ﻋﺮض اول رﻗﻢ ﻓﻲ اﻟﺴﻠﺴﻠﺔ‬

‫‪car‬‬

‫ﺗﻌﻄﯿﻨﺎ ﺑﯿﺎﻧﺎت ﻋﻦ أﺧﺮ ﻋﻨﺼﺮ‬

‫‪entlast‬‬

‫ﻋﺮض ﺛﺎﻧﻲ رﻗﻢ ﻓﻲ اﻟﺴﻠﺴﻠﺔ‬

‫‪cadr‬‬

‫ﺑﺤﻔﻆ اﻟﻌﻨﺎﺻﺮ اﻟﺘﻰ ﯾﺤﺪدھﺎ اﻟﻤﺴﺘﺨﺪم‬

‫‪ssget‬‬

‫ﻋﺮض ﺛﺎﻟﺚ رﻗﻢ ﻓﻲ اﻟﺴﻠﺴﻠﺔ‬

‫‪caddr‬‬

‫ﯾﺤﺪد ﻧﻘﻄﺔ ﺑﻨﺎء ﻋﻠﻰ ﻧﻘﻄﺔ اﺧﺮى و اﻟﺰاوﯾﺔ‬

‫‪polar‬‬

‫ﻋﺮض اﻟﺴﻠﺴﻠﺔ ﺑﺪون اﻟﺮﻗﻢ اﻻول‬

‫‪cdr‬‬

‫اﻟﻤﺘﻐﯿﺮ او اﻟﻤﻌﻄﻰ ﺑﮫ ﻗﯿﻤﺔ ام ﻻ‬

‫‪AND‬‬

‫ﻋﺮض ﻋﻨﺼﺮ ﻣﻌﯿﻦ ﻣﻦ اﻟﺴﻠﺴﻠﺔ اﻟﺮﻗﻤﯿﺔ‬

‫‪nth‬‬

‫و ﺗﻌﻄﯿﻨﺎ اﺳﻤﺎء ‪ arx‬اﻟﻤﺤﻤﻠﺔ ﺣﺎﻟﯿﺎ‬

‫‪arx‬‬

‫اﺿﺎﻓﺔ ﻋﻨﺼﺮ ﻻول اﻟﻘﺎﺋﻤﺔ‬

‫‪cons‬‬

‫ﻟﺘﺤﻤﯿﻞ ﻣﻠﻒ ‪arxload‬‬

‫‪arxload‬‬

‫ﺗﻨﻔﯿﺬ داﻟﺔ ﻣﻌﯿﻨﺔ ﻋﻠﻰ اﻟﺴﻠﺴﻠﺔ اﻟﺤﺮﻓﯿﺔ‬

‫‪apply‬‬

‫ﻻﻟﻐﺎء ﺗﺤﻤﯿﻞ ﻣﻠﻒ ‪arx‬‬

‫‪arxunload‬‬

‫ﺗﻀﻢ اﻟﺴﻼﺳﻞ اﻟﺮﻗﻤﯿﺔ ﻓﻲ ﺳﻠﺴﻠﺔ واﺣﺪة‬

‫‪append‬‬

‫ھﻞ ﯾﺤﺘﻮي اﻟﻌﻨﺼﺮ ﻋﻠﻰ ﻗﯿﻤﺔ ام ﻻ‬

‫‪boundp‬‬

‫ﻋﻜﺲ اﻟﺴﻠﺴﻠﺔ اﻟﺮﻗﻤﯿﺔ‬

‫‪reverse‬‬

‫ﻟﻮﺿﻊ ﺷﺮط ﻋﻠﻰ ﺣﺪث‬

‫‪if‬‬

‫ھﻞ اﻟﻌﻨﺼﺮ اﻟﻤﻌﻄﻰ ﺳﻠﺴﻠﺔ رﻗﻤﯿﺔ ام ﻻ‬

‫‪listp‬‬

‫ﺗﻜﺮار ﻋﻤﻠﯿﮫ ﻣﻌﯿﻨﺔ ﻋﺪد ﻣﻌﯿﻦ ﻣﻦ اﻟﻤﺮات‬

‫‪Repeat‬‬

‫ﻋﺪد ﺣﺮوف اﻟﺠﻤﻠﺔ‬

‫‪strlen‬‬

‫اﻓﻌﻞ ﺷﺊ ﻣﺎ ﺣﺘﻰ ﯾﺤﺪث ﺣﺪث ﻣﻌﯿﻦ‬

‫‪While‬‬

‫ﻟﻠﺸﺮح ‪ :‬ﺣﻤﻞ ﻛﺘﺎب ﺷﺮح اﻻﺗﻮﻟﯿﺴﺐ ﻣﻦ‬

‫و ھﻲ ﺗﺮﺗﺐ اﻟﺴﻼﺳﻞ اﻟﺤﺮﻓﯿﺔ ﺗﺮﺗﯿﺒﺎ اﺑﺠﺪﯾﺎً‬

‫‪acad_strlsort‬‬

‫‪www.amrselim.net‬‬