سوال:برعکس کردن متن

[Aref_Alikhani]

سلام
تو این سه; چهار روز که نبودم ببین چه خبر شده...دیشب که اومدم نشستم کل پست ها رو خوندم فکر کنم حدود 20 تایی میشد...
خُب بریم سراغ اصل مطلب!!!
دوستان می خواستم بدونم میشه یه اسکریپت نوشت که متنی رو که ما بهش دادیم برعکس کنه؟
برای مثال:

This forum is a best place for learn MMB​

​

بشه اینجوری:

MMB learn for place best a is forum This​

​

 

[Majid73]

فکر نمی کنم ولی یه بار این طور سوالی به ذهن من هم رسید دوباره روش کار می کنم ببینم چی میشه

 

[nevercom]

[FONT=Courier New][SIZE=2]NewString$ = [COLOR=#800000]''[/COLOR] 
String$ = [COLOR=#800000]'This forum is a best place for learn MMB'[/COLOR] 
ReplaceThis$ = [COLOR=#000090][B]CHR[/B][/COLOR]([COLOR=#ff0000]32[/COLOR]) 
Delimiter$ = [COLOR=#000090][B]CHR[/B][/COLOR]([COLOR=#ff0000]31[/COLOR]) 
Array$ = [COLOR=#000090][B]StrChange[/B][/COLOR](String$,ReplaceThis$,Delimiter$) + Delimiter$ 
Num = [COLOR=#000090][B]GetArrayNum[/B][/COLOR](Array$,Delimiter$) 
[COLOR=#0000ff]For[/COLOR] i=Num [COLOR=#0000ff]To[/COLOR] [COLOR=#ff0000]1[/COLOR] 
  Item$ = [COLOR=#000090][B]GetArrayItem[/B][/COLOR](Array$,Delimiter$,i) 
  NewString$ = NewString$ + ReplaceThis$ + Item$ 
[COLOR=#0000ff]Next[/COLOR] i 
[COLOR=#000090][B]Message[/B][/COLOR]("NewString$","")[/SIZE][/FONT]

که در اینجا (CHR(32 کد اسکی کاراکتر Space هست و (CHR(31 یک جداساز (Delimiter) برای آرایه هست که چون مقادیر 0 تا 32 در جدول ASCII کاراکترهای قابل نمایش نیستند و هیچ معرف گرافیکیی ندارند، این مقدار رو انتخاب کردم تا احیاناً تداخلی در آرایه پیش نیاد.

 

[BEHESHT]

ماشاالله لاحول و لا قوت الا بالله العلی العظیم.

واقعا ماشا الله داره بهتون تبریک می گم آقا محمد

واقعا اگر ماشاالله نمی گفتم عذاب وجدان می گرفتم

از بس که این ماهرانه بود.

یا حق
با حق
تا حق

 

[Aref_Alikhani]

سلام
محمد جان فوق العاده بود...من که خیلی خوشحال شدم از این همه استعداد وافر شما و دیگر دوستانی که در خدمتشون هستم....
به قول آقا پوریا اگه تنها به دکمه تشکر بسنده می کردم عذاب وجدان می گرفتم!!!
امیدوارم همچنان پله های ترقی را پیمایید....

چند روز بود که حال هیچ کاری رو نداشتم اما وقتی دیدم که میشه این کار رو کرد خیلی خوشحال شدم و یک نیروی مضاعف گرفتم...اینو خیلی جدی و از صمیم قلب دارم عرض می کنم....خیلی خوشحالم کردی

ارادتمند شما:عارف