تعریف و کار با متغیرهای عددی
افزایش یک واحدی متغیر در زبان بیسیک BASIC
1 |
INCR VAR |
در زبان برنامه نویسی BASIC یک واحد به متغییر var اضافه می کند.
1 2 3 4 |
Dim a as byte Incra a , a=1 End ,end program |
کاهش یک واحدی متغیر در زبان بیسیک BASIC
1 |
DECR VAR |
در زبان برنامه نویسی BASIC یک واحد از متغییر var کم می کند.
1 2 3 4 5 |
DIM A AS BYTE A=46 DECR A ,A=45 END ,END PROGRAM |
چرخش بیت های یک متغیر در زبان بیسیک BASIC
1 |
ROTATE VAR,LEFT/RIGHT [,SHIFT] |
بیت های متغییر VAR به سمت راست یا چپ چرخش می کند.
SHIFT: تعدادی چرخش را معیین می کند. (اختیاری)
LEFT/RIGHT: راست گرد یا چپ گرد شدن بیت ها
1 2 3 4 5 6 |
DIM A AS BYTE A= &B 10010 ROTATE A , RIGHT ,A= &B01001 ROTATE A , RIGHT.2 ,A= &B01010 END ,END PROGRAM |
استخراج از جدول داده در زبان بیسیک BASIC
1 |
VAR= LOOKUP (VALUE , LABEL) |
در صورتی که بخواهید از یک جدول که از مقادیر مختلف تشکیل شده مقداری را فراخوانی کنید از این دستور استفاده کنید. برای ساخت جدول باید در خط پایانی برنامه با نوشتن یک LABLE برای نام جدول و DATA برای شروع اعداد اقدام کنید.
LABEL : نام یا بر چسب جدول
VALUE: شماره اعداد جدول ( عدد 0 اولین مقدار جدول را فرا خوانی می کند)
نکته: اعداد جدول تنها می تواند تا مقدار 255 داشته باشد و در صورتی که بعد از هر عدد در جدول علامت % قرار دهید می توانید مقادیر را تا 65535 افزایش دهید.
1 2 3 4 5 6 7 8 9 10 11 |
DIM A AS BYTE , B AS INTEGER . C AS BYTE A=LOOKUP (I,ALI) ,A=36 B=LOOKUP (0.LDR) ,B=1000 C=3 B=LOOKUP (C,LDR) ,B=700 END ALI: DATA 29.36.40.7 LDR: DATA 1000% , 4000% , 2890% , 700% , 40% |
برگرداندن مقدار LSB یک متغیر در زبان بیسیک BASIC
1 |
VAR2= LOW (VAR) |
مقدار LSB متغییر VAR1 را در متغییر VAR2 قرار می دهد.
1 2 3 4 5 6 |
DIM A AS BYTE DIM S AS BYTE A= &B1011 B= LOW (A) ,B=&B11 END |
برگرداندن مقدار MSB یک متغیر در زبان بیسیک BASIC
1 |
VAR2= HIGH ( VAR1) |
مقدار MSB متغییر VAR1 را در متغییر VAR2 قرار می دهد.
1 2 3 4 5 6 |
DIM A AS BYTE DIM S AS BYTE A= &B1011 B=HIGH (A) ,B=&B10 END |
جابجایی مقدار دو متغیر در زبان بیسیک BASIC
1 |
SWAP ( VAR1 , VAR2 ) |
نکته: این دستور هم برای متغییرهای عددی و هم رشته ای کاربرد دارد.
1 2 3 4 5 6 7 |
DIM A AS SINGLE DIM B AS BYTE A=2 B=50 SWAP(A,B) ,A=50 , B=2 END , END PROGRAM |