Bonjour,
J'aimerais faire tourner un petit programme en BASIC sur mon vieux PC avec Windows Vista.
Est- ce que sur cette version de Windows on dispose d'un interpreteur BASIC?
Je crois me rappeler qu'il y a plusieurs annees, Windows avait un GW Basic je crois. Mais est-ce encore le cas?
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
Bsr à toi,
Connais tu Google ?
https://www.google.com/url?sa=t&rct=...N9-285TXXE-J_j
1/4 de demi seconde
A+
Merci, mais je suis assez réticent à faire tourner sur ma machine des exécutables téléchargés sur des sites inconnus.
C'est pour ça que je demande s'il y a un interpréteur BASIC dans Windows ou bien si on peut en obtenir un chez Microsoft.
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
Bonjour
Il n'y plus d'interpréteur Basic dans Windows depuis ..... fort fort longtemps.
Je ne suis même pas sur qu'on puisse encore en trouver pour les systèmes actuels.
En revanche, on trouve encore des compilateurs; donc la solution est peut être de compiler ton programme pour l'exécuter.
Problème : le Basic est très peu normé, la norme ne recouvre que peu de choses ce qui fait que chaque interpréteur avaient ses propres instructions complémentaires.
Si tu ne sais pas d'où vient de programme (pour quel Basic a-t-il été écrit ? quand ?) ça peut devenir compliqué.
Tout dépend de la taille du programme ....
Comme le dit fustigator chaque Basic a sa syntaxe (et son interpréteur).
Si tu donne le code on peut voir ce qu'on peut faire; un code Basic c'est rarement très volumineux
Après, si tu crains de télécharger, il reste le papier crayon.
C'est bien ce que je craignais...
Le programme ne fait que 34 lignes. Ce sont des calculs assez simples.
Je vais essayer de me débrouiller avec une feuille Excel.
Merci quand même les gars.
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
34 lignes ? Si il ne manque pas quelques 0, ça devrait pouvoir se gérerEnvoyé par Yvan_Delaserge
Poste ça ici, dans une balise CODE et on te dira sur quoi le faire tourner
Voici le programme, que je n'ai qu'imprime sur une feuille de papier. Il a ete ecrit en 1989 par quelqu'un de tres cale. Il sert a calculer les dimensions des elements d'un filtre electronique en hyperfrequences. J'ai termine la feuille excel et ca fournit les resultats escomptes, donc inutile de faire tourner le programme BASIC, mais j'ai quand meme deux petits doutes: aux lignes 190 et 270, pourquoi ecrit-il "1+1" ou bien "2+1"? Au lieu de "2" respectivement "3"?
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
REmoi, Le hic, c'est que RIEN n'est joint ! (voici le programme)
Bonne journée
Voici le programme.
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
Non, il faudrait que tu mette le code du programme dans des balise code comme ça on peut faire du copier/coller; là c'est une image, c'est un peu plus ennuyeux à exploiter. Comme ton code, fait 34 lignes, mon idée était de le copie et de le passer si il ne présente pas de difficultés dans un Basic "moderne" mais pour cela il faut que je puisse copier/coller.
EDIT :ah, zut j e n'avais pas du ton dernier message. Sur papier, ok.
Non, c'est une question de priorité d’opérations; il n'écrit pas 1 + 1 mais 1 + 1/kkchose; dans le basic utilisé visiblement la division est prioritaire sur l'addition (dans le cas contraire, il aurait mis des parenthèses : 1 + (1/...) )
A la ligne 270 , même chose, c'est pas 2 + 2 mais (kkchose puissance 2) + 1
En attendant la validation de ta pièce jointe, si tu ne veux pas installer de programme sur ta machine, tu peux prendre un interpréteur en ligne :
http://www.quitebasic.com
Sinon, on trouve vraiment plein d'implémentations qui peuvent être installées sans risque.
Voilà, j'ai fait un OCR et j'ai essayé de corriger toutes les erreurs, ça devrait tourner comme ça.
A un certain moment il devrait demander les coefficients G. Mais on va déjà voir s'il tourne comme ça.
Merci d'avance, en tout cas.
Code:10 CLS: PRINT "EVANESCENT MODE FILTER DESIGN PROGRAM": PRINT 20 INPUT "WHAT IS CENTER FREQUENCY IN MHZ" ;FO: FO-FO*1000000! 30 INPUT "BANDWITH IN MHZ";BW: BW=BW*1000000! 40 LAMDAO=3E+10/FO 50 PRINT: PRINT "ENTER ALL DIMENSIONS IN INCHES": CM=2.54 60 PRINT: LG=1.2*LAMDAO/2/CM 70 PRINT "WHAT IS PROPAGATING WAVEGUIDE DIMENSION, AP (";LG; ")": INPUT AP 80 PRINT "WHAT IS PROPAGATING WAVEGUIDE DIMENSION, BP (";LG/2; ")":INPUT BP 90 BP=BP*CM: AP=AP*CM 100 INPUT "WHAT IS EVANESCENT WAVEGUIDE DIMENSION A(<AP/3)"; AE: AE=AE*CM 110 INPUT "WHAT IS EVANESCENT WAVEGUIDE DIMENSION B(A/2)"; BE: BE=BE*CM 120 LAMDAC=2*AE 130 LAMDAO-3E+10/FO 140 R=LAMDAO/LAMDAC 150 P=R^2-1 160 Q=SQR(P) 170 GAMMA=(6.283185/LAMDAO)*Q 180 LO=1.83178/GAMMA 190 DELTA=2/(1+1/(1-(LAMDAC/LAMDAO)^2)) 200 INPUT "NUMBER OF COMPONENTS FROM FILT-ELE PROGRAM" ;NUM 210 FOR N=1 TO NUM 220 PRINT "ENTER G";N:INPUT G(N) 230 NEXT 240 WO=FO*6.2831853# :PRINT 250 FOR N=1 TO NUM-1 260 RAD=0.5*WO*DELTA*SQR(G(N)*G(N+1))/(BW*6.2831853#) 270 LR=LOG(RAD+SQR((RAD)^2+1))/GAMMA 280 PRINT "L"; N;"(POST SPACINGS) =";LR/CM 290 NEXT 300 POSTDIA=0.2*AP 310 POSTH=0.5*BE 320 PRINT "POST DIAMETER =" POSTDIA/CM 330 PRINT "POST HEIGHT =" POSTH/CM 340 END
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
ça coince à la ligne 20
Il me dit:
Syntax error on line 20(near the @ sign): 20 INPUT "WHAT IS CENTER FREQUENCY IN MHZ" ;FO: FO=FO*1000000@!
Apparemment, il n'aime pas le !
Mais si je l'enlève, il me répond:
Error on line 20: Expected undefined
Là, normalement, je dois entrer une donnée, mais je ne sais pas si c'est possible. dans ce basic online, En tout cas, il n'y a pas de curseur sur la fenêtre output.
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
Les valeurs de G que le programme va demander sont contenues dans ce tableau.
si NUM = 2, il va demander 2 valeurs. Si NUM =3, 3 valeurs, etc.
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
Il y avait encore deux erreurs: des - à la place de =
Code:10 CLS: PRINT "EVANESCENT MODE FILTER DESIGN PROGRAM": PRINT 20 INPUT "WHAT IS CENTER FREQUENCY IN MHZ" ;FO: FO=FO*1000000! 30 INPUT "BANDWITH IN MHZ";BW: BW=BW*1000000! 40 LAMDAO=3E+10/FO 50 PRINT: PRINT "ENTER ALL DIMENSIONS IN INCHES": CM=2.54 60 PRINT: LG=1.2*LAMDAO/2/CM 70 PRINT "WHAT IS PROPAGATING WAVEGUIDE DIMENSION, AP (";LG; ")": INPUT AP 80 PRINT "WHAT IS PROPAGATING WAVEGUIDE DIMENSION, BP (";LG/2; ")":INPUT BP 90 BP=BP*CM: AP=AP*CM 100 INPUT "WHAT IS EVANESCENT WAVEGUIDE DIMENSION A(<AP/3)"; AE: AE=AE*CM 110 INPUT "WHAT IS EVANESCENT WAVEGUIDE DIMENSION B(A/2)"; BE: BE=BE*CM 120 LAMDAC=2*AE 130 LAMDAO=3E+10/FO 140 R=LAMDAO/LAMDAC 150 P=R^2-1 160 Q=SQR(P) 170 GAMMA=(6.283185/LAMDAO)*Q 180 LO=1.83178/GAMMA 190 DELTA=2/(1+1/(1-(LAMDAC/LAMDAO)^2)) 200 INPUT "NUMBER OF COMPONENTS FROM FILT-ELE PROGRAM" ;NUM 210 FOR N=1 TO NUM 220 PRINT "ENTER G";N:INPUT G(N) 230 NEXT 240 WO=FO*6.2831853# :PRINT 250 FOR N=1 TO NUM-1 260 RAD=0.5*WO*DELTA*SQR(G(N)*G(N+1))/(BW*6.2831853#) 270 LR=LOG(RAD+SQR((RAD)^2+1))/GAMMA 280 PRINT "L"; N;"(POST SPACINGS) =";LR/CM 290 NEXT 300 POSTDIA=0.2*AP 310 POSTH=0.5*BE 320 PRINT "POST DIAMETER =" POSTDIA/CM 330 PRINT "POST HEIGHT =" POSTH/CM 340 END
Un civet, un plat de côtes et puis, glissez-moi une petite paupiette avec.( Lino Ventura)
