Reviews & Opinions
Independent and trusted. Read before buy Casio PG-310!

Casio PG-310

Manual

Preview of first few manual pages (at low quality). Check before download. Click to enlarge.
Manual - 1 page  Manual - 2 page  Manual - 3 page 

Download (English)
Casio PG-310, size: 4.2 MB
Instruction: After click Download and complete offer, you will get access to list of direct links to websites where you can download this manual.

About

Casio PG-310About Casio PG-310
Here you can find all about Casio PG-310 like manual and other informations. For example: review.

Casio PG-310 manual (user guide) is ready to download for free.

On the bottom of page users can write a review. If you own a Casio PG-310 please write about it to help other people.

 

[ Report abuse or wrong photo | Share your Casio PG-310 photo ]

Video review

demo Guitar Synthesizer casio pg 310

 

User reviews and opinions

<== Click here to post a new opinion, comment, review, etc.

No opinions have been provided. Be the first and add a new opinion/review.

 

Documents

doc0

************ Program for CASIO FX-880P *************
CLEAR:CLS:MODE4:SETN:a$="[anykey]:":i$=CHR$(228):k$=a$+"Back ":t$=a$+"None ": p$=">Peg #":o$=CHR$(240):c$="Position of " v$=CHR$(230):m$=CHR$(135):e$=CHR$(132):d$=CHR$(238):q$=" m"+CHR$(146): b$=">Line ":h$=">Sta #":GOTO900 CLS:BEEP1:RETURN n$=INPUT$(1):CLS:BEEP:RETURN CLS:LOCATE0,1:PRINTH$;:RETURN BEEP:LOCATE5,0:PRINT" ( 26 ) 40 BEEP:LOCATE0,0:PRINT" ( 30 ) 105 R$=">1:Continue "+a$+"End ":GOTO45 R$=">1:N&E "+a$+"Azimuth " LOCATE0,0:PRINTR$;:K$=INPUT$(1):GOSUB40:RETURN R$="#Station" LOCATE0,0:PRINTR$;:INPUT" = ",a:GOSUB40:RETURN R$=">Sta BW." LOCATE0,0:PRINTR$;:INPUT" (N)= ",x:GOSUB40 LOCATE0,0:PRINTR$;:INPUT" (E)= ",y:GOSUB40:RETURN GOSUB20:R$=c$+"X" X$="N":IF x<0 THEN X$="S" Y$="E":IF y<0 THEN Y$="W" LOCATE0,1:PRINTX$;ABS(x);:LOCATE16,1:PRINTY$;ABS(y);:GOTO120 LOCATE0,1:PRINT"Lat:";X;:LOCATE16,1:PRINT"Dep:";Y;:GOTO120 ";:RETURN ";:RETURN
LOCATE0,1:PRINT"Az:";DMS$(a);:LOCATE18,1:PRINT"Dis:";d; LOCATE0,0:PRINTR$;:GOSUB25:RETURN R$=RIGHT$(STR$(G),LEN(STR$(G))-1):RETURN z=FRACa*100:a=DEG(INTa,INTz,FRACz*100):RETURN IF a>540 THEN a=a-540:RETURN IF a>l80 THEN a=a-180:RETURN a=a+180:RETURN X=ROUND(REC(d*M,a),w):Y=ROUND(Y,w):RETURN X=ROUND(POL(x,y)/M,w):IF Y<0 THEN Y=Y+360 RETURN R$="1:UTM "+a$+"Normal ":GOSUB45 IF K$="1"GOTO630 IF Y=1 THEN M=1:GOTO240 R$="1:Chain "+a$+"Meter ":GOSUB45:M=1:IF K$="1" THEN u=4:U=5:GOTO250 u=3:U=4 w=-U:m=ROUND(M^2,-6):t=-6:RETURN R$="H.avg (h)":GOSUB50:h=a:IF a<-100 OR a>1E4 GOTO255 R$="Scale factor (k)":GOSUB50:IF a<.9 OR a>1.1 GOTO261 r=ROUND(r/(r+h),-6):M=ROUND(r*a,-6):GOTO240 LOCATE0,l:PRINT"Hz";I$;">";DMS$(a);:LOCATE19,1:PRINT"Dis";d;:GOTO120 IF r<0 THEN r=r+360 RETURN IF r>180 THEN r=360-r
RETURN DIM A(Q),B(Q),D(Q),N(Q),E(Q),X(Q),Y(Q):RETURN N(N+1)=N(1):E(N+1)=E(1):RETURN R$=h$+"1":GOSUB60:A=x:B=y:RETURN R$=h$+"2":GOSUB60:C=x:D=y x=C-A:y=D-B:GOSUB190:L=X:G=Y:a=Y:GOSUB150:H=a:RETURN a=SQR(b^2+c^2-2*b*c*COSX):RETURN X=ACS((b^2+c^2-a^2)/(2*b*c)):RETURN Q=a+1:N=a:GOSUB300 FOR I=1 TO N:G=I:GOSUB130:R$=">Sta #"+R$:GOSUB60:N(I)=x:E(I)=y:NEXT I:RETURN s=(a+b+c)/2:B=s*(s-a)*(s-b)*(s-c):A=ROUND(SQRB,t):RETURN LOCATE0,0:PRINTR$;:INPUT" (a) = ",a:GOSUB40:IF a<=0 GOTO390 a=a*M:RETURN LOCATE0,0:PRINTR$;:INPUT" (b) = ",b:GOSUB40:IF b<=0 GOTO400 b=b*M:RETURN LOCATE0,0:PRINTR$;:INPUT" (c) = ",c:GOSUB40:IF c<=0 GOTO410 c=c*M:RETURN LOCATE0,0:PRINTR$;:INPUT" (h) = ",h:GOSUB40:IF h<=0 GOTO420 h=h*M:RETURN SETF5:LOCATE0,0:PRINT"Area";R$;" =";ABS(A);:GOSUB25:RETURN R$="(Y)Reduce-N&E "+a$+"None ":GOSUB45:IF K$<>"Y" THEN RETURN R$="Reduct of":GOSUB60:Cn=x:Ce=y FOR I=1 TO N:N(I)=N(I)-Cn:E(I)=E(I)-Ce:NEXT I:RETURN
LOCATE0,0:PRINTR$;a;:GOSUB25:GOSUB40:RETURN W=0: R$="Fix area":GOSUB50:IF a<=0 GOTO500 IF U=5 THEN a=INTa+FRACa*2.5 W=a/m:RETURN x=A-C:y=B-D:GOSUB190:RETURN IF a=90 OR a=270 THEN a=0 RETURN Q=ABS((C*P+O*I+H*F+E*D-D*O-P*H-I*E-F*C)/(m*2)):T=T+Q:RETURN R$="UTM 0:User "+a$+"Standard ":GOSUB45:IF K$="0" GOTO650 r=6358211.105:GOTO260 R$="On Latitude":GOSUB50:IF a<0 OR a>80 GOTO650 b=6377276.345:e=6.637846E-3 r=b*SQR(l-e)/(1-e*SINa^2):GOTO260 IF S=1 THEN R$="PC sta" IF S=2 THEN R$="PI sta" IF S=3 THEN R$="PT sta" GOSUB30:GOSUB50:I=a IF S=2 AND I-T<0 GOTO730 IF S=3 AND I-l<0 GOTO730 IF I<0 GOTO730 RETURN GOSUB20:PRINT" 1:Position 2:Direct 3:Areas K$=INPUT$(1):K=VAL(K$):BEEP ON K GOTO 1000,2800,3200,5000,5300,999 4:Problem 5:Curve 6:Quit ";:

