Kullanıcı
Şifre
Üye Ol
Şifremi Unuttum ( Şifrenizi öğrenmek için kullanıcı adınızı yazarak bu ikonu tıklayınız.)
E-Kaynak
E-Pratik Bilgi
E-İş
E-Şantiye Pazarı
E-Tedarik&Servis
E-Vitrin
E-Alışveriş
Bize Ulaşın
Türkçe English
Talep Formu Nedir
Üretim ve Tüketimin Takibi
Bayındırlık İşleri Kontrol Yönetmeliği
Sürveyan Defteri
Şantiye Günlük Defteri
Yeşil Defter
Ataşman Sayfası
Görünmez Kaza :)
Hakediş Hazırlama
Metraj
Keşif Artışı
İhzarat Nedir
Ekskavatör Nasıl Çalışır?
Yükleyici Nasıl Çalışır
Makinalı Kazı Nasıl Yapılır
Casio FX-880P-3600P ile
(Topografya Programları)
Casiofx880 Bina Yol Kanal
Kazı/Dolgu ve Aplikasyon Programı
Classpad 300 -330 Programları
Bir Dolgunun Hikayesi
Saha Tanzimi-Bina Yeri Kazı Dolgu İşleri
Excel.de Kot Kilometre Sapma ve Tünel Kesit Çizim Programı

E-Posta Listesine Kaydol

Kaydol

E-Pratik Bilgi -> Şantiye Notları -> Casiofx880 Bina Yol Kanal
Kazı/Dolgu ve Aplikasyon Programı

Bina Yol Kanal Hat Aplikasyonu Programı

Sayın Şantiyeciler,
Haritacılara faydalı bilgiler içeren kendi yazmış olduğum programı dikkatinize sunar,
Çalışmalarınızda başarılar dilerim.
İbrahim İçli
Harita Teknikeri
http://www.hkmo.org.tr/resimler/kariyer/cv_doc/d8af4dd9a6_cv.doc
ibrahimicli@gmail.com


Sayın İÇLİ'ye
Bilgilerini ve deneyimlerini tüm şantiyeciler ile paylaştığı için teşekkür ederiz.
Santiyeci Com Bilişim Hizmetleri

Geriden Kestirme (1 word syf 27 kb)

Geriden Kestirme Programı .doc 27 kb

GERİDEN KESTİRME
koordinatı bilinen iki noktadan koordinatı bilinmeyen (aletin kurulu olduğu herhangi bir noktaya) koordinat verme işlemi.
İki mesafe ile veya bir mesafe bir açı ile geriden kestirme programı.

 

 

5    KFE1=0 : KFE2=0 : M1=0:M2=0 : SETF4

10  CLS : INPUT “1.Y: “ ,Y1, “1.X:” , X1 ,”1.Z: “,Z1

20 INPUT “1.MESAFE:” ,M1 ,” 1.KOTFARKI : “,KFE1

30  CLS : INPUT “2.Y: “ ,Y2, “2.X:” , X2 ,”2.Z: “,Z2

40 INPUT “2.MESAFE:” ,M2 ,” 2.KOTFARKI : “,KFE2

50 M=POL (X2-X1,Y2-Y1)

60 IF Y<0; Y=Y+400

65 CLS:PRINT “ SEMT :”;Y;TAB(0) ;“MESAFE:”;X

80 IF M1< >0 THEN 110

90 INPUT “ACI Q :” ,ACI1

100 ACI2=ASN ( ( SİNACI1*M2)/M) :ACI3 =200- (ACI1+ACI2): M1 =(SİNACI3*M)/SİNACI1

110 IF M2< >  0 THEN 140

120 INPUT “ACIQ:”, ACI1

130 ACI3=ASN((SİNACI1*M1)/M) :ACI2=200- (ACI1+ACI3) :M2 =(SİNACI2*M)/SİNACI1

140 Z3=((Z1+KFE1)+(Z2+KFE2) )/2

150 B=((M2^2)-(M1^2+X^2))/(M1*X*2)

160 B1=200-(ACSB)

170 S=Y+B1

180 K=REC(M1,S) : SETF3

190 CLS:PRINT “Y3: “; Y1+Y;TAB(0); ”X3:”; X1+X;TAB(18);”Z3:” ; Z3

