Sharp PC-G850V

Ici, on fait dans le petit, le LCD qui déchire sa race, on y cause même calculatrices quand on est en manque !

Modérateur : Politburo

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 11 déc. 2015 15:05

voilà, je viens de tapper le programme qui suit, mais j'ai une erraur à chacune des lignes :
CALL LINE '.............
quelqu'un pourrait m'aider?

Marc




Code : Tout sélectionner

1      ORG   0100H
5GRAPH EQU   093CBH
10     LD    HL,100
20     LD    DE,4
30     LD    IX,120
40     LD    IY,31
50     LD    A,1
60     LD    B,0
70     CALL  LINE 'Trace une ligne entre (100,4)-(120,31)	
80     LD    HL,-3
90     LD    DE,-6
100     LD    IX,55
110     LD    IY,18
120     LD    A,1
130     LD    B,1
140     CALL  LINE 'Trace un rectangle vide entre (-3,-6)-(55,18)
150     LD    HL,40
160     LD    DE,10
170     LD    IX,72
180     LD    IY,24
190     LD    A,1
200     LD    B,2
210     CALL  LINE 'Trace un rectangle plein entre (40,10)-(72,24)
220     LD    HL,75
230     LD    DE,0
240     LD    IX,45
250     LD    IY,50
260     LD    A,2
270     LD    B,0
280     CALL  LINE 'Trace une ligne en vidéo inversée entre (75,0)-(45,50)
290	RET
1960LINE:LD    (7967H),IX
1970     LD    (7969H),IY
1980     LD    IX,0FFFFH
1990     LD    (777DH),IX
2000     LD    (777FH),A
2010     LD    A,B
2020     CP    1
2030     JR    C,LIN
2040     JR    Z,BOX
2050FBOX:CALL  GRAPH
2060     DB    0DH
2070     DW    0C4CBH
2080     RET
2090LIN: CALL  GRAPH
2100     DB    0DH
2110     DW    0C595H
2120     RET
2130BOX: CALL  GRAPH
2140     DB    0DH
2150     DW    0C442H
2160     RET
Pour frapper ce programme
tu va sous BASIC

MON [ENTER]
USER 300 [ENTER]

[TEXT]
Edit

Tu frappe le programme ci dessus

[ASMBL]
Assembler
Asm

Normalement 0 error

[BASIC] en mode programme
tu frappe

Code : Tout sélectionner

10 CLS
20 CALL &H100
30 GOTO 30
Mode RUN
RUN [ENTER]

Bon tests[/quote]

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 11 déc. 2015 15:12

le problème vient du commentaire après le " ' "...... quel est ce caractère?

Avatar de l’utilisateur
charognard
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4411
Inscription : 06 juin 2007 19:28
Localisation : Indre et loire
Contact :

Re: Sharp PC-G850V

Message par charognard » 11 déc. 2015 15:14

En fait le problème c'est qu'il ne faut SURTOUT pas mettre les commentaires.
Tu mets juste CALL LINE

J'avais mis les commentaires .... pour commenter ;)

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 11 déc. 2015 15:53

ok, j'ai compris.....
je pensais que tout ce qui était après " ' " n'était pas pris en compte....

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 11 déc. 2015 16:10

C'est vraiment une belle petite machine!
Je pense que je vais commencer par faire une liste de toutes les commandes Basic avec avec leur syntaxe, je n'ai pas de manuel d'utilisation (japonais)....
Çela me permettra de bien utiliser la Basic.
ensuite Idem avec le C.
... Pour l'assembler, là c'est une autre paire de manches.....

Avatar de l’utilisateur
charognard
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4411
Inscription : 06 juin 2007 19:28
Localisation : Indre et loire
Contact :

Re: Sharp PC-G850V

Message par charognard » 11 déc. 2015 16:56

Tu n'as pas le manuel en japonais ?
il est ICI au besoin


Pour celui du Z80 tu l'as chez le fabriquant

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 11 déc. 2015 19:05