970 980

GOTO900 CLS:R$="By Phrompatt Junkrajang.(1998)":FOR I=1 TO 30 LOCATE0+I,0: PRINTMID$(R$,I,1);:NEXT I R$="Good Bye !":FOR I=1 TO 9:LOCATE11+I,1:PRINTm$; LOCATE11+I,1:PRINTMID$(R$,I,1);:NEXT I FOR I=1 TO 300:NEXT I ** Line 950 - 980 Line 950 ** /
BEEP1:CLEAR:CLS:SETN:GOTO#0 CLS R$="1:Traverse 2:0ffset 3:0nline4:Reference 5:X-Section 6:Back ":GOSUB45:K=VAL(K$)

ON K GOTO 1050,1900,1900,1900,2100,900 GOTO1010 H$="[Traverse]":GOSUB30 R$="1:Close 2:Open "+k$:GOSUB45:KS=VAL(K$):ON KS GOTO1100,1100 GOTO1000 H$="[Close Traverse]":IF KS=2 THEN H$="[Open Traverse]" GOSUB30:GOSUB210 GOSUB48:IF KS=1 AND a>2 THEN LS=2:GOTO1130 IF KS=2 AND a>0 GOTO1130 GOTO1110 IF a>99 GOTO1110 Q=a+1:N=a:GOSUB300:SETFu:G=N:GOSUB130:i$=R$:IF KS=1 GOTO1170
K$="2":GOSUB44:LS=VAL(K$):IF LS<>1 THEN LS=2:GOTO1170 GOSUB58:P=x:O=y GOSUB310:N(0)=x:E(0)=y IF KS=2 AND LS=1 GOTO1220 j$="BW.":IF KS=1 THEN j$="2" R$=">Az 1"+v$+j$:GOSUB50:GOSUB140:A(0)=a IF KS=1 GOTO1270 R$=h$+i$:GOSUB60:C=x:F=y IF LS=1 GOTO1240 R$=">Az "+i$+v$+"FW.":GOSUB50:GOSUB140:B=a:GOTO1280 R$=">Sta FW.":GOSUB60:L=x:K=y x=P-N(0):y=O-E(0):GOSUB190:A(0)=Y x=L-C:y=K-F:GOSUB190:B=Y:j=X:GOTO1280 C=N(0):F=E(0):N(N)=C:E(N)=F X1=C-N(0):Y1=F-E(0):TM=0:TD=0:TA=0 FOR I=1 TO N:G=I:GOSUB130:i$=R$:G=I+1:GOSUB130:j$=R$ p$=">Ang #" R$=p$+j$:IF KS=2 THEN R$=p$+i$:GOTO1320 IF I=N THEN R$=p$+"1" GOSUB50:GOSUB140:A(I)=a:TA=TA+a IF KS=2 AND I=N GOTO1360 p$=">Dis ":R$=p$+i$+v$+j$:IF KS=1 AND I=N THEN R$=p$+i$+v$+"1" GOSUB50:TD=TD+a:D(I)=a
NEXT I IF KS=1 GOTO1400 IF B<A(0) THEN B=B+360 S=B-A(0)+(N-1)*180:a=A(0):GOSUB150:A(0)=a:GOTO1410 S=(N-2)*180 R=S-TA:Z=R/N:B(0)=A(0):GOSUB20 G=M:GOSUB130:IF M=1 THEN R$="1.00000" LOCATE0,l:PRINTe$;"Dis";TD;:LOCATE19,1:PRINT"Er";DMS$(R); LOCATE0,0:PRINTe$''Ang";DMS$(TA);:LOCATE19,0:PRINT"Coff ";R$;:GOSUB25:GOSUB30 IF R=0 GOTO1560 R$="Adj by 0:User "+a$+"Auto ":GOSUB45 FOR I=1 TO N:IF K$<>"0"GOTO1550 G=I:GOSUB130:i$=R$:G=I+l:GOSUB130:j$=R$:p$="Hz>" R$=p$+j$:IF KS=2 THEN R$=p$+i$:GOTO1530 IF I=N THEN R$=p$+"1" LOCATE0,0:PRINT R$;DMS$(A(I));:LOCATE20,0:PRINT"Adj(";CHR$(34);:INPUT") ",a: GOTO40 Z=DEG(0,0,a) A(I)=A(I)+Z:NEXT I:H=0:V=0:GOSUB20 FOR I=1 TO N:a=A(I-1)+A(I):GOSUB150:A(I)=a G=I:GOSUB130:i$=R$:G=I+1:GOSUB130:j$=R$ R$=b$+i$+v$+j$:IF KS=1 AND I=N THEN R$=b$+i$+v$+"1" IF KS=2 AND I=N TlIEN R$=b$+i$+v$+"FW." G=I-1:IF KS=2 THEN G=I
a=A(G):d=D(I)*M:IF KS=2 AND I=N GOTO1620 GOSUB110:d=D(I):GOSUB180:GOSUB105:N(I)=X:E(I)=Y:H=H+Y:V=V+X:GOTO1630 GOSUB30:LOCATE0,0:PRINTR$;" Az:";DMS$(a);:GOSUB25 NEXT I IF KS=1 GOTO1645 LOCATE3,1:PRINTe$;"comp ";V;:LOCATE0,0:PRINT"Lat:";e$;"fix ";X1; LOCATEl9,0:PRINT"Er>";X1-V;:GOSUB25 LOCATE3,1:PRINTe$;"comp ";H;:LOCATE0,0:PRINT"Dep:";e$;"fix ";Y1; LOCATEl9,0:PRINT"Er>";Y1-H;:GOSUB25:GOSUB30:GOTO1650 GOSUB30:LOCATE0,0:PRINTe$;"Lat ";V;:LOCATE16,0:PRINTe$;"Dep ";H;:GOSUB25 IF H=Y1 AND V=X1 THEN AC=1E8:X=0:GOTO1665 x=X1-V:y=Yl-H:GOSUBl90:V=x:H=y:AC=INT(INT(TD/X)/100)*100 G=AC:GOSUB130 GOSUB30:LOCATE0,0:PRINT"Acc 1:";R$;:LOCATE18,0:PRINT"Ec";X;:GOSUB25 IF AC=1E8 GOTO1780 IF KS=2 THEN N=N-1 v=0:h=0:FOR I=1 TO N:IF I=N THEN X=V-v:Y=H-h:GOTO1720 X=ROUND((D(I)*V/TD),w):Y=ROUND((D(I)*H/TD),w):v=v+X:h=h+Y G=I+1:IF KS=2 THEN G=I IF KS=1 AND I=N THEN G=1 GOSUB130:D$="#"+R$+m$+d$+"E:":L$="#"+R$+m$+d$+"N:" LOCATE0,1:PRINTD$;E(I);:SETN:LOCATE20,1:PRINT"Cr:";Y*10^u;:SETFu LOCATE0,0:PRINTL$;N(I);:SETN:LOCATE20,0:PRINT"Cr:";X*10^u;:GOSUB25:SETFu

