در بسکام، ذخیره متغیر Integer در متغیر Byte

[shahriar]

سلام

در بسکام
من یک متغیر Integer دارم که می خوام رقم یکانش رو در یک متغیر بایت و بقیه ارقامش رو در در یک متغیر بایت دیگه بریزم مثلا اگر T =293 باشه، می خوام 29 رو بریزم تو یک متغیر و 3 رو بریزم تو یک متغیر دیگه، در واقع کد زیر

temperature_integer = T / 10
temperature_decimal = T Mod 10

ولی با اینکه موقع کامپایل ارور نمی ده ولی به نظر میرسه مشکل داره از کجا فهمیدم از اینکه
1- شما همین دو خط بالا رو در بسکام بنویسین و شبیه سازی کنین زمانی که t بزرگتر باشه از 255 باشه نتایج اشتباه میده ولی کمتر از اون درسته ولی در میکرو زمانی که T رو مستقیم ال سی دی می کنم نشون میده ولی وقتی اینطوری می شکنمش همیشه قسمت صحیح میشه 25 و قسمت اعشاری میشه 4

در ضمن T همیشه مثبت هست

تشکر
شهریار

[_e_]

پاسخ : در بسکام، ذخیره متغیر Integer در متغیر Byte

سلام
حق با شماست. معلوم نیست چرا دچار اشتباه می شه. اما کد زیر درست کار کرد:

$regfile "m16def.dat"
$crystal = 4000000

$sim

Config Lcd = 16 * 2
Config Lcdbus = 4
Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7 , Rs = Porta.2 , E = Porta.3

Dim Byt1 As Byte
Dim Byt2 As Byte
Dim Integ1 As Integer
Dim Integ2 As Integer
Dim Integ As Integer
Cls
Integ = 317
Home
Integ1 = Integ / 10
Integ2 = Integ Mod 10
Byt1 = Integ1
Byt2 = Integ2
Lcd Byt1 ; Byt2
End                             'end program

موفق باشی

[shahriar]

پاسخ : در بسکام، ذخیره متغیر Integer در متغیر Byte

ممنون از جوابتون
من تبدیلش کردم به Str بعد رقم سمت راست رو جدا کردم با تابع Val ریختمش تو یک متغیر بایت
بقیش رو هم ریختم تو یک متغیر بایت دیگه
درست شد

تشکر
شهریار