CASIO NUN SIRLARI-12
Bu yazı {11 Kasım 2007 || Pazar saat 6:06} sularında wolfsilk tarafından yazılmıştır.Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde bilinmeyen özellikleri anlatılmıştır
5.3.CASIO DAN BİLGİSAYARA KOORDİNAT AKTARIMI
Aşağıda CASIO FX-850/880P hesap makinelerinden bilgisayar ortamına koordinat aktaran iki program verilmiştir. Bunlardan birincisi hesap makinesine ikincisi ise bilgisayara yazılır. İlk önce bilgisayardaki program sonra da hesap makinesindeki program çalıştırılır.
1 ‘Bu program CASIO FX-850/880P hesap makinesinde herhangi bir yere yazılır.
10 CLS
20 INPUT “AKTARILACAK iLK NOKTA NO:”; I
30 INPUT “AKTARILACAK SON NOKTA NO:”; S
40 CLOSE
50 OPEN “COM0:6,E,7,1″ AS #1
60 FOR K = I TO S
70 PRINT #1, K; Y(K); X(K)
80 NEXT K
90 CLOSE : BEEP
100 PRINT #1, -1; 0; 0
110 PRINT “AKTARMA iSi SONA ERDi”
5 ‘Bu program bilgisayara yazılır.
10 CLS
20 F$ = “######## #######.## #######.## ####.##”
30 INPUT “KOORDiNATLARIN KAYIT EDiLECEGi KUTUK ADI:”; AD$
40 CLOSE
50 OPEN “COM1:4800,E,7,1″ FOR RANDOM AS #1
60 OPEN “O”, #2, AD$
70 INPUT #1, K, Y, X
80 IF K = -1 THEN GOTO 120
90 PRINT #2, USING F$; K; Y(K); X(K);0
100 PRINT USING F$; K; Y(K); X(K);0
110 GOTO 70
120 CLOSE : BEEP
130 PRINT “AKTARMA iSi SONA ERDi”
5.4.BİLGİSAYARDAN CASIO YA KOORDİNAT AKTARIMI
Aşağıda bilgisayardan CASIO FX-850/880P hesap makinelerine koordinat aktaran bir program örneği verilmiştir. Bunlardan birincisi bilgisayara ikincisi ise hesap makinesine yazılır. İlk önce hesap makinesindeki program sonra da bilgisayardaki program çalıştırılır.
5 ‘Bu program bilgisayara yazılır.
10 CLS
20 INPUT “KOORDiNATLARIN OKUNACAGI KUTUK ADI:”; AD$
30 CLOSE
40 OPEN “COM1:4800,E,7,1″ FOR RANDOM AS #1
50 OPEN “I”, #2, AD$
55 IF EOF(2) THEN 120
60 LINE INPUT #2, A$
70 X$ = MID$(A$, 10, 11)
80 Y$ = MID$(A$, 22, 11)
90 PRINT #1, Y$; X$
100 PRINT Y(K); X(K)
110 GOTO 60
115 PRINT #1, -1; 0
120 CLOSE : BEEP
130 PRINT “AKTARMA iSi SONA ERDi”
5 ‘Bu program CASIO FX-850/880P hesap ‘makinesine yazılır.
10 CLS
20 INPUT “KOORDiNATLARIN KAYIT EDiLECEGi iLK NOKTA NO”;I
30 CLOSE
40 OPEN “COM0:6,E,7,1″ AS #1
50 K = I
60 INPUT #1, Y(K); X(K)
70 IF Y(K) = -1 THEN 90
80 K=K+1:GOTO 60
90 CLOSE : BEEP
100 PRINT “AKTARMA iSi SONA ERDi”
Benzer İçerikli Yazılar:
- CASIO NUN SIRLARI-13 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-14 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-11 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-1 1.ÖN BİLGİ Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap...
- CASIO NUN SIRLARI-3 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-7 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-8 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-4 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
- CASIO NUN SIRLARI-2 2.BELLEK HARİTASI Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap...
- CASIO NUN SIRLARI-5 Bu bölümde Casio Fx-850P ve Casio Fx-880P hesap makinelerinin genelde...
