مشکل با زیر برنامه در بسکام

[omidi2008]

وقتی تعداد خط زیر برنامه از 73 تا بیشتر میشه خطای زیر را میده:
Forward jump out of range
کسی میدونه مشکل چیه

[FERESHTEMARG]

پاسخ : مشکل با زیر برنامه در بسکام

سلام
خب مقدار زیر برنامه نباید زیاد باشه و اگر هم خیلی بهش احتیاج داری دو تا بر روی هم استفاده کن

[omidi2008]

پاسخ : مشکل با زیر برنامه در بسکام

سلام
خب مقدار زیر برنامه نباید زیاد باشه و اگر هم خیلی بهش احتیاج داری دو تا بر روی هم استفاده کن

این کار رو هم کردم ولی فرق نمیکنه مجموع خط های زیربرنامه ها ظاهرا نمیتونه از 73 بیشتر بشه :sad:

[reza_agha]

پاسخ : مشکل با زیر برنامه در بسکام

احتمالا نسخه کرک نشده یا "درست کرک نشده" داری استفاده میکنی.

[omidi2008]

پاسخ : مشکل با زیر برنامه در بسکام

احتمالا نسخه کرک نشده یا "درست کرک نشده" داری استفاده میکنی.

مشکل کرک نیست چون برنامه ای دیگه که مجموع خط های زیر برنامه ها بیشتر از 73 است بدون هیچ مشکل کامپایل میشه.

[omidi2008]

پاسخ : مشکل با زیر برنامه در بسکام

آ قا مشکل از تعداد خط های زیر برنامه نیست :redface:
در برنامه زیر و قتی تعداد case ها رو کم میکنم درست میشه:

Select Case Q
Case "Ø" : Ster(j) = "S"
Case "Ù" : Ster(j) = "T"
Case "Ú" : Ster(j) = "U"
Case "Û" : Ster(j) = "V"
Case "Ý" : Ster(j) = "W"
Case "Þ" : Ster(j) = "X"
Case "˜" : Ster(j) = "Y"
Case "" : Ster(j) = "Z"
Case "á" : Ster(j) = "0"
Case "ã" : Ster(j) = "1"
Case "ä" : Ster(j) = "2"
Case "æ" : Ster(j) = "3"
Case "å" : Ster(j) = "4"
Case "í" : Ster(j) = "5

"

[reza_agha]

پاسخ : مشکل با زیر برنامه در بسکام

خوب بجای Ster(j) یک متغیر کاراکتری استفاده کنین و اون رو با کاراکتر مورد نظر پر کنین و در انتهای case اونرو در Ster اعمال کنین.

[baby_1]

پاسخ : مشکل با زیر برنامه در بسکام

سورس کامل رو بزارین

[omidi2008]

پاسخ : مشکل با زیر برنامه در بسکام

خوب بجای Ster(j) یک متغیر کاراکتری استفاده کنین و اون رو با کاراکتر مورد نظر پر کنین و در انتهای case اونرو در Ster اعمال کنین.

ster(j) یک متغیر کارکتری آرایه ای است.
ولی دابل شرمنده :redface: :redface: مشکل از case هم نیست.تو برنامه زیر وقتی خطهای rcall حذف میشن
درست میشه.یعنی یا باید خطهای rcall حذف بشه یا تعداد خطهای کل برنامه کم بشه :angry:

'set offset
ldi r24,&h03
rcall _GWrite_Data
ldi r24,&h00
Rcall _GWrite_Data
ldi r24,&h22
rcall _GWrite_Cmd

'set address pointer
ldi r20,&h00
ldi r21,&h1c
rcall _set_address

'store characters
Restore Fontc
For W = 1 To 288
Read Gl_byte
Loadadr Gl_byte , X
ld r24, x
rcall _GWrite_Data
ldi r24, &hc0
rcall _GWrite_Cmd
Next W

در مورد ارسال سورس کامل نمیتونم چون فعلا سکرته :icon_razz: دارم رو فارسی نویسی روی lcd های بر مبنای کنترل کننده T6963c کار میکنم که در صورت تمام شدن تو سایت قرار میدم.70 در صد تمومه ولی اینجا با یک مشکل مسخره مواجه شدم.

[reza_agha]

پاسخ : مشکل با زیر برنامه در بسکام

مشکل اساسی استفاده از rcall هست. این دستور نمیتونه به آدرسی که 4 کیلوبایت بیشتر فاصله داشته باشه پرش کنه. احتمالا شما از میکرویی استفاده میکنین که حجم فلشش زیاده و چون حجم کدتون زیاده rcall میخواد به آدرسی بپره که از 4 کیلو اونورتره. راه حل: بجای rcall از call استفاده کنین.