N(I)=N(I)+X:E(I)=E(I)+Y:NEXT I FOR I=1 TO N:N(I)=N(I)+N(I-1):E(I)=E(I)+E(I-1) G=I+1:IF KS=1 AND I=N THEN G=1 GOSUB130:R$=c$+R$:x=N(I):y=E(I):GOSUB80 NEXT I:GOTO10 H$="[Offset]":IF K=3 THEN H$="[Online]" IF K=4 THEN H$="[Reference]" GOSUB30:GOSUB210:GOSUB44:P=0:IF K$="1" THEN P=1 R$="Sta A":IF K=4 THEN R$=">ins" SETFu:GOSUB60:N=x:E=y:IF P=1 GOTO1930 R$=">Az A"+v$+"B":IF K=4 THEN R$=">Az BW"+v$+"ins" GOSUB50:GOSUB140:Z=a:IF K=4 THEN GOSUB160:Z=a GOTO1940 IF K=4 THEN GOSUB58:GOTO1937 R$="Sta B":GOSUB60 x=x-N:y=y-E:GOSUBl90:Z-Y IF K=3 OR K=4 GOTO1950 R$="Offset> 1:Left "+a$+"Right ":GOSUB45:O=2:IF K$="1" THEN O=1 L$="Dis ":R$=L$+"A"+v$+"Q":IF K=3 THEN R$=L$+"A"+v$+"P" IF K=4 THEN R$="Ang BW<ins>P":GOSUB50:GOSUB140:R=a:R$=L$+"ins"+v$+"P":GOSUB50:d=a:GOTO1965 GOSUB50:H=a:IF K=3 THEN d=H:a=Z:GOTO1995 R$=L$+"Q"+v$+"P":GOSUB50:V=a d=H:a=Z:GOSUB20:GOSUB180:x=N+X:y=E+Y:R$=c$+"Q":GOSUB80
R=ATN(V/H):a=Z-R:IF O=2 GOTO1965 GOTO1970 a=Z+R IF a<0 THEN a=a+360:GOTO1990 IF a>360 THEN a=a-360 IF K=4 GOTO1995 d=POL(H,V) GOSUB20:GOSUB180:x=N+X:y=E+Y:R$=c$+"P":d=d*M:IF K=3 OR K=4 THEN GOSUB110:GOSUB105 GOSUB80:GOSUB30:GOSUB43:IF K$="1" GOTO1940 GOTO1000 H$="[X-Section]":GOSUB30:GOSUB210:SETFu H$="[X-Section]":GOSUB30:R$="1:Resec 2:Inter "+k$:GOSUB45:P=VAL(K$) H$="[Resection]":IF P=2 THEN H$="[Intersection]" ON P GOTO2150,2600 GOTO1000 GOSUB30 R$="1:Az"+v$+"X 2:Hz"+v$+"X 3:X on BL 4:Beck ":GOSUB45:K=VAL(K$):IF K=3 GOTO 2400 IF K=4 GOTO2110 GOSUB310:GOSUB320 R$="Az 1"+v$+"X":IF K=2 THEN R$="Ang X<1>2" GOSUB50:GOSUB140:E=a R$="Az 2"+v$+"X":IF K=2 THEN R$="Ang 1<2>X" GOSUB50:GOSUB140:F=a
IF K=2 GOTO2270 r=G-E:GOSUB280:E=r r=F-H:GOSUB280:F=r O=1/TANE:P=1/TANF y=((A-C)+D*O+B*P)/(O+P):x=((D-B)+C*O+A*P)/(O+P) GOSUB79:GOTO2110 GOSUB30:R$=" 1:Squ 2:Azi "+k$:GOSUB45:K=VAL(K$) ON K GOTO2430,2430 GOTO2110 GOSUB310:GOSUB320 R$=h$+"3":GOSUB60:N=x:E=y:IF K=1 GOTO2460 R$="Az 3"+v$+"X":GOSUB50:GOSUB140:Z=a x=N-A:y=E-B:GOSUB190:F=Y:P=X:a-F:GOSUB160:E=a r=G-F:GOSUB280:m=r IF m>180 THEN m=360-m IF K=2 GOTO2500 V=P*SINm:H=P*COSm:GOTO2520 r=E-Z:GOSUB280:O=r IF O>180 THEN O=360-O I=180-O-m:R=P/SINI:V=R*SINm:H=R*SINO a=G:d=H:GOSUB180:x=X+A:y=Y+B:GOSUB79:R$="Distance of X":K=L-H LOCATE0,1:PRINT"(3";v$;"X)";V;:LOCATE16,1:PRINT"(2";v$;"X)";K; LOCATE16,0:PRINT"(1";v$;"X)";H;:GOSUB120
GOTO2110 GOSUB30:GOSUB310:GOSUB320:R$=h$+"3":GOSUB60:E=x:F=y R$="Ang 1<X>2":GOSUB50:GOSUB140:P=a R$="Ang 2<X>3":GOSUB50:GOSUB140:0=a GOSUB40:LOCATE0,0:PRINT">Please waited."; x=E-C:y=F-D:GOSUB190:Z=X:I=Y:a=Y:GOSUB150:J=a r=H-I:GOSUB280:R=r K=1:IF P+O>R THEN K=2 IF R>180 THEN K=3:R=360-R V=360-(P+O+R):IF K=3 THEN V=R-P-O T=ATN(1/((1/TANV)+(Z*SINP)/(L*SINO*SINV))):IF T<0 THEN T=T+180 S=V-T:m=Z*SINT/SINO:e=180-P-S:f=180-O-T b=L:c=m:X=e:GOSUB350:n=a:b=Z:X=f:GOSUB350:o=a a=H+S:GOSUB160:t=a:a=J+f:GOSUB160:s=a:r=J-T:GOSUB280 d=m:a=s:GOSUB180:C=C+X:D=D+Y:d=n:a=t:GOSUB180:A=A+X:B=B+Y:d=o:a=r:GOSUB1 80:E=E+X:F=F+Y x=(A+C+E)/3:y=(B+D+F)/3:GOSUB79 GOTO2110 H$="[Drection]":GOSUB30:GOSUB210:SETFu GOSUB30:R$="1:Loop 2:Others "+k$:GOSUB45:K=VAL(K$):ON K GOTO2850,2950 GOTO900 GOSUB48:IF a<3 OR a>99 GOTO2850 GOSUB360:GOSUB305 FOR I=1 TO N:x=N(I+1)-N(I):y=E(I+1)-E(I):GOSUB190

