Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
La shoutbox n'est pas chargée par défaut pour des raisons de performances. Cliquez pour charger.

Forum Casio - Projets de programmation


Index du Forum » Projets de programmation » C.Basic Projets
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

C.Basic Projets

Posté le 30/04/2017 11:08

Hello, everyone.

I am Sentaro21, and I am developing C.Basic, a Basic interpreter that allows high-speed execution of Basic programs while maintaining compatibility with genuine Casio Basic.

Here is an English site, by Krtyski, about the C.Basic project (I helped him with the translation, but it's still unfinished) :
https://egadget2.web.fc2.com/CBasic/Interpreter/CBasic_interpreter.html

The articles and various programs from this site served as a reference to evaluate the compatibility level of C.Basic. Results were not good every time I tested them, but compatibility increased over time.

These programs have been ported experimentally. Many thanks to their authors.

Block Tower (C.Basic version)
https://pm.matrix.jp/CB/CB_BlockTower.zip

Sudoku (C.Basic version)
https://pm.matrix.jp/CB/CB_Sudoku.zip

Maze Generator (C.Basic version)
https://pm.matrix.jp/CB/CB_MazeGene.zip

Graph 3D (C.Basic version)
https://pm.matrix.jp/CB/CB_Graph3D.zip

TokiTori (C.Basic version 25/11/2018)
https://pm.matrix.jp/CB/CB_Tokitori.zip
(added Save/Load feature)

Ice slider (C.Basic version 25/11/2018)
https://pm.matrix.jp/CB/CB_IceSlider.zip
(added Save/Load feature)

Clonelab (C.Basic version 25/11/2018)
https://pm.matrix.jp/CB/CB_Clonlab.zip
(added Save/Load feature)

Arkenstone (C.Basic version 25/11/2018)
https://pm.matrix.jp/CB/CB_Arkenstone.zip
(added Save/Load feature)

Aventura (C.Basic version 25/11/2018)
https://pm.matrix.jp/CB/CB_Aventura.zip
(added Save/Load feature)

Electricity (C.Basic version 10/2/2019)
https://pm.matrix.jp/CB/CB_Electric.zip
(added Save/Load feature)

Here are examples of programs that reach near-C performance :

BallGame (C.Basic version)
https://pm.matrix.jp/CB/CB_BallGame.zip

Asprin (C.Basic version)
https://pm.matrix.jp/CB/CB_Aspirin.zip


The C.Basic project is still yet to be completed, thus I would like to get your feedback.

This is the latest version of C.Basic 2.47 beta for Graph 35+USB/35+EII/75/85/95 (SD)
https://pm.matrix.jp/CB/CBASIC247beta02.zip (updated 11/12/2023)

This is the latest version of C.BasicCG 1.47 beta for Graph90+E/fx-CG10/20/50:
https://pm.matrix.jp/CB/CBASICCG147beta02.zip (updated 11/12/2023)

C.Basic manuals
https://gitlab.com/sentaro21/cbasic

Currently C.Basic exists thanks to this site.
Thank you very much.


Précédente 1, 2, 3, 4, 5, 6, 7, 8 ··· 10 ··· 20 ··· 30, 31, 32 Suivante
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 26/11/2018 08:47 | #


hi sentaro ! i did what you said, but the problem persists...
Also, the command "DispVram" sometimes needs a -Disp- command to be executed.
Don't be sorry ! i'm glad to help your project !
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 26/11/2018 09:08 | #


Hi,
Thanks very much for your help.
I'm sorry not to solve the problem.
Could you show me the program that the error occurs?

About _DispVram probrem,
Is there ':' after "_DispVram"?

Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Drak Hors ligne Rédacteur Points: 1925 Défis: 40 Message

Citer : Posté le 26/11/2018 19:13 | #


@Sentaro21

Your super program helped the debugging of the string function very much.

Yeah, I can imagine that, I used the strings so much in my game, in many ways !
Eon the Dragon : version 1.2
Let's have a look!
Marre de ces RPGs qui t'imposent des classes, des compétences et des sorts ? Crée tes propres capacités sur Eon the Dragon ! Des monstres, des dragons et des combats aussi épiques que difficiles t'attendent !
Un RPG unique et immense t'attend ! Joue dès maintenant à Aventura, le Royaume Poudingue !
Vous aussi, soyez swag et rejoignez Planète Casio !
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 27/11/2018 20:37 | # | Fichier joint


hey ! i've downloaded the 1.88 version, and all is ok with the subprogram calling !
but the DispVram problem is here...

so i put the prog in this comment.
to play, execute TEST, the problem is on the first DispVram command ( there is a ◢ just after, and i tested to remove it, but the map is not correctly loaded...)
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 28/11/2018 02:11 | #


@Drak
Your technique to use string function is splendid!!
You showed me possibility of Casio Basic.


@Lightmare
Thanks for download and showing the program.
When I looked at your program I realized what was causing it.
It is Cls command problem.

Top of Cls command of your program do not work first.
When the graphics command of genuine Casio Basic (Plot or Line or StoPict etc..) were executed, Cls work for the first time.
The MonochromeLib command works regardless of specifications of genuine Casio Basic.
Therefore Cls worked for StoPict command run time, and the graphics screen was cleared.

The solution to problem is here.
Please use Screen.G instead of Cls.
Screen command is to change the graphics screen mode.
from this the ML command works on the graphics screen.
Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 28/11/2018 07:00 | #


wow ! thanks ! so, no more problems ! all is fine !

Ajouté le 01/12/2018 à 18:26 :
hi !
this time, no more problems : i have a question. How i can interrupt thé execution of Receive() command ? i read the manual, but nothing seems explain this point...
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 02/12/2018 07:46 | #


Hi
Sorry, only [AC]break has the interruption of the serial command.
and so,
I added the option which it could interrupt with {EXIT]key.
Please try this.

https://pm.matrix.jp/CB/CBASIC188beta2.zip
-Added interrupt option of serial command.
(format) Send( data [,baudrate][,enable_exit])
(format) Recv( data [,baudrate][,enable_exit])
(format) OpenComport38K[,baudrate][,transfermode][,enable_exit]
[baudrate]: 0=300, 1=600, 2=1200, 3=2400, 4=4800, 5=9600, 6=19200, 7=38400, 8=57600, 9=115200 baud
default baudrate is 38400
[transfermode]: 0:binary data transfer mode 1:necessary to match data type (default)
When OpenComport38K with [transfermode:0]option, Send38K/Receive38k is binary data transfer.
[enable_exit]: 0:not interrupt 1:interrupt

(example) Send(A,,1)
(example) Recv(A,,1)
[EXIT] interrupt enable.



As for 0.61 of CG version, a bug was found in the string processing.
Please use hidden RAM by setup in Graph90+E/CG50.

Please use 0.60 in CG10/20.
https://pm.matrix.jp/CB/CBASICCG060.zip
Wait a minute until fix it.


Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 03/12/2018 20:37 | # | Fichier joint


Sorry for the late reply : it works very well i made an "advanced" chat between 2 calculators with nicknames, banned words ( with a private joke between me and some friends ), some commands like /ban or /pseudo

i put the file in the comment for insterested people
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 04/12/2018 11:00 | #


It is very interesting.
I'm happy to work well.
This is the first serial communication application of C.Basic.
Thanks very much !

Ajouté le 09/12/2018 à 10:27 :
Hi,
Here is new update version.
(neary 1.88beta2)
https://pm.matrix.jp/CB/CBASIC189beta.zip


for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG062.zip
-Fixed strings/Mat/List bug of CG10/20.

-Changed specification of the status area display as much as possible.
It is the status display mode at the start of program,
It becomes the status no-display mode when use drawing command in the status area.
It return to the status display mode again when use PutDispDD command.

-Added interrupt option of serial command.
(format) Send( data [,baudrate][,enable_exit])
(format) Recv( data [,baudrate][,enable_exit])
(format) OpenComport38K[,baudrate][,transfermode][,enable_exit]
[baudrate]: 0=300, 1=600, 2=1200, 3=2400, 4=4800, 5=9600, 6=19200, 7=38400, 8=57600, 9=115200 baud
default baudrate is 38400
[transfermode]: 0:binary data transfer mode 1:necessary to match data type (default)
When OpenComport38K with [transfermode:0]option, Send38K/Receive38k is binary data transfer.
[enable_exit]: 0:not interrupt 1:interrupt

(example) Send(A,,1)
(example) Recv(A,,1)
[EXIT] interrupt enable.


@Ne0tu's games came to work by this update in CG10/20.
Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 09/12/2018 10:46 | #


Hey !
This time i explored possibilities of matrix commands ! i saw that it's not possible to remove/add columns or lines to a matrix with C.basic, but we can do it in genuine casio basic.
Also is there a way to save data ( like player profile ) in a list even if we restart C.Basic ? Because at the starting of C.Basic, all the matrices and lists are deleted.
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Lephenixnoir Hors ligne Administrateur Points: 24145 Défis: 170 Message

Citer : Posté le 09/12/2018 10:48 | #


Are you sure we can do this is Casio Basic? Adding rows at the end is certainly possible, but I remember from the time I wrote my small computer algebra entry for the CPC that you can't remove rows in any possible way without reconstructing the matrix.
Mon graphe (24 Mars): (gint#27 ; (Rogue Life || HH2) ; PythonExtra ; serial gint ; Boson X ; ...) || (shoutbox v5 ; v5)
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 09/12/2018 10:53 | #


in genuine casio basic, we can't edit matrix size, but we can do it manually ( RUN -> Mat -> select an existing matrix -> ROW -> ADD/DEL/INS )
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 09/12/2018 12:46 | #


Lightmare a écrit :
This time i explored possibilities of matrix commands ! i saw that it's not possible to remove/add columns or lines to a matrix with C.basic, but we can do it in genuine casio basic.

Sorry, there is no functions.
In the program,
Please use Mat->List(,List->Mat(,Agument( command.

Lightmare a écrit :
Also is there a way to save data ( like player profile ) in a list even if we restart C.Basic ? Because at the starting of C.Basic, all the matrices and lists are deleted.

It uses Save/Load( command.
For example,when you save/load List 1.(number of element is 10)
Save "SAVEDATA",List 1

"SAVEDATA.bin" is made in the current folder.

If IsExist("SAVEDATA"):Then
  10->Dim List 1
  Load("SAVEDATA")->List 1
IfEnd

load List 1 data from "SAVEDATA.bin"

Save/Load command is used by the following programs ported to C.Basic

Ice slider (@Ne0tux)
https://pm.matrix.jp/CB/CB_IceSlider.zip
Clonelab (@Ne0tux)
https://pm.matrix.jp/CB/CB_Clonlab.zip
Arkenstone (@Ne0tux)
https://pm.matrix.jp/CB/CB_Arkenstone.zip

TokiTori (@Riptor)
https://pm.matrix.jp/CB/CB_Tokitori.zip

Aventura, le Royaume Poudingue (@Drak)
https://pm.matrix.jp/CB/CB_Aventura.zip

Ajouté le 09/12/2018 à 13:35 :
@Lephenixnoir
I tried your very interesting "Formel" .
I found the bug of the Seq command in C.Basic.
I'll checking it and fix bug.
Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lephenixnoir Hors ligne Administrateur Points: 24145 Défis: 170 Message

Citer : Posté le 09/12/2018 19:25 | #


Trying many programs is the key! Thanks for using Formel and good luck finding the problem!
Mon graphe (24 Mars): (gint#27 ; (Rogue Life || HH2) ; PythonExtra ; serial gint ; Boson X ; ...) || (shoutbox v5 ; v5)
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 11/12/2018 10:29 | #


Thanks.
When I try a program, some bug and unknown specifications is still found.
It is difficult to keep compatibility.

The bug of Seq( is fixed.
However,
The exit of Goto from the loop(For,While,Do) is impossible with the current specifications,
I think that it should be able to be settled in the future.

Here is re-uploaded.
https://pm.matrix.jp/CB/CBASIC189beta.zip
https://pm.matrix.jp/CB/CBASICCG062.zip
-Fixed Seq( command bug that became the error at the time of the command evaluation with an illegal value of the variable.
-2->X
Seq(sqrt(X),X,1,4)


Ajouté le 16/12/2018 à 11:29 :
Here is new update version.
https://pm.matrix.jp/CB/CBASIC189beta.zip (re-updated)
-Fixed Matrix inversion bug.
(false example) [[0,0,1][9,3,1][36,6,1]]^(-1)


for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG063.zip
-Fixed Matrix inversion bug.
(false example) [[0,0,1][9,3,1][36,6,1]]^(-1)

-Changed spaecification of BG-Pict.(CG50/Graph90+E)
-Added "filename" of BG-Pict.

Ajouté le 19/12/2018 à 13:02 :
v1.89beta 2018.12.19
v0.63alpha 2018.12.19
-Fixed lost file bug of Rename that input file name over 8 character.

Ajouté le 26/12/2018 à 09:04 :
Here is little updated.
https://pm.matrix.jp/CB/CBASIC189beta.zip (re-updated)
-Fixed bug of mini font editor that canceled ALPHA mode when pressed [ALPHA]-[F4](A<>a)

for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG063.zip (re-updated)
-Fixed bug of editor that canceled ALPHA mode when pressed [SHIFT]-[F5](A<>a)

Ajouté le 27/12/2018 à 09:16 :
A fatal bug was found
Please update again.
https://pm.matrix.jp/CB/CBASIC189beta.zip (re-updated)
-Fixed the fatal bug that was not able to access of bmp file of the root folder. (enbug 1.87)

for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG063.zip (re-updated)
-Fixed the fatal bug that was not able to access of bmp file of the root folder. (enbug 0.63)
-Changed specification of Rename that display popup of the confirmation in the same case of extention.

Ajouté le 29/12/2018 à 13:57 :
Here is new updated version.

https://pm.matrix.jp/CB/CBASIC190beta.zip
-Added new specification of Goto command that to be able to exit of loop.(an experimental trial)
(format) Goto (-)Label
(-) is minus signe.
(example)
Lbl A
While 1
Goto (-)A
EhileEnd

-Changed Vct intialization that not compatible with genuine Casio basic.
-Fixed Vct bug that not worked indirect mode.
(example) Vct @5


for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG064.zip

Ajouté le 30/12/2018 à 07:05 :
A bug was found.
https://pm.matrix.jp/CB/CBASIC190beta.zip (re-updated)
-Fixed Sci of display format bug.(enbug 1.84)

for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG064.zip (re-updated)
-Fixed Sci of display format bug.(enbug 0.58)

Ajouté le 31/12/2018 à 14:02 :
Hi,
Here is new updated version.
Formel@Lephenixnoir came to work without a source modification by this update.

https://pm.matrix.jp/CB/CBASIC191beta.zip
-Added new specification of Goto command that to be able to exit of loop automatically.(an experimental trial)
(canceled 1.90 feature.)

for CG10/20/50/Graph90+E version.
https://pm.matrix.jp/CB/CBASICCG065.zip
-Added new specification of Goto command that to be able to exit of loop automatically.(an experimental trial)
(canceled 0.64 feature.)
-Fixed the system error bug in deep recurrence calls.
Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lephenixnoir Hors ligne Administrateur Points: 24145 Défis: 170 Message

Citer : Posté le 31/12/2018 14:09 | #


Impressive! Formel is quite complex (lots of theoretical computer science in there), this deserves a big bounce!

よくやった !
Mon graphe (24 Mars): (gint#27 ; (Rogue Life || HH2) ; PythonExtra ; serial gint ; Boson X ; ...) || (shoutbox v5 ; v5)
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 02/01/2019 09:26 | #


Formel is suitable for C.Basic.

I can see characters of the Japanese.
Merci beaucoup.
Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lightmare Hors ligne Membre de CreativeCalc Points: 690 Défis: 0 Message

Citer : Posté le 04/01/2019 11:20 | #


Hi Sentaro! As you know I'm making a project with C.BASIC, and I need to know: Str can be longer than 255 chars ?
"Quand je dis à la cour : "Sautez ! ", tout le monde me demande "jusqu'où ?" "
Dijkstra - The Witcher
Sentaro21 En ligne Membre Points: 877 Défis: 0 Message

Citer : Posté le 04/01/2019 12:10 | # | Fichier joint


Yes!
It is possible as far as there is free memory.
(there may be a bug…)

Please set string setting in the first of the program at once.
(example)
'#Str <r>,20,1000
""->Str 1
For 1->N To 1000
  Str 1+"+"->Str 1
Next

Je continue à développer C.Basic. (Il est compatible avec Basic Casio.)
Overclocking utilitaire Ftune/Ptune2/Ptune3 est également disponible.
Si vous avez des questions ou un rapport de bogue, n'hésitez pas à me le faire savoir.
Lephenixnoir Hors ligne Administrateur Points: 24145 Défis: 170 Message

Citer : Posté le 04/01/2019 17:41 | #


Don't you allocate strings dynamically?
Mon graphe (24 Mars): (gint#27 ; (Rogue Life || HH2) ; PythonExtra ; serial gint ; Boson X ; ...) || (shoutbox v5 ; v5)
Manolo Hors ligne Membre Points: 910 Défis: 13 Message

Citer : Posté le 04/01/2019 22:05 | #


Hello, I did not understand everything and I do not have the time and the desire to translate all the comments of this topic to understand, yes, because I speak very, very very bad English. In fact, this project is to make a program (in C if I understand correctly) to read the Basic faster than the basic program of our dear calculator. That's it ?
Précédente 1, 2, 3, 4, 5, 6, 7, 8 ··· 10 ··· 20 ··· 30, 31, 32 Suivante

LienAjouter une imageAjouter une vidéoAjouter un lien vers un profilAjouter du codeCiterAjouter un spoiler(texte affichable/masquable par un clic)Ajouter une barre de progressionItaliqueGrasSoulignéAfficher du texte barréCentréJustifiéPlus petitPlus grandPlus de smileys !
Cliquez pour épingler Cliquez pour détacher Cliquez pour fermer
Alignement de l'image: Redimensionnement de l'image (en pixel):
Afficher la liste des membres
:bow: :cool: :good: :love: ^^
:omg: :fusil: :aie: :argh: :mdr:
:boulet2: :thx: :champ: :whistle: :bounce:
valider
 :)  ;)  :D  :p
 :lol:  8)  :(  :@
 0_0  :oops:  :grr:  :E
 :O  :sry:  :mmm:  :waza:
 :'(  :here:  ^^  >:)

Σ π θ ± α β γ δ Δ σ λ
Veuillez donner la réponse en chiffre
Vous devez activer le Javascript dans votre navigateur pour pouvoir valider ce formulaire.

Si vous n'avez pas volontairement désactivé cette fonctionnalité de votre navigateur, il s'agit probablement d'un bug : contactez l'équipe de Planète Casio.

Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 97 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd