ايران ويج

نسخه‌ی کامل: برعکس کردن متغیر
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
با سلام من یه متغیر دارم مثلا 00000101 بخوام تو بسکام برعکسش کنم که این طوری بشه : 10100000 باید چی کار کنم؟
یا مثل این : 00000001 تبدیل بشه به 10000000

با تشکر.
مهندس خوب اول بریز تو متغیر دیگه و بعدش بیت 7 رو برابر بیت صفر قرار بده و بیت 6 رو برابر بیت 1 و .... !!!
این رو میدونم ولی تابعی برای این کار وجود نداره؟

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




کد:
Sub mirror:
Do

Incr counter
Select case byte:

Case is>128:
A=1
byte= byte -128

Case is>64:
B=2
byte = byte -64

Case is>32:
C=4
byte = byte -32

Case is>16:
d=8
byte = byte -16

Case is>8:
E=16
byte = byte -8

Case is>4:
F=32
byte = byte -4

Case is>2:
G=64
byte = byte -2

Case is>0:
h=128


End select
Loop until counter = 8

A=a + b + c + d + e + f +g + h
Counter =0

End sub
چقدر تابع بزرگی شد ایلگار جوون !

کد php:
Dim B As Byte As Byte

B

= &B00000111

B.0 
C.7 B.1 C.6 B.2 C.5 B.3 C.4
B.4 
C.3 B.5 C.2 B.6 C.1 B.7 C.0 
درسته
راستش همشو کپی پیست کردم و اصلاً احساس نکردم که برنامه بزرگ شد

چون تو پست قبلی گفته بودن اون روش بیتی رو میدونن راستش اصلاًروش فکر نکردم
تو کدویژن که مطمئنم کتابخونه داره، اما یادم نمیاد که چی بود !!!
از دستور toggle استفاده کنید
دستور تاگل تک بیتیه و باز میشه همون دستکاریه بیت به بیت