non, je n'ai reçu aucune documentation....
Par contre, le prix est de 75 EURO et il est comme neuf!

caloubugs
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 430
Inscription : 05 juin 2014 22:23
Localisation : Dans le Gâtinais avec les abeilles, près de Fontainebleau

Re: Sharp PC-G850V

Message par caloubugs » 12 déc. 2015 14:08

Marc556 a écrit :non, je n'ai reçu aucune documentation....
Par contre, le prix est de 75 EURO et il est comme neuf!
Salut Marc,

N'oublie pas les travaux qui ont déjà été réalisés (je crois t'avoir donné les liens).
Je suis prêt à te donner un coup de main au besoin. Je pense commencer par traduire autant que possible la partie sur l'assembleur du G850.

Bonne explo à toi, sûr que cette bécane est un must.
RetroGeek, mais pas que...
HP : 15C, 41CV, 48GX, 71B, 75C Canon X-07 Sharp PC 1403H, PC1500A, PC1600, PC-G850V Texas : CC40, 66, 74, 95, 92 Casio : PB-700, PB-1000, Z-1GR Psion 5mx, mais pas que...

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 12 déc. 2015 15:49

Une fois de plus, merci, mille fois merci à tous pour votre aide....
c'est certain que j'aurai encore besoin de vous dans le futur pour bien apprendre à dominer cette machine.
la première chose (pour moi), comme expliqué avant, sera de me faire une liste de toutes les commandes Basic avec leur utilisations.
Je connais +/- la Basic du PC-1500 ainsi que celui du Casio PB-770....
Même si un Basic reste un Basic, il y a tout de même des différences.
Si un d'entre-vous a cette liste, cela me ferait gagner du temps!

Avatar de l’utilisateur
badaze
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 7188
Inscription : 12 févr. 2007 19:36
Localisation : Pas très loin de Lyon
Contact :

Re: Sharp PC-G850V

Message par badaze » 12 déc. 2015 16:01

Je m'étais fait la liste des mots clés du 850