A(I)=Y:D(I)=X:NEXT I A(0)=A(N):FOR I=1 TO N a=A(I-1):GOSUB160:B=a:r=A(I)-B:GOSUB280 B(I)=r:NEXT I:GOSUB20 FOR I=1 TO N:G=I:GOSUB130:J$=R$:G=I+1:IF I=N THEN G=1 GOSUB130:I$=R$:R$=b$+J$+v$+R$:LOCATE15,0:PRINT"Az>";DMS$(A(I)); a=B(G):d=D(I):GOSUB270:NEXT I GOTO10 GOSUB30:R$="1:p/p 2:OL 3:OS 4:Ref 5:Back ":GOSUB45 K=VAL(K$):ON K GOTO2970,3000,3000,3000,2810 GOTO2950 GOSUB310:GOSUB320 R$=b$+"1"+v$+"2":IF K=2 THEN R$=b$+"1"+v$+"X" X=x:Y=y:GOSUB105:d=L:a=G:GOSUB110 GOSUB30:GOSUB43:IF K$="1" AND K=1 GOTO2970 IF K$="1" AND K=2 GOTO3040 GOTO10 GOSUB44:GOSUB310:IF K$="1" THEN GOSUB320:GOTO3040 R$="Az 1"+v$+"2" GOSUB50:GOSUB140:G=a R$="Peg X":IF K=3 THEN R$="Peg P" GOSUB60:N=x:E=y x=N-A:y=E-B:GOSUB190:d=X:P=Y
IF K=2 THEN L=X:G=P:GOTO2972 IF K=3 GOTO3120 r=P-G:GOSUB280 a=r:R$=b$+"1"+v$+"X":T$="1":GOSUB270 GOSUB30:GOSUB43:IF K$="l"GOTO3040 GOTO10 IF G<=180 GOTO3128 h$=CHR$(227):r=P-G:GOSUB280:IF r>90 THEN r=360-r:h$=CHR$(229) GOTO3130 h$=CHR$(229):r=P-G:GOSUB280:IF r>90 THEN r=360-r:h$=CHR$(227) V-d*SINr:H=d*COSr:R$=c$+"P" LOCATE16,0:PRINT"(X";Y$;"1)";H;:LOCATE16,1:PRINT"(X";h$;"P)";V;:GOSUB120 GOSUB30:GOSUB43:IF K$="1"GOTO3040 GOTO10 H$="[Areas]":GOSUB30:GOSUB210:SETFu H$="[Areas]" GOSUB30:R$="1:Find 2:Fixed "+k$:GOSUB45:K=VAL(K$):ON K GOTO3250,3250 GOTO10 R$="1:N&E 2:Triangle "+k$:GOSUB45:J=VAL(K$):ON J GOTO3270,3270 GOTO3210 H$="[Find area]":IF K=2 THEN H$="[Fixed area]" IF K=1 AND J=2 GOTO3600 IF K=2 AND J=1 GOTO3950
IF K=2 AND J=2 GOTO3950 GOSUB30:R$="1:N"+o$+"E 2:E+W "+k$:GOSUB45:L=VAL(K$) ON L GOTO3330,3330 GOTO3250 GOSUB48:IF a<3 GOTO3330 GOSUB360:GOSUB305:T=0:R=0:GOSUB450 R$="(Y)Product "+t$:GOSUB45:IF K$<>"Y" THEN K$="N" GOSUB20 FOR I=1 TO N:Y=I+1:IF I=N THEN Y=1 IF L=1 GOTO3380 P=N(Y)-N(I):H=E(Y)+E(I):O=ROUND(H*P,t) IF O<0 THEN R=R+O:GOTO3385 T=T+O:GOTO3385 O=ROUND(N(I)*E(Y),t):P=ROUND(-(E(I)*N(Y)),t):T=T+O:R=R+P SETF5:TF K$="N"GOTO3450 G=I:GOSUB130:i$=R$:G=Y:GOSUB130:j$=R$:IF L=2 GOTO3420 F$="[N"+i$+o$+"E"+j$+"]":B$="[E"+i$+o$+"N"+j$+"]" LOCATE2,1:PRINTF$;:LOCATEl7,1:PRINTB$; LOCATE1,0:PRINTO;:LOCATE16,0:PRINTP;:GOSUB25:GOTO3450 : F$=b$+i$+v$+j$ LOCATE0,l:PRINTF$;:LOCATE14,1:PRINT"[N";o$;"E]";O;:SETFu LOCATE0,0:PRINT"[N-S]";P;:LOCATE14,0:PRINT"[E+W]";H;:GOSUB25 NEXT I:SETF5

