برنامه های به زبان ماشین حساب رو اینجا بزارید
سلام .
همونطور که میدونید ماشین حساب های حرفه ای مثل کاسیو ، یه زبون برنامه نویسی داره .
تو این تاپیک برنامه هایی رو که با ماشین حساب نوشته اید بزارید .
مثلاً برنامه زیر به زبون برنامه نویسی casio fx-9750 نوشته شده :
کد:
0->P
1->B
1->C~D
Int 17Ran# +1->A
A->E
Lbl 1
ClrText
Locate 10,1,P
Locate A,B,"O"
K=0=>Getkey->K
Locate E,7,"#####"
K=38=>Dsz E
K=27=>Isz E
E=18=>1->E
E=0=>17->E
Getkey->K
A=21=>-1->C
A=1=>1->C
B=1=>1->D
If B=7
Then -1->D
Locate 10,1,P
A-E<0 Or A-E>4=>Goto 9
Isz P
Ifend
K=0=>Getkey->K
A+C->A
B+D->B
Goto 1
Lbl 9
Locate 10,1,P
Locate 6,3,"GAME OVER!"
Mat A[1,1]->H
P>H=>P->Mat A[1,1]
Locate 6,4,"HISCORE:"
Locate 14,4,H
P>H=>Locate 6,3,"HISCORE! "
Locate 7,6,"~PONG~"
شاید از متن برنامه بتونید کارش رو حدس بزنید . بله ، این بازی پینگ پنک هست ، تا وقتی توپ نیفتاده امتیاز میگیرید و در آخر امتیاز شما در ماتریس A ثبت میشه . جالبه . حتماً امتحان کنید .
- قبل از اجرای برنامه اگر ماتریس A در حافظه دارید اونو پاک کنید .
- علامت <- همان دکمه پیکان به سمت راست روی کلید ها هست .
- علامت <== رو هم در منوی jump در قسمت PROG پیدا میکنید .
- این برنامه 340 بایت جا میگیره .
(نمیدوم تو مدلهای دیگه کاسیو جواب میده یا نه ، ولی رو این مدل جواب میده اگه کسی مدل دیگه ای داره بگه که جواب میده یا نه )