BİRİNCİ NOKTANIN İKİNCİ NOKTAYI GÖRMEMESİ DURUMUNDA

 

bulunduğunuz yer ile  N.100 arasındaki mesafe =……    1.mesafe girilir

1.mesafenin ölçülememesi durumunda  birinci mesafe boş atlanır Q acısı sorulur.

bulunduğunuz yer ile  minare ( ikinci poligon ) arasındaki mesafe =……     2.mesafe girilir .

2.mesafenin ölçülememesi durumunda   ikinci mesafe boş atlanır Q acısı sorulur.

İki mesafeden birinin  bilinmesi gerekir.

Q acısı dar  (200 DEN KUCUK) acı olacak şekilde mesafe okuması yapınız.

İleriden Kestirme (1 word syf 27 kb)

İleriden Kestirm Programı .doc  27 kb

İLERİDEN KESTİRME :
Mesafesi ölçülemeyen noktanın koordinatlarının hesaplanması.

5 CLS:PRINT “İLERİDEN KESTİRME PROGRAMİ”

10 CLS:PRINT ”1.DURULAN NOKTA”;TAB(0);

20 INPUT ”Y:”;Y1,”X:”,X1

30 INPUT ”HESAPLANACAK NOKTA SEMTI:”,S2

40 PRINT ” 2.DURULAN NOKTA:”;TAB(0);

50 INPUT ”Y”,Y2,”X:”,X2

60 INPUT ”HESAPLANACAK NOKTA SEMTİ:”,S3

70 M=POL(X2-X1,Y2-Y1)

80 IF Y<0;Y=Y+400

85 S1=Y

86 IF 200<S1;S4=S1-200: GOTO 90

88 S4=S1+200

90 IF S1<S2 AND S4<S3 THEN  B=400-(S2-S1):C=S3-S4

100 IF S2<S1 AND S4<S3 THEN  B=S1-S2: C=S3- S4

110 IF S1<S2 AND S3<S4 THEN  B=S2-S1:C= S4-S3

120 IF S2<S1 AND S3<S4 THEN  B=S1-S2:C=400-(S4-S3)

130 A=200-B-C

140 M2=(M*SİNC)/SİNA

160 PRINT “Y:”;Y1+M2*SİNS2;TAB(0);”X:”;X1+M2*COSS2

 

İki doğrunun kesişimi koordinatları bu program ile hesaplanır.

Birinci durulan noktaya  birinci doğrunun başlangıç koor. Hesaplanacak nokta semtine doğrultu semti girilir.

İkinci durulan noktaya  ikinci doğrunun başlangıç koor. Hesaplanacak nokta semtine

Doğrultu semti girilir.

 

 

İki farklı poligondan hesaplanmak istenen noktaya semt ölçülür.

Kutupsal Koordinat -YMK-YDE Hesabı (2 word syf 32.5 kb)

Kutupsal Koordinat -YMK-YDE Hesabı .doc 32.5 kb

KUTUPSAL KOORDİNAT HESABI   EXE BAS

 

 EKRAN

YAPILMAK İSTENEN KUTUPSAL KOORDİNAT HESABI İSE (1):

 ALET BİR NOKTADA KURULU VE O NOKTADAN 1 DEN ÇOK KOORDİNAT HESAPLANACAK İSE (1) TUŞLANIR

 

YAPILMAK İSTENEN AÇIK POLİGON HESABI   İSE (2)  TUŞLANIR.                            YAPILMAK İSTENEN  YATAY AÇI DÜŞEY AÇI EĞİK MESAFE İLE KOORDİNAT HESAPLAMAK İSE  (3) TUŞLANIR.

Açı : ……    Başlangıç açısı sıfır ise koordinatını hesaplamak istediğin noktaya aralık açısı ölç

                     Başlangıç açısı semt ise koordinatını  hesaplamak istediğin noktanın semti.

Mesafe: ….   Koordinatını hesaplamak istediğin nokta yatay mesafesi

 

Kot farkı: ….  Koordinatını hesaplamak istediğin noktanın durulan nokta ile kot farkı.

 

400 PRINT “ KUTUPSAL KOORDİNAT HESABİ”