LOCATE6,1:PRINTe$;"[-]";ABS(R);:LOCATE6,0:PRINTe$;"[+]";T;:GOSUB25 A=ABS(T+R)/2:SETN LOCATE9,1:PRINT"(Area)";A;:SETF5:LOCATE2,0:PRINT"(Double area)";ABS(T+R);:GOSUB25:SETFu I=1600:IF U=5 THEN A=A*I A=A/m:A=A/I r=INTA:S=FRACA*4:n=INTS:v=ROUND(FRACS,-5)*100 IF v=100 THEN v=0:n=n+1 IF n=>4 THEN o=INT(n/4):n=n-o*4:r=r+o G=r:GOSUB130:A$=R$:G=n:GOSUB130:B$=R$:G=v:GOSUB130:C$=R$ IF v=0 THEN C$="00.00" G=ROUND(A*T,w):GOSUB130:M$=R$:V$="-" LOCATE7,1:PRINT"Or = ";M$;q$;:LOCATE5,0:PRINT"Area = ";A$;V$;B$;V$;C$;" Rai";:GOSUB25 GOTO10 GOSUB30:I=1:T=0:S=0 R$="Y:detail "+t$:GOSUB45:O$=K$:IF O$<>"Y" THEN O$="N" G=G+1:GOSUB130:R$=">Tri #"+R$ GOSUB390:GOSUB400:GOSUB410 GOSUB380:T=T+A:GOSUB20:IF O$="N":GOTO3650 LOCATE1,1:PRINT"c>";c;:LOCATEl6,1:PRINT":2s>";2*s; LOCATE1,0:PRINT"a>";a;:LOCATE16,0:PRINT": b>";b;:GOSUB25 LOCATE0,1:PRINT"s-b>";s-b;:LOCATE16,1:PRINT":s-c>";s-c; LOCATE2,0:PRINT"s>";s;:LOCATE16,0:PRINT":s-a>";s-a;:GOSUB25:GOSUB30:SETN LOCATE0,0:PRINTR$;" (";o$;")";B;:GOSUB25
GOSUB30:GOSUB430:SETFu GOSUB30:GOSUB43:IF K$="1"GOTO3610 T=ROUND(T,w) S=0:P$=">Pic #":F$=" 1:in 2:out " R$-"Y:Trapizodual "+t$:GOSUB45:IF K$="Y"GOTO3690 GOTO3800 GOSUB30 G=G+1:GOSUB130:B$=P$+R$ R$=B$+F$:GOSUB45:L=VAL(K$):ON L GOTO3730,3730 GOTO3710 Q=1:IF L=1 THEN Q=-1 R$=B$:GOSUB390:GOSUB400:GOSUB420 A=ROUND(Q*(a+b)*h/2,w):S=S+A:GOSUB430 GOSUB30:GOSUB43:IF K$="1"GOTO3700 R=0:R$="Y:Sq-Triangle "+t$:GOSUB45:IF K$="Y"GOTO3830 GOTO3910 GOSUB30 G=G+1:GOSUB130:B$=P$+R$ R$=B$+F$:GOSUB45:L=VAL(K$):0N L GOTO3870,3870 GOTO3850 Q=1:IF L=1 THEN Q=-1 R$=B$:GOSUB400:GOSUB420 A=ROUND(Q*b*h/2,w):R=R+A:GOSUB430
GOSUB30:GOSUB43:IF K$="1"GOTO3840 A=T+S+R:GOSUB20:G0TO3470 GOSUB30:R$="1:Par 2:Sqr 3:Peg 4:Back ":GOSUB45:L=VAL(K$) ON L GOTO3990,3990,3990,3205 GOTO3905 IF J=2 GOTO4500 GOSUB30:IF L=2 OR L=1 GOTO4010 P=0:GOSUB500 G=1:GOSUB130:R$=p$+R$:GOSUB60:A=x:B=y:AA=A:BB=B G=2:GOSUB130:R$=p$+R$:GOSUB60:C=x:D=y G=G+1:GOSUB130:R$=p$+R$:GOSUB60:IF L=1 OR L=2 GOTO4150 X=x:Y=y:X0=x:Y0=y F=C-A:I=D-B:H=X-C:V=Y-D:J=A-X:K=B-Y L=(I*F+(2*I+V)*H+(2*I+2*V+K)*J)/m P=P+L:IF ABS(P/2)>W GOTO4070 C=X:D=Y:X1=X:Y1=Y:GOTO4030 A=(2*W-P)/ABSL:GOSUB20 x=ROUND(A*H+X,w):y=ROUND(A*V+Y,w) X2=x:Y2=y:GOSUB79 x=X2-X1:y=Y2-Y1:GOSUBl90:D1=X x=X2-AA:y=Y2-BB:GOSUB190:D2=X x=X0-X1:y=Y0-Y1:GOSUB190:DK=X:D3=DK-D1 W$= "(X"+v$:G=G1:GOSUB130:A$=W$+R$+")":G=G+1:GOSUB130:B$=W$+R$+")":C$=W$+"1)"

