Calculadoras Programables - programas para trazado en casio

hola me gustaria saber si es posible que existan programas para el desarrollo y trazado de tuberias y si los hay como acceder a los mismos gracias

Bueno siempre ante todo deberas indicar que modelo de calculadora CASIO es la que posees.
Ya que varia la cantidad de programas que existen para uno y otro modelo.
Respecto al programa que andas buscando no se si exista pero si no lo hubiera lo que tendrias que hacer es empezar a programar ya que si tienes una calculadora programable y no la sabes programar estas arruinado.
http://classpad.890m.com/foro
[email protected]

quisiera saber si alguien tiene programas para trazado de tuberías para la calculadora casio classpad II fx-cp400, mi correo es [email protected]

CALCULO DE POLIGONAL


30 PRINT “POLIGONAL CERRADA”
35 ON ERROR GOTO 800
40 CLEAR
50 INPUT “CUANTOS LADOS…”; L
60 DIM A(4,L+1),B(3,L),C(2,L+1),D(3,L+1),G(L),H(L),Z(L)
70 FOR I=1 TO L
80 PRINT “DIST.(“;I;”)=”;: INPUT D(1,I): NEXT I
85 PRINT “AZIMUT A, DESVIACIONES D,EXTERNOS E,INTERNOS I,RUMBOS, R”
90 INPUT “AZIMUT, DESV, EXT, INT, RUMBOS”; A$
91 IF A$=”A” OR A$=”AZIMUT” THEN 95
92 IF A$=”D” OR A$=”DESV” THEN 120
93 IF A$=”I” OR A$=”INT” OR A$=”INTERNOS” THEN 100
94 IF A$=”R” OR A$=”RUMBOS” THEN 248
95 IF A$=”E” OR A$=”EXT” THEN 158
96 FOR I= 1 TO L: PRINT “AZ(=”;I;”)”;: INPUT A(2,I) : NEXT I:GOTO 241
100 I=1
110 INPUT “PRIMER AZIMUT=”;A(1,I)
111 I=1
112 I=I+1: IF I>L+1 THEN 116
113 PRINT “INT(“;I;”)=”;: INPUT A(0,I):A(1,I)=A(0,I)
114 IF A(0,I)>180 THEN A(1,I)=A(0,I)-180: GOTO 112
115 IF A(0,I)<180 THEN A(1,I)=-(180-A(0,I)) : GOTO 112
116 PRINT “CHEQUEO DE ANG. INTERNOS”:FOR I=2 TO L+1:PRINT “INT(“;I;”)=”; DMS$(A(0,I)): NEXT I: GOTO 172
120 FOR I=1 TO 1
121 PRINT “PRIMER AZIMUT=”;: INPUT A(1,I):NEXT I
125 FOR I=2 TO L
130 PRINT “DESV(“;I;”)=”;: INPUT A(1,I): NEXT I
140 FOR I=A(1,L+1) TO A(1,L+1)
150 INPUT “ULTIMA DESV=”;A(1,L+1): NEXT I
155 GOTO 172
158 FOR I=1 TO 1
159 INPUT “PRIMER AZIMUT=”;A(0,I): NEXT I
160 FOR I=2 TO L+1
162 PRINT “EXT(“;I;”)”;: INPUT A(0,I):A(1,I)=A(0,I)

CALCULO DE POLIGONAL