420 CLS:PRINT “BIR NOKTADAN YMK (1)”;TAB(0);”ACIK POL. HES (2)”;TAB(18);

       ”YDE HES (3)”;:A$=INPUT$(1):BYM=VAL(A$)

430  CLS : PRINT “D.N.Y (“;Y1;:INPUT “) “ ,Y1

431  CLS : PRINT “D.X. (“;X1;:INPUT “) “ ,X1

432  CLS : PRINT “D.Z. (“;Z1;:INPUT “) “ ,Z1

434  CLS : PRINT “B.N. (“;Y2;:INPUT “) “ ,Y2

440  CLS : PRINT “B.N. (“;X2;:INPUT “) “ ,X2

450  M=POL (X2-X1,Y2-Y1)

460  IF Y<0; Y=Y+400

 

 

470  CLS:PRINT “ SEMT :”;Y;TAB(0) ;“MESAFE:”;X

 

475 SETF4:CLS: Q=Y : PRINT “ Başlangıç  acısı (“;Q; :INPUT ”)”;Q

480 IF BYM=3 THEN 550

485 INPUT “Acı  :”,A

490 INPUT “Mesafe :”,S,”KOT FARKI:”,KFE

498 Y3=Y1+S*SIN(Y+A-Q) : X3=X1+S*COS(Y+A-Q) : Z3=Z1+KFE

500 CLS: SETF3:PRINT “Y=”;Y3;CSR16;”X=”;X3;TAB(0);”Z=”;Z3

505 IF BYM=2;Y2=Y1:X2=X1:Y1=Y3:X1=X3:Z1=Z3:GOTO 430

507 GOTO 485

550 CLS: INPUT “AL.YUK:”,H

555 CLS: INPUT “Rf.yuk”,RF

560 INPUT “Y.ACI:”,D,”D.ACI:”,E,”E,MES:”,0

565 X=REC(0,E):Z3=Z1+H-RF+X

570 X=REC(Y,D):Y3=Y1+Y:X3=X1+X

580 CLS: PRINT  “Y:”;Y3;TAB(0);”X:”;X3;”Z:”;Z3

590 GOTO 555

 

Bina Yol Kanal Hat Aplikasyonu Programının YENİ düzenlenmiş hali (29 word syf. 2.051 kb) İNDİR

Bina Yol Kanal Hat Aplikasyonu Programın İNDİR

Bu programla ;

1-Yan nokta

2-Dik ayak dik boy

3-Kutupsal koordinat

4-Kutupsal aplikasyon

5- Dusey kurb elemanlari

6-Yatay kurb elemanlari

7- Semt kenar

Hesablayabilirsiniz.

* Kayıt kapasitesi ve kayıt hızı % 100 arttı.

* Nivo ile yol ,alt yapı ,kanal kazı eklendi.

* Atnalı tünel kazısı eklendi.


Yeni mezun haritacıların kullanabileceği şekilde düzenlendi.
program kullanım kılavuzu ile birlikte indirebilirsiniz (01.04.2006)

Düşey Some Noktası

1.satır Kot kayıt ( 1 ) Koordinat kayıt ( 2 ) kot kaydetmek icin 1 i tuşla
2.satır Kayıt düzel ( 3 )


SOME NO = 1

Tepe KM si =……………. 1 in kilometresi
Tepe kotu =……………. 1 in kotu
Kiriş boyo L =………..0 1 de kiriş boyu olmadığı için 0 gir

SOME NO = 2

Tepe KM si =……………. 2 in kilometresi
Tepe kotu =……………. 2 in kotu
Kiriş boyo L =……….. 2 in kiriş boyu

SOME NO = 3

Tepe KM si =……………. 3 in kilometresi
Tepe kotu =……………. 3 in kotu
Kiriş boyo L =……….. 3 kiriş boyu

SOME NO =

Tepe KM si =……………. 4 in kilometresi
Tepe kotu =……………. 4 in kotu
Kiriş boyo L =………..0 4 de kiriş boyu olmadığı için 0 gir


• Dosya dolar ise Dosya dolu uyarısı gelir ve yeni dosya kaydı yapmanız için başa dönülür ; dosya numarası .....