http://www.emmella.fr/page3729-1341-532 ... -1093.html
Tout est bon dans le pocket.
Moi j'aime tout.... Casio, HP, Sharp, TI et les autres sauf que les TI semblent ne pas m'aimer :(
http://www.emmella.fr
Mes Casio - HP - Sharp - TI
Homme invisible.

Avatar de l’utilisateur
zpalm
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 2498
Inscription : 03 mai 2008 15:33
Localisation : Grenoble

Re: Sharp PC-G850V

Message par zpalm » 12 déc. 2015 16:07

Tu as aussi le document de Marcus.

Avatar de l’utilisateur
charognard
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4411
Inscription : 06 juin 2007 19:28
Localisation : Indre et loire
Contact :

Re: Sharp PC-G850V

Message par charognard » 12 déc. 2015 20:22

Et si tu prenais au moins le temps de lire mon article
Donné déjà deux fois en lien dans ce fils.
Tu as toutes les commandes BASIC, C et CASL.
et dans le manuel aussi donné précédemment tu as leur syntaxe respective


PS :
Pour le C les commandes standards sont en noires, en bleu la bibliothèque mathématique et en rouge celle graphique.
Pour le BASIC je signale les spécificités par rapport aux autres PC SHARP de la série 12 et 13

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 12 déc. 2015 22:17

j'ai bien evidemment telechargé ton artcile et je l'ai lu.....
je pense simplement reprendre toutes les commandes et y joindre leur syntaxe... que je n'avais pas (puisque la machine m'a été livrée sans manuel.
Je l'ai téléchargé en pdf,et donc il ne reste plus qu'à le décortiquer.

Avatar de l’utilisateur
charognard
Fonctionne à 9600 bauds
Fonctionne à 9600 bauds
Messages : 4411
Inscription : 06 juin 2007 19:28
Localisation : Indre et loire
Contact :

Re: Sharp PC-G850V

Message par charognard » 12 déc. 2015 23:16

j'avais fais cela (m'en souvenais plus d'ailleurs ! )

Code : Tout sélectionner

void abort(void); 
int abs(int x); 
double acos(double x); 
double acosh(double x); 
void angle(unsigned n); 
double asin(double x); 
double asinh(double x); 
double atan(double x); 
double atanh(double x); 
int beep(int nbr,int freq, int long) ;
void breakpt(void); 
void *calloc(unsigned n, unsigned size); 
int circle(int x, int y, int r, double s-angle, double e-angle, double ratio, int reverse, unsigned short kind); 
void clearerr(FILE * stream); 
void clrscr(void); 
double cos(double x); 
double cosh(double x); 
void exit(int status); 
double exp(double x); 
int fclose(FILE *stream); 
int feof(FILE *stream); 
int fflush(FILE * stream); 
int fgetc(FILE *stream); 
char *fgets(char *, int n, FILE *stream); 
unsigned long flof(FILE *stream); 
FILE *fopen(char *path, char *type); 
int fprintf(FILE * stream, const char * format [, arg, …]); 
int fputc(int c, FILE * stream); 
int fputs(const char *s, FILE *stream); 
void free(void *ptr); 
int fscanf(FILE * stream, const char * format [, address, …]); 
int gcursor(int x, int y); 
int getc(FILE *stream); 
int getch(void); 
int getchar(void); 
char *gets(char * s); 
void gotoxy(unsigned x, unsigned y); 
int gprint(char *image); 
int isalnum(int c); 
int isalpha(int c); 
int iscntrl(int c); 
int isdigit(int c); 
int isgraph(int c); 
int islower(int c); 
int isprint(int c); 
int ispunct(int c); 
int isspace(int c); 
int isupper(int c); 
int isxdigit(int c); 
int kbhit(void); 
int line(int x1, int y1, int x2, int y2, int reverse, unsigned short mask, int rectangle); 
double log(double x); 
double log20(double x); 
void *malloc(unsigned size); 
int miniget(void); 
void miniput(char byte); 
int paint(int x, int y, unsigned short kind); 
int pioget(void); 
void pioput(char byte); 
void pioset(char byte); 
int point(int x, int y); 
double pow(double x, double y); 
int preset(int x, int y); 
int printf(const char * format [, arg, …]); 
int pset(int x, int y, int reverse); 
int putc(int c, FILE * stream); 
int putchar(int c); 
int puts(const char *s); 
int scanf(const char * format [, address, …]); 
double sin(double x); 
double sinh(double x); 
int sprintf(char * s, const char * format [, arg, …]); 
double sqrt(double x); 
int sscanf(char * s, const char * format [, address, …]); 
char *strcat(char * s1, const char *s2); 
char *strchr(const char *s, int c); 
int strcmp(const char *s1, const char *s2); 
char *strcpy(const char *s1, const char *s2); 
int strlen(const char *string); 
double tan(double x); 
double tanh(double x); 
int tolower(int c); 
int toupper(int c);

Marc556
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 75
Inscription : 26 nov. 2015 12:09
Localisation : Wiltz ( Luxembourg)

Re: Sharp PC-G850V

Message par Marc556 » 14 déc. 2015 09:27

ce dimanche, j'ai rpis le temps de reprendre depuis le début ton article....
J'ai probablement fait l'erreur de parcourrir tous les documments que j'ai en même temps...
C'est le meilleur moyen pour ne pas avancer!
J'en arrive à la conclusion, que ton article est tout simplement génial!
je vais bien l'étudier avant de chercher d'autres infos.
grand merci à toi

Marc

charognard a écrit :Et si tu prenais au moins le temps de lire mon article
Donné déjà deux fois en lien dans ce fils.
Tu as toutes les commandes BASIC, C et CASL.
et dans le manuel aussi donné précédemment tu as leur syntaxe respective


PS :
Pour le C les commandes standards sont en noires, en bleu la bibliothèque mathématique et en rouge celle graphique.
Pour le BASIC je signale les spécificités par rapport aux autres PC SHARP de la série 12 et 13

Répondre

Revenir vers « Tous les Pockets »