163 IF A(1,I)>180 THEN A(1,I)=A(1,I)-180
164 IF A(1,I)<180 THEN A(1,I)=-(180-A(1,I)): NEXT I
165 PRINT “CHEQUEO DE EXTERNOS”:FOR I=2 TO L+1
166 PRINT “EXT(“;I;”)=”;DMS$(A(1,I): NEXT I
172 PRINT “CHEQUEO DE DESVIACIONES”
173 I=1
174 I=I+1: IF I>L THEN 177
175 IF A(1,I)>0 THEN PRINT “DESV(“;I;”)=”;DMS$(A(1,I)); “ “;” DER”:GOTO 174
176 IF A(1,I)<0 THEN PRINT “DESV(“;I;”)”;DMS$(ABSA(1,I));” “;” IZQ”: GOTO 174
177 B=0
178 FOR I=2 TO L+1
179 B=B+A(1,I): NEXT I
180 PRINT “ERROR ANG=”;DMS$(360-ABSB)
181 I=I+1:IF I>L+1 THEN 190
182 IF A(1,I)>180 THEN PRINT “INT(“;I;”)=”; DMS$(180-A(1,I))
183 IF A(1,I)<180 THEN PRINT “INT(“;I;”)=”; DMS$(180-ABSA(1,I)):GOTO 180
190 SET N: PRINT “CHEQUEO DE DIST. Y AZIMUT”
200 A=0: FOR I=1 TO L
210 A=A+A(1,I):A(2,I)=A
220 IF A(2,I)>360 THEN A(2,I)=A(2,I)-360
230 IF A(2,I)<0 THEN A(2,I)=360-ABSA(2,I)
240 NEXT I
241 FOR I=1 TO L
242 PRINT “(“;I;”)”;: PRINT D(1,I);” AZ”;DMS$(A(2,I)): NEXT I: GOTO 280
248 I=0
249 I=I+1: IF I>L THEN 300
250 PRINT “RUMBO”;I;: INPUT A(1,I)
252 INPUT “CUADRANTE 1=NE,2=SE,3=SW,4=NW”;R$
260 IF R$=”1” GOTO 270
261 IF R$=”2” GOTO 271
262 IF R$=”3” GOTO 272
263 IF R$=”4” GOTO 273
270 A(2,I)=A(1,I): GOTO 249
271 A(2,I)=180-A(2,I): GOTO 249
272 A(2,I)=180+A(1,I):GOTO 249



CALCULO DE POLIGONAL


273 A(2,I)=360-A(1,I): GOTO 249
274 A=0: FOR I=1 TO L
275 A=A+A(2,I): NEXT
276 PRINT A-360
280 I=0:PRINT “RUMBO CALCULADO”
282 I=I+1:IF I>L THEN 300
283 IF A(2,I)<90 THEN 287
284 IF A(2,I)>90 AND A(2,I)<=180 THEN 288
285 IF A(2,I)=>180 AND A(2,I)<=270 THEN 289
286 IF A(2,I)=>270 AND A(2,I)<=360 THEN 290
287 PRINT “R(“;I;”)=”;” N”;DMS$(A(2,I));” E”:GOTO 282
288 PRINT “R(“;I;”)=”;” S”;DMS$(180-A(2,I));” E”:GOTO 282
289 PRINT “R(“;I;”)=”;” S”;DMS$(A(2,I)-180);” W”:GOTO 282
290 PRINT “R(“;I;”)=”;” N”;DMS$(360-A(2,I));” W”:GOTO 282
300 I=0:PRINT “CALCULANDO”;
305 I=I+1
310 IF I>L THEN 410
320 IF A(2,I)<=90 THEN 360
330 IF A(2,I)=>90 AND A(2,I)<=180 THEN 380
340 IF A(2,I)=>180 AND A(2,I)<=270 THEN 390
350 IF A(2,I)=>270 AND A(2,I)<=360 THEN 400
360 B(1,I)=D(1,I)*COSA(2,I):C(1,I)=D(1,I)*SINA(2,I):GOTO 305
380 H(I)=D(1,I)*COSA(2,I):C(1,I)=D(1,I)*SINA(2,I):GOTO 305
390 H(I)=D(1,I)*COSA(2,I):Z(I)=D(1,I)*SINA(2,I):GOTO 305
400 B(1,I)=D(1,I)*COSA(2,I):Z(I)=D(1,I)*SINA(2,I):GOTO 305
410 N=0:FOR I=1 TO L
420 N=N+B(1,I):NEXT I
430 S=0:FOR I=1 TO L
440 S=S+H(I):NEXT I
450 E=0:FOR I=1 TO L
460 E=E+C(1,I):NEXT I
470 O=0:FOR I=1 TO L
480 O=0+Z(I):NEXT I
500 FOR I=1 TO L
510 B(2,I)=B(1,I)
515 IF B(2,I)<=0 THEN B(2,I)=H(I)
520 G(I)=C(1,I)
CALCULO DE POLIGONAL


525 IF C(1,I)<=0 THEN G(I)+Z(I)
530 SET N:PRINT :PRINT;
540 PRINT “LA(“;I;”)=”;
545 SET F3:PRINT B(2,I);
546 SET N:PRINT “LO(“;I;”)=”;
547 SET F3:PRINT G(I):NEXT I
550 SET F3:PRINT “ N”;N;” “;” E=”;E;” “; S=”;S;” “;” O=”;O
560 J=SQR(ABS(N+S)^2+(ABS(E+O)^2)
570 PRINT “ERROR DE CIERRE=”;
580 T=0
590 FOR I=1 TO L:T=T+D(1,I):NEXT I:IF J=0 THEN 610
600 SET F3:PRINT “PERIMETRO=”;T;” PRECISION 1 EN”;
1/(J/T):GOTO 620
610 PRINT :PRINT “CERO ERROR DE DISTANCIA”
620 PRINT “CALCULANDO”;
630 K=(N+S)/(N-S):M=(E+O)/(E-O)
640 FOR I=1 TO L
650 IF B(2,I)>0 THEN B(3,I)=B(2,I)-B(2,I)*K
660 IF B(2,I)<0 THEN B(3,I)=B(2,I)+B(2,I)*K
670 A(3,I)=G(I)-G(I)*M
680 IF A(3,I)<0 THEN A(3,I)=G(I)+G(I)*M
690 NEXT I
700 PRINT :PRINT “COMPENSADAS”
710 FOR I=1 TO L:SET N
720 PRINT “(Y”;I;”)=”;:SET F3
730 PRINT B(3,I);” “;” X”;A(3,I):NEXT I
740 PRINT “COORDENADAS”
750 P=0:Q=0
755 FOR I=1 TO L
760 P=P+B(3,I):D(2,I)=P:Q=Q+A(3,I):D(3,I)=Q
770 SET N:PRINT”X(“;I;”)=”;:SET F5
780 PRINT D(3,I);:SET N:PRINT “Y(“;I;”)’;:SET F5
790 PRINT D(2,I):NEXT I
791 A=0:B=0:I=0
792 I=I+1:IF I>L THEN 795
793 B(0,I)+D(2,I)*D(3,I+1):C(0,I)=D(3,I)*D(2,I+1):A=A+B(0,I):B=B+C(0,I);GOTO
792
795 W=ABS(A-B)/2:PRINT “AREA m2=”;W;” v2=”;W*1.434257
CALCULO DE POLIGONAL


796SET F3:PRINT “Has.=”;W/10000;”Mzs=”;W*1.434257/10000:GOTO 30
800 PRINT “EL DATO REBASA LA MEMORIA LIBRE

1.434257 numero que multiplicamos metros cuadrados para convertir a varas cuadradas

[email protected]

avisame cuando lo tengas en tu poder

====

ola estoy interesado en alguna calculadora programable oi de un companero de trbajo ke tiene una calculadora ke solo mete dato de un brida de 20 pulgadas ejemplo extra pesada y le da todos los datos peso de la brida cuantos hoyos medida de cara asiento le da todo sabes ke tipo de calculadora hablo xfa si sabes podrias escribirme

Deberias preguntarle que modelo de calculadora tiene si es Casio podria ser algun modelo de estos Algebra FX 2.0 Plus, FX 9860G, FX 9860G SD, FX 9860G Slim, FX 9860GII SD, Classpad 330, FX 7400G Plus, algun modelo de la serie CFX.

http://casio.foroactivo.com

hola marco tengo programas parar calculadoras bocas de pescados injertos a grados tangenciales,4 tipos de muñones ,codos de virolas,red conc y exc. piel naranja tranportador elecoidal redondo alcuadrado y muchos mas contactame a ferpab_80@hot mail.com y nos ponemos de acuerdo

hola niño como estas buscando informacion en la red encontre tu correo y sirve de que me dijeras como dejaste mis programas en cm o mm y como utilizarlos porque no estan como yo traigo los demas me gustaria platicar contigo hace poco hable a tu casa pero no estabas te mando el tel de mi casa 9211565416 espero tu respuesta o llamada

Megustaria saber de esos programas tengo una Casio fx9860g11 estoy en Houston tx USA megustaria comunicarme con ustedes

Hola soy tubero me interesaría comprar una calculadora q tenga programas para el trazo de bocavdebpescados muñón a codo muñón a codo tangencial e insertos a diferentes grados pues me ahorraría tiempo ala y si hay para sacar virolas mucho mejor mi cel esb9211058693 xsi alguien tiene alguna y me explicara q programa es para cada cual.... Saludos.

estoy interesado en los programas para trazos en tuberia mi calculadoora es 7400g plus como te puedo contactar

hola
soy antonio, maestro trazador en chapa, nesecito saber de donde eres, porque tengo una calculadora casio FX 9860GII SD, y nesecito programas para ingresarle a esta calculadora para asi trabajar mas rapido ejemplos: bocas de pescados injertos a grados tangenciales,4 tipos de muñones ,codos de virolas,red conc y exc. piel naranja tranportador elecoidal redondo alcuadrado y muchos mas . po favor contactame al correo [email protected] o al fono: 98493459 soy de chillan.

si los tengo

Enrique Pinzon, esos progtramas de trazado para que modelo casio es? yo tengo fx880P y fx9750G Plus...¿me los podias mandar? Gracias

hola que tal me interesa ese programa ya que lo tenia pero no lo bloquie y me lo borraron un maestro y lo nesecito ya que me asendieron a maestro primera aca en la pege quisiera saber si me puede ayudar vale gracia espero su respuesta mi correo es el [email protected] y mi fono es el 90430706

si le interesa la calculadora este es mi correo [email protected] y nos ponemos de acuerdo