Dessiner avec sa TI-nspire

[Ciwtron]

J'ai vérifié et j'ai tout bien fermé. Et j'ai plein de bugs de j'avais pas avant, j'y comprends plus rien.

[Levak]

J'ai vérifié et j'ai tout bien fermé. Et j'ai plein de bugs de j'avais pas avant, j'y comprends plus rien.

Tu veux qu'on y jette un coup d'oeil ?

[critor]

J'ai vérifié et j'ai tout bien fermé. Et j'ai plein de bugs de j'avais pas avant, j'y comprends plus rien.

Poste-nous ton code!


T'as du changer un petit truc que t'aurais pas du changer sans faire exprès...

T'inquiète, ça arrive à tous les programmeurs!
"ça marchait, j'ai rien fait, et ça marche plus..."
C'est contagieux, mais pas mortel

[Levak]

Levak décroche son oeil, et le balance à Ciwtron, il aura jeté un oeil...

[Ciwtron]

Ca va faire mal! Accrochez vous!

 

Show/Hide spoilerAfficher/Masquer le spoiler

Code: Select all

Print "Traducteur BMP==XML pour TI Nspire"
rem Print "212"
rem Print "318"
Print "Nom du fichier .bmp (avec extension, sans espaces):"
rem input bmpfich$
bmpfich$="bmp.bmp"
Print "Nom du fichier .xml à créer (avec extension, sans espaces):"
rem input xmlfich$
xfich$="x.txt"
pp$="pastouche"

ciblefich$="C:BMPtoXML"
xfich$=ciblefich$+xfich$
open #1,xfich$,"w"
ciblepastouche$=ciblefich$+pp$
open #5, ciblepastouche$,"r"

