یک مشکل با دستور Gosub

[AFSHARAN]

با سلام
من یک برنامه با بسکام نوشتم که در آن حدود صد label وجود داره حالا من می خوام با دستور gosub بتونم به هرکدوم که می خوام پرش کنم در حالت
عادی مشکلی ندارم اما من می خوام یک متغییر از نوع String رو به این دستور بدم و با تغییر دادن آن به label پرش کنم( gosub String )
آیا این امکان وجود داره؟

[khast khodaiebehnam]

پاسخ : یک مشکل با دستور Gosub

این جوری میتونین:

dim s string*10
select case s:
case "a":
print "a"
case else:
print s
end select

کافیه رشته رو ما بین "" قرار بدین

[hamed_online62]

پاسخ : یک مشکل با دستور Gosub

فکر می کنم باید یه تجدید نظر تو برنامه بکنی . وجود این همه پرش خیلی مناسب نیست . ضمنا استفاده از Gosub حافظه SRAM بیشتری رو می طلبه .
دقیقا نمی دونم چی می خوای ولی یSyntax دستور Lookupstr رو تو Help یه نگاه بنداز.

[AFSHARAN]

پاسخ : یک مشکل با دستور Gosub

سلام

do
.
.
.
.

gosub xxxxx---------------------------->میخوام جای این یک متغییر بذارم که با تغییر آن به لیبل مربوطه پرش کنه
.
.
.
.

loop
end program


a:
lcd a
return

b:
lcd b
return

c:
lcdc
return

d:
lcd d
return

e:
lcd e
return

[khast khodaiebehnam]

پاسخ : یک مشکل با دستور Gosub

ببینین این کارتون درس نیس باید ئاسه این کار از select case استفاده کنین
که بالا تو ضیح دادم

[hamed_online62]

پاسخ : یک مشکل با دستور Gosub

Do
.
.
.
Select case S
Case"a":
lcd a
Case"b":
lcd b
Case"c":
lcd c
End Select
.
.
.
Loop

[AFSHARAN]

پاسخ : یک مشکل با دستور Gosub

سلام
راه دیگیه وجود نداره

[hamed_online62]

پاسخ : یک مشکل با دستور Gosub

مشکل این راه چیه؟
چی مد نظرته؟