4950 49S5030 5040

R$=D$+J$+v$+Q$+Y$:LOCATE0,0:PRINTR$;q; R$=D$+I$+v$+P$+Y$:LOCATE16,0:PRINTR$;p;:GOSUB25:GOSUB30 GOSUB43:IF K$="1" THEN A1=Y:I$=Q$:J$=P$:GOTO4700 GOTO10 IF o=>2 GOTO4950 R=H:S=90-H:IF H>90 THEN R=H-90:S=180-R-I:GOTO4920 v=A1/SINR:F=A1*COSR:O=F*v/2:A1=v:GOTO4930 F=A1*SINR/SINS:v=A1*SINI/SINS:a=A1:b=F:c=v:GOSUB380:O=A:A1=v t=I-S:IF V2>90 THEN t=180-S W=W-O:I=t H=90:I=t:IF o=1 THEN H=V2 Y=SOR(A1^2-2*W/TANI):h=2*W/(A1+Y):P=h IF o=1 THEN I=V1:A1=BS Q=h/SINS:IF I<90 THEN Q=h/SINI IF o>1 GOTO4800 IF V2<90 THEN P=P+F IF V2>90 THEN Q=Q+F GOTO4800 H$="[Triangle problem] ":GOSUB30:GOSUB210:SETFu:S$="Angle of " A$=S$+"A":B$=S$+"B":C$=S$+"C":D$="Dis " R$=" 1:abc 2:bcA 3:abA 4:cAB 5:aAB 6:bC,Ar "+k$:GOSUB45:K=VAL(K$):GOSUB30 ON K GOTO5050,5050,5060,5050,5060,5070 GOTO10
R$=D$+"AB":GOSUB410:F=c:IF K=2 GOTO5070 IF K=4 GOTO5110 R$=D$+"BC":GOSUB390:D=a:IF K=5 GOTO5110 R$=D$+"CA":GOSUB400:E=b:IF K=2 OR K=3 GOTO5110 IF K=6 GOTO5160 GOSUB355:A=X a=F:b=D:c=E:GOSUB355:C=X B=180-A-C:GOTO5200 R$=A$:GOSUB50:GOSUB140:A=a X=A:IF K=4 OR K=5 GOTO5130 IF K=3 THEN B=ASN(E*SINA/D):GOTO5140 GOSUB350:D=a:a=E:b=D:c=F:GOSUB355:B=X:C=180-A-B:GOTO5200 R$=B$:GOSUB50:GOSUB140:B=a C=180-A-B:IF K=3 THEN F=D*SINC/SINA:GOTO5200 IF K=5 THEN O=D/SINA:F=O*SINC:E=O*SINB:GOTO5200 O=F/SINC:E=O*SINB:D=O*SI~A:GOTO5200 R$=C$:GOSUB50:GOSUB140:C=a R$="Area":GOSUB50:S=a/m D=2*S/(E*SINC):X=C:b=E:c=D:GOSUB350:F=a a=D:b=E:c=F:GOSUB355:A=X:B=180-A-C GOSUB20:Y=F*SINA:X=E*SINC:Z=D*SINB O=D*COSB:P=F*COSA:Q=E*COSC LOCATE0,1:PRINT"(XA)";X;:LOCATE15,1:PRINT"(XC)";Q;
LOCATE0,0:PRINT"(AB)";D;:LOCATE15,0:PRINT"Hz:A";DMS$(A);:GOSUB25 LOCATE0,1:PRINT"(YB)";Y;:LOCATE15,1:PRINT"(YA)";P; LOCATE0,0:PRINT"(BC)";E;:LOCATE15,0:PRINT"Hz:B";DMS$(B);:GOSUB25 LOCATE0,1:PRINT"(ZC)";Z;:LOCATE15,1:PRINT"(ZB)";O; LOCATE0,0:PRINT"(CA)";F;:LOCATE15,0:PRINT"Hz:C",DMS$(C);:GOSUB25 GOSUB30:GOSUB43:IF K$="1" GOTO5000 GOTO10 H$="[Cicular curve] ":GOSUB30:Y=1:GOSUB210:SETFu R$="Start on 1:PC 2:PI 3:PT 4:Back":GOSUB45:S=VAL(K$) ON S GOTO5340,5340~5340,10 GOTO5310 GOSUB700:K=0:A=0:T=0:R=0:L=0:l=0:N=0 CLS:LOCATE0,1:PRINT"<1:";d$;"><2:T><3:R><4:Lc><5:LC><6:M>"; LOCATE0,0:PRINT"Get> ";:W$=INPUT$(1):BEEP:K=K+1 IF W$="1" THEN LOCATE1,1:PRINTm$;:LOCATE5,0:PRINTd$;:INPUT" = ",A: GOSUB35:GOTO5450 IF W$="2" THEN LOCATE6,1:PRINTm$;:LOCATE5,0:INPUT"Tangent = ",T: GOSUB35:GOTO5450 IF W$="3" THEN LOCATE11,1:PRINTm$;:LOCATE5,0:INPUT"Radius = ",R: GOSUB35:GOTO5450 IF W$="4" THEN LOCATE16,1:PRINTm$;:LOCATE5,0:INPUT"Curve lenght = ",l: GOSUB35:GOTO5450 IF W$="5" THEN LOCATE22,1:PRINTm$;:LOCATE5,0:TNPUT"Chord lenght = ",L: GOSUB35:GOTO5450 IF W$="6" THEN LOCATE28,1:PRINTm$;:LOCATE5,0:INPUT"MiddJe ordinate = ",N: GOSUB35:GOTO5450 K=K-1:GOTO5370 IF W$="1" AND A<=0 THEN LOCATE1,1:PRINT"1";:K=K-1:GOTO5370 IF W$="2" AND T<=0 THEN LOCATE6,1:PRINT"2";:K=K-1:GOTO5370

 

Tags

SCX-5530 1604VLZ SWD1600 Gigaset 8825 AL1917J DVP-LS755P Gigaset A585 GT-E2120B GC3388 - 2003 PE316FM DPU-3K6 Coolpix S550 HT200 DMF CEB-3 TX-8255 EOS 500N Ccrt 700 AX-750 GC-L197NIS MV19P DSC-W1 BAR386A SX-303RDS Universal H680 MB-1001 755DFX Afipr Destruction Linux MT1060 Wfmc6400UC Review DSC-S780 GZ-MG36 19PFL5522D EWV601 2410V KRF-V7020 KS900SK CLP-315W XEU LN32R83BD WS9135 WD-1481RD J2422 RD-XS27KE Asus P4 Altima Gr-d33 CU-E12HKE Nclv-D ADV-1000 LN19C350d1D Singer 2263 DES-818 AG-5700 Samsung 551V IVA-W205R Kxtg1100HG TX32LE8FA PS-5000 H Series 18 Boss JS-5 Rcs-77h 1033E TM-U220 PCV-RX413N Image 1200 Digital Nextvision N4 Faxphone B160 R-730A Radio Hdrv200F Astra 4500 LM742 HTZ131DVD SD-CX9 Memoire SA-EX510 FW-C780 32PW8608 WM-EX910 Mini 110 Cable Lifestyle 28 FSV-30 8-PEC Hipath 3350 Readynas DUO -TRS-80- Cappucincino SPH-B6550 RL36ebsm YS100 CS-V210 Armageddon DMR-ES20DEB Samsung 244T FR-2650 Plus Library

 

manuel d'instructions, Guide de l'utilisateur | Manual de instrucciones, Instrucciones de uso | Bedienungsanleitung, Bedienungsanleitung | Manual de Instruções, guia do usuário | инструкция | návod na použitie, Užívateľská príručka, návod k použití | bruksanvisningen | instrukcja, podręcznik użytkownika | kullanım kılavuzu, Kullanım | kézikönyv, használati útmutató | manuale di istruzioni, istruzioni d'uso | handleiding, gebruikershandleiding

 

Sitemap

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101