Yatay Some Kayıt

SOME NO = 1

Y= …………. S1 Y değerlerini
X=…………. S1 X değerlerini
KM=………. S1 kilometresi
D=……….0 S1 D boyu olmadığı için 0 gir


SOME NO = 2

Y= …………. S2 Y değerlerini
X=…………. S2 X değerlerini
KM=………. S2 kilometresi
D=………… S2 D boyu

SOME NO = 3

Y= …………. S3 Y değerlerini
X=…………. S3 X değerlerini
KM=………. S3 kilometresi
D=………… S3 D boyu

SOME NO = 4

Y= …………. S4 Y değerlerini
X=…………. S4 X değerlerini
KM=………. S4 kilometresi
D=…………0 S4 te D boyu olmadığı için 0 gir

Programın İçinden Bazı Alıntılar

Bina Yol Kanal Hat Aplikasyonu Programın İNDİR

ALIYMAN VERI GIRISI

 

T.Y1=A nin Y si

T.X1=A nin X si

T.KOT1=A nin kirmizi kotu

T.KM1 = A nin Kilometresi

T.Y2=B nin Y si

T.X2 = B nin X si

ALIYMAN (A ) YATAY KURB (K) ?....A

T.KOT2= B nin kirmizi kotu

 

Guzergah egimi (.......)= A dan B ye olan egim. (egimi kayit yonune gore isareti ile birlikte yazin )

 

Girdiginiz veriler ile program egim hesablar ,hesablanan egim parantez icinde yazilir.hesablanan egim ile projede yazili olan egim ayni ise girdinizin veriler dogru demektir.egimler birbirini tutmuyor ise dogru egimi yazin size tekrardan bilgiler sorulacaktir.eski bilgiler kontrol etmeniz icin  parantez icinde ekrana gelecektir.

 

YATAY KURP VERI GIRISI

 

T.Y1 = B nin Y si

T.X1 = B nin X si

T.KOT1= B nin kirmizi kotu

T.KM1= B nin kilometresi

T.Y2= C nin Y si

T.X2= C nin X si

T.KOT2= D nin kirmizi kotu .TF kirmizi kotu

ALIYMAN (A ) YATAY KURB (K) ?....K

TF KM si =................ TF (D) KM si  bilinmiyorsa bos atla            acisi sorulur.data kayita ilk yuklenen hat aliyman  ve aliymanin 200 metreden buyuk  olmasi sarti ile TF KM si sorusuna            acisi girilebilir .program girilen TF KM degerini           acisina cevirir.ilk kayittan sonra ki her kayitta TF KM si ile              acisini ayni veri olarak girmeniz bir sorun cikarmaz.

TO ORJIN TF ACISI= ............            acisini girmek istemiyorsaniz bos atlayin.TF KM si  sorusuna gecer.

Aci veya TF KM si  girmek zorundasiniz.

 

 

Guzergah egimi (.......)= ...........B den D ye olan egim  (egimi kayit yonune gore isareti ile birlikte yazin )

 

Girdiginiz veriler ile program egim hesablar ,hesablanan egim parantez icinde yazilir.hesablanan egim ile projede yazili olan egim ayni ise girdinizin veriler dogru demektir.egimler birbirini tutmuyor ise dogru egimi yazin size tekrardan bilgiler sorulacaktir.eski bilgiler kontrol etmeniz icin  parantez icinde ekrana gelecektir.

 

Veri girisi tamamlandiktan sonra yatay kurb bilgileri ;

 D ,T,BS,aci ,R ,TF KM si ,TF Y si, TF X si  projedeki degerler ile karsilastirmaniz icin ekrana gelir.Degerlerden birin yanlis olmasi durumunda girdiginiz degerlerde yanlis bilgi vardir veya proje bilgileri yanlistir.

 

Bina Yol Kanal Hat Aplikasyonu Programı İNDİR
Bina Yol Kanal Hat Aplikasyonu Programın İNDİR
Bina Yol Kanal Hat Aplikasyonu Programı İNDİR
İhale kanunu Değişmeli mı ?
İhale kanunu değişsin .
 

© 2000 - 2008 santiyeci.com - Tasarım ve Uygulama Biteg