bmpciblefich$="C:BMPtoXML"
bmpfich$=bmpciblefich$+bmpfich$
print bmpfich$
open #2, bmpfich$
for i=1 to 10
bmpbrut=peek(#2)
print bmpbrut
next i
bmpbrut=peek(#2)
offset=bmpbrut-11
for i=1 to offset
bmpbrut=peek(#2)
print bmpbrut
next i

print #1 "?xml version="
print #1 pt$
print #1 "1.0"
print #1 pt$
print #1 " encoding="
print #1 pt$
print #1 "UTF-8"
print #1 pt$
print #1 " ?prob xmlns="
print #1 pt$
print #1 "urn:TI.Problem"
print #1 pt$
print #1 " ver="
print #1 pt$
print #1 "1.0"
print #1 pt$
print #1 "syme t="
print #1 pt$
print #1 "1"
print #1 pt$
print #1 "f="
print #1 pt$
print #1 "0"
print #1 pt$
print #1 ""

for j=1 to 20
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (x2)

for j=21 to 40
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (x3)

for j=41 to 60
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (x4)

for j=61 to 71
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j
close #2


open #2, bmpfich$,"r"
offset=offset+11
for i=1 to offset
bmpbrut=peek(#2)
print bmpbrut
next i

rem écrire un truc de changement de variable (y4)

for j=1 to 20
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (y2)

for j=21 to 40
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (y3)

for j=41 to 60
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j

rem écrire un truc de changement de variable (y4)

for j=61 to 71
for k=1 to 14
bmpbrut=peek(#2)
print bmpbrut;
bmp$=bin$(bmpbrut)
print bmp$,"-";
if left$ (bmp$,1)="1" then
print #1 8*(k-1)+1;
print #1 ",";
endif
if mid$(bmp$,2,1)="1" then
print #1 8*(k-1)+2;
print #1 ",";
endif
if mid$(bmp$,3,1)="1" then
print #1 8*(k-1)+3;
print #1 ",";
endif
if mid$(bmp$,4,1)="1" then
print #1 8*(k-1)+4;
print #1 ",";
endif
if mid$(bmp$,5,1)="1" then
print #1 8*(k-1)+5;
print #1 ",";
endif
if mid$(bmp$,6,1)="1" then
print #1 8*(k-1)+6;
print #1 ",";
endif
if mid$(bmp$,7,1)="1" then
print #1 8*(k-1)+7;
print #1 ",";
endif
if mid$(bmp$,8,1)="1" then
print #1 8*(k-1)+8;
print #1 ",";
endif
next k
next j
close #2

print #1 "/symcard clay="
print #1 pt$
print #1 "0"
print #1 pt$
print #1 " h1="
print #1 pt$
print #1 "10000"
print #1 pt$
print #1 " h2="
print #1 pt$
print #1 "10000"
print #1 pt$
print #1 " w1="
print #1 pt$
print #1 "10000"
print #1 pt$
print #1 "w2="
print #1 pt$
print #1 "10000"
print #1 pt$
print #1 "flag0/flagwdgt xmlns:gg="
print #1 pt$
print #1 "urn:TI.GeoGrapher"
print #1 pt$
print #1 " type=
print pt$
print #1 TI.GeoGrapher"
print #1 pt$
print #1 "ver="
print #1 pt$
print #1 "1.0"
print #1 pt$
print #1 "gg:mFlags2048/gg:mFlagsgg:value1/gg:valuegg:anim_x10/gg:anim_xgg:anim_y35/gg:anim_ygg:figgg:ver3/gg:vergg:objsgg:axes_systemgg:id1/gg:idgg:axes_p/gg:axes_pgg:xorg43.163/gg:xorggg:yorg46.5815/gg:yorggg:xuni1.3674/gg:xunigg:yuni0.6837/gg:yunigg:xmin0/gg:xmingg:xmax10/gg:xmaxgg:ymin0/gg:ymingg:ymax10/gg:ymaxgg:acol0/gg:acolgg:aast0/gg:aastgg:aazm0/gg:aazmgg:apth0/gg:apthgg:asho1/gg:ashogg:lbl/gg:lblgg:stat0/gg:stat/gg:axes_systemgg:axisgg:id2/gg:idgg:par1 /gg:pargg:xaxis/gg:xaxisgg:smrt2/gg:smrtgg:sm10/gg:sm1gg:sm213.674/gg:sm2gg:alco0/gg:alcogg:acst0/gg:acstgg:apst0/gg:apstgg:apth0/gg:apthgg:asho1/gg:ashogg:ales0/gg:alesgg:lblx/gg:lblgg:stat16/gg:stat/gg:axisgg:labelgg:id3/gg:idgg:par2 /gg:pargg:lbl_agg:t0.5/gg:tgg:dx0/gg:dxgg:dy0/gg:dy/gg:lbl_agg:chrs1 1 3 0 0 0 x/gg:chrsgg:deta0/gg:detagg:atta1/gg:attagg:x57.41200005/gg:xgg:y47.00649995/gg:ygg:atco0/gg:atcogg:afon0/gg:afongg:asho1/gg:ashogg:lbl/gg:lblgg:stat0/gg:stat/gg:labelgg:axisgg:id4/gg:idgg:par1 /gg:pargg:yaxis/gg:yaxisgg:smrt2/gg:smrtgg:sm10/gg:sm1gg:sm26.837/gg:sm2gg:alco0/gg:alcogg:acst0/gg:acstgg:apst0/gg:apstgg:apth0/gg:apthgg:asho1/gg:ashogg:ales0/gg:alesgg:lbly/gg:lblgg:stat16/gg:stat/gg:axisgg:labelgg:id5/gg:idgg:par4 /gg:pargg:lbl_agg:t0.5/gg:tgg:dx0/gg:dxgg:dy0/gg:dy/gg:lbl_agg:chrs1 1 3 0 0 0 y/gg:chrsgg:deta0/gg:detagg:atta1/gg:attagg:x42.98800005/gg:xgg:y54.59349995/gg:ygg:atco0/gg:atcogg:afon0/gg:afongg:asho1/gg:ashogg:lbl/gg:lblgg:stat0/gg:stat/gg:labelgg:gridgg:id6/gg:idgg:par1 /gg:pargg:grid_as/gg:grid_asgg:acol10066329/gg:acolgg:agst0/gg:agstgg:apth0/gg:apthgg:asho0/gg:ashogg:lbl/gg:lblgg:stat16/gg:stat/gg:gridgg:expressiongg:id7/gg:idgg:r_expr/gg:r_exprgg:expr{x,y}/gg:exprgg:prms/gg:prmsgg:lbls1/gg:lblgg:stat73744/gg:stat/gg:expressiongg:scatter_plotgg:id8/gg:idgg:par7 1 /gg:pargg:scat_e/gg:scat_egg:acol0/gg:acolgg:asho1/gg:ashogg:adst6/gg:adstgg:adcn0/gg:adcngg:apac-255 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 /gg:apacgg:lbl/gg:lblgg:stat0/gg:stat/gg:scatter_plot/gg:objsgg:toolgg:ToolGraphergg:vis0/gg:visgg:dhs/gg:dhsgg:phs/gg:phsgg:shs*s1*/gg:shs/gg:ToolGraphergg:ToolScalegg:len20/gg:lengg:vis0/gg:vis/gg:ToolScale/gg:toolgg:anim1/gg:animgg:w100/gg:wgg:h100/gg:hgg:vpx42.05/gg:vpxgg:vpy54.6/gg:vpygg:geos1/gg:geosgg:geoucm/gg:geou/gg:fig/wdgt/card/prob"
close #1
close #5

Print "Réferez vous au Lisez moi pour la suite! (et n'oubliez pas de rennomer le xml en problem1.xml.)"



[critor]

Levak décroche son oeil, et le balance à Ciwtron, il aura jeté un oeil...

Mais attention, tu lui as donné le mauvais oeil...

[Ciwtron]

Si tous est aussi découpé pour les print #1, c'est que je peut pas dire print le symbole ". Donc je vais le chercher quelque part et je le réinjecte.

[Ciwtron]

Je suis en train de transformé le Basic en C. Sauf que ça commence fort, je suis bloqué au bout de 30 lignes^^.

Code: Select all

#include stdio.h
#include stdlib.h
#include string.h

int main()
{
    printf("Traducteur BMP==XML pour TI Nspiren");
    printf("Nom du fichier .bmp (avec extension, sans espaces):");
    char bmpfich[100];
    scanf("%s", bmpfich);
    sprintf(bmpfich, "bmp.bmp");
    printf("Nom du fichier .xml (avec extension, sans espaces):");
    char xmlfich[100];
    scanf("%s", xmlfich);
    sprintf(xmlfich, "x.txt");

    FILE* fichierbmp = NULL;
    fichierbmp = fopen(bmpfich, "r");
   FILE* fichierxml = NULL;
    fichierxml = fopen(xlmfich, "w");
    if (fichierbmp != NULL)
    {    }
    else
    {
    printf("Impossible d'ouvrir le fichier bitmap");
       }
    if (fichierxml != NULL)
       {    }
    else
    {
    printf("Impossible d'ouvrir le fichier xml");
    }



A la compilation j'ai gentiment le droit à :

Code: Select all

D:Program FilesCodeBlocksCiwtronCiwtronmain.c: In function `main':
D:main.c:20: error: `xlmfich' undeclared (first use in this function)
D:main.c:20: error: (Each undeclared identifier is reported only once
D:main.c:20: error: for each function it appears in.)
Process terminated with status 1 (0 minutes, 0 seconds)
3 errors, 0 warnings
 

[Levak]

Tu ne définies pas les variables, en C il ne suffit pas de dire var = 1;
Il faut définir leur type
unsigned int2 var = 1;

[ioraito]

en C il existe quelque fonctions qui ne se trouve que dans le seul et unique compilateur fiable " turbo C " ou C++ de borland C codeblocks est tres bien mais il manque de bibliotheque alors Turbo C reste inchangeable e.g : essaye la fonction gotoxy() et tu verras

et si tu veux eviter les erreurs edit ton fichier sur Ultra edit

j'espere àavoir aider ^^