ontrror
(R1)
[P.c)
L (em)
meniscm (R)
SJ
50 .05
7.4
54
25 .78
so
41 .05 43 .05
7fJ
51
8.6
47
201 22 .16
9 .~
~2
t& .o8
10.1 10.5 11.1 11 .7 12
30 35 37 28 28
12.~
~J
t7.S1 15 .99 14 ... 11.38 IUS 9.80
37 • 4
enec1»oe
rudnQ
r.aoirq
34 Jt 27 25 1:! 18 14
38 .0S :J.4 .0S 31.05 28 .05 24 .0S
nos 19 OS 15 .05 11 OS
LJl
K
I - SILT
cLAY
O.mm
100
'·
I;
Ill
13.:
:a
us
1~ . 9
t~
5.e9
29.600 15.900
e.aoo 000 3387 2.825
1.388 0.731 0400 0 208 0 ItO 0 01C
0.01209
O.Dai
0.01209 0.01209 0.01209 0,0 "08 0.01209 0.01208 0.01208 0.01209 0.01209 ' 0.01208 0.01208
0 .~
lr ~ 60
u:
O.CQ5
#.
,o.on
1 ~
0 .01~
0
0.001
0 .((\4
0.001
1'
_v
0 .01
GRAVEL
Tj
I
i
!
I·
!
1 ,.
,
11 !} II I : ! ."
I Ill 'I
1J II
1 , 1
I I
r ,
!
1--'1
0 .010 0003 0 .000
''Ur
I
.
« 20
O.O:lll
I II
I ;
80
0 .~
r=::=SANo
0.1
1
I I !I 100
10
GRAIN Ow.IEiER (mm) Vlsull cSesaipllon : Sand. brownlsn grey, 11111• til. lreu dry. tract shells. So~ claSSinClltlon (VSCS) : SM
750
GRAIN SIZE DISTRIBUTfON "
Bore/depth : B/-1-17 I -10.50 sld ·11.00 m LWS
Project : Pengembangan Pe!abuhan Benoa Bali Location : Pelabuhan Benoa Bali S/r(-1
An~fplr
.:..H:.t..::.d:.:ro:.::'""~·111:.:'---------------------------~~
-;-:~r.e
.l.Ctu11H)C .
.:=en . Hy
Enec:J\'!'
t-t~ . c.)(T .
m~r
irT rn)
ttacrq
ruong
~rpt"'
onPf ~or
IR.l)
(Pc)
l (em)
51
49 05
7 .9
~2
Sie-vt ~ro
me1n
%
N:l
lrm>)
•..,;.;ht or
tm•ned
1 ;·
~3 . 100
oro
I 0'
~ .•ro
0.0)
om oro
oro om
31~
1HIOO g .50)
oro
~00
flOO
100.00 tOO.OC
~~
om
tOJ .OC
<.75)
O.OJ 3.6J
0 .45
0 .<5
:.3SJ
1~ . <7
1.05
2
13
1. 18)
JJ 5)
0.60) 0.30)
lH5 lS .
3.85 4.•3
~510
5 .73
t(Q
0.15)
IEi-4.10
200
O.o75
::21.~
;u .!·9 27 .r.B ?>4.i9
319
TOr -'1.
rcr .AL SMCF\.E gr
518.;'6
~OJ
C
rec.ne.'1
tOO .OQ
;)
_,, ,_
:nerncv1
'!\mer
!0
16.200
0.0: 18 ''
0.047
''"" ·
n.cs
9 I OC
o.o: 19
o.roe ·
41
25 . 5~
HOC
])
:~ . a · ~
~
:o.H
'40C . 2 87! t 42!
48
os
~- ' 9.1
31.05
aus
•O 36 '
~1
91.49
3J
30 .05
9.a to.: tOt
6.)7
9,.64 BUt
:g
:18 .G5
I I .<
~0
17.~
:6
:s
nos
IU
~7
!5.9'
e, _ o~e
;c
?1
i ;:'.!·
::;
13.15
sa9
lD
19
110
!i
11 .08 .Q .OI
?.- hrs
I)
13 .05 tO OS
tl 13.S
:c
3~ . 22
,,
19 05 16 05
J.j
u~
IS .Si 37 .1 I 04 78
,.
·;,
• . 0.0:18 '
0.006
0.(126
100
'
eo
lr
w
z u: ~
T
[. SAND I f ~I >C::IUOTO~~
I I
60
y-I.J
v
!
~
I
40
) .0:18 '
OD14
I
74~
o.o· to
o.oto
0.001
. 0 ~ tl 0 21;
0.0 : t 8
O.OCll
0 112
o.o: t9 0 .o: 18
OLOS 0.004
~
o o· te
o.oot
20
"''
... ~,;--1--
OD2J 0.019 .
0 1C
........
I
I
J.Oll 8 . 0.0' 18 '
0
'
0.0:18
LAY]-~~~~
.I
•' JC .400
40 .05
IO .i'9
O, mm
33.86 Jt.IQ
J3 .05
~
c~·1
•9
0.5
LJl
j
I
.
...
0.01
II'
II II
I
o:1 · .·
\o:JI~Yt:.L..
IIIII II IIll II II II il 10
GRJ.JN OJAJ,€TER (mm) Vlsull oualpllon: s~nd . g,-.y, l!lllt siC. 11111• clay. lrBce thefts' SoW classlncatlon (VSCSl : SM
~
;
' '
100
' " ., , . ·, ,~ ,," """ """""' "'"""•••<>---- ...... ,~,..,. ••1•"'"'-
H
I
a
··
5 7
1 '
tt
.''? ~···j
?reject : PeogernbanganPciabuhan Benoa Bali Location : Pelabuhan Benoa Baa Si9v• Ansty~lr ~ ~~ ~)t"f'lii''IQ
Bore/depth : BH-18 /-2.00 s/d ~HXJ m LWS Hydron)()rer
meln
'A
CU"Tlut~~
.,.,
T<.....,
Actu"' I !yO
Corr l""r'J
EllrctJ..-e:
rr'fJ~
~4 rt'UIII""'t\1
mer
~m 1n}
rea~
rt!Of17
O~ Ptn
rn~)
(:'c)
L (em)
men;scu; \f\1
0.00
100.00
015
53
50 .05
7 .~
54
n.:n
21 .800
100 .00 100.00 g~ 80
0.5
51 46
~8 .05
79
52
II. BO '
~3 .05
1
38 .05
$ .6 9.4
41 •1
1o.sa ·,
~
I !,600 8 800 000
3J.05 30.05 25 .05 19.05 18 .05 13.05 11.05 4 05
IOJ IO.i
j7
8. 12.
34
1.38 :
! 1.~
~9
8:15 '
12.5 13 13 .5 I:H
23
1.68 ', •,
~0
3.1}4 '
0~33
17
3,, .
o.ns
IS 3
0.99 ;
No
(ITYll)
M!iqht
: 5'
::S.IOO
1 o·
25 . ~oo
o.oo oro
oro o.oo
31~
19000
000
318
9500
520
5 .~
l}!l:)
000 68 .10 S4 .£<0
0 .00 0.00
02
9 . ~3
se .~7
36
=.300
72~
~fG
15.21
B09
!E 3J
l.lti::J 0.1300
1~5 .40
11.~5
~ .56
n .J-4
33 18
~ .30
;sro
55 .35
~us
16
n
50
o.:m
17 . ~1
72.)5
0.1!1) 0.0:5
· IO.t5 4 .0~
!1J.SI \l7 .$-1
11.15 1E .
JO
100 100
Ul3$ 13530 51.~4 1111.i\l
ao
19 18
120
I~
:~ tlf'S
7
gr
T:)TAL
TCTAL S.WFU: . or :
1: .~s
37 . ~-c
'·
.
GRAIN ·SIZE DISTRIBUTION
~~
::: ·m ontr t:r
H(d .
'% lnt<
K
1..11
cLAY [
D. mm
stLr
1
rt
tOO
9.35 ''
), 71
I
I
0 r65
0.01192 ' 0.01191 1
0~7 ,
Oro5
O . OIIQ~
QJli6 ,
3400 '
o.o11a2
2 875
0 . 0119~
o.cm 0019
20
0.011 g~
0 .01~
0
0.01192 o.o 1192 0.0119Z · 0.0 1192 '
0.011
; 1 .~38 0.781 '
. O.IIS 001(
.I
~ . 01192
ffiz ~ ~
O.OC'B 0.004 O.lQI
!
60 :
.(Q
vIi
i
i
I
I
I
' '
/
I
1
'
I
GRAVEL
J++--+-+-+-f1fHf{
I
I
I
I
•.-; 1-it,·,: Ill' I i ; I
0.001
o.cru
~r-
ITI
80
0.0 II V2 .
r I_..."'""""' I
~--s-~.No ~~
0.01 '
0. t 1 GRAIN OW.!ETER (mm)
'
I lCD
tO
Vlsull descrtpllon: Send, brownlsn grey, :ltle stn . t111ct c\Jy.lrace corallsh41s. SoH classincauon tUSCS) : SM
127b
GRAIN SIZE' DISTRIBUTION : Project : Peogembangan Pe!abuhan Bcnoa Bali Locatlon : Pelabuhan Benoa B'afi S/&ve Ansly:rlr
Sore/depth : oH-18 /-4.00 s/d -5.00 m LWS
•
Hydrometer 1-tyt! . ::rr
~i~('i:""""'0
rne;Jn
·.~
Cl.I/Tlo.Aaove
.,...
rome
Corr HyO
::neen.-e
No
(mm)
··vei~ht
r~ta1r~
~ rru;,~ j
f"er
(rr.in)
rea()lnq
readr-· ~
"~P~
Lient.l
13.100
O.(}J
1())00 100 .00
:5 0:5
~ ..J
Sri
8.31
~5.400
O!(J O.OCI
50 .05
'o·
0.00 0.00
tR.tl 53 51
IP.e)
! ;·
nooo
-;:J .SO
5i 49
9500 <.iS1
: .99 I· : .49 1 5.33 ' S.Bl S, 16 4.65 ' 4.00 l .JJ ·
Qf
)/4
l'9
~ -361
46 .05
7.9
•a
•s GS
'3.3
~4.(13
lli'J
SUI
XJ i7
7U3
.19 .05 31 .05
.,
3.g3
•1 39
-3 .•
101.$0
~ .~
Je
113.40 153.70
10:14 13 !(I
XI~
suo
J.t ·
31 C5
IO .S.
:~
~U9
J1
18.05
11.1
~4
(I SO)
162.50
H ::9
0 3())
138..10
I ;: . ~17
:ro ;,;
41 . i I :iU4
1(.()
0.15-)
172.~{1
15 . ~7
rl~ ~z
. H.J8
.:00
0 07~
H .
~ . gs
'31.59
8~1
1UJ< .~
3U9
TOT.<.!.
merW"to'
9~ . ~8
J)
TOT ~l S.I.I•PLE . ~r ·
II ~0
~\
L~ I
fnl!f .'
.1,
3 300 '
0.011 S6 0.01196 • 0.0 11G6 0.01196 ; 0.01196
tl.0'22
1615
O.GI19S
O.il19
~86
' 0.01195 I 0.01195 Q.OIIG6 ' u o: 1 :?6
O.CH
22 .600 ' 1!.800 i 8 300
ooc I
:l
24 05
:;J
:fJ 05
:o
11
OS
: ] .9
., ,
..
. :.~3
D.215
1'
14 05
13.)
12
~ . 34
10
:o5
:4 !-
11
• . 1j
0. Ill 0 01(
!0 IC\J ~41vs
j"
CLAY
\:;1 ~
'6
i ~ .t
O.rnm
100
10
"
i';
ontr \Jt
:. ~]
~
!')
l.lll1
1-ty~ .
tl 567
0 .0)
0?1 58 .:-.J
15
I)
.11.c1uot
~~
:•
0 731
0 ~I<
0.!65
O.DH O.o.34 0.016
O.l!O
o.ros O.l))l
! U.O11<8
0.(01
; 1.0::95
0 001
~0
a:: ~
u:
~
! I
60 -40
20
I
SAND
SILT
flit
; ! I i'!l I!! II ~ : I I I 1!'1 ,!II i ' Iii IV I : ' ;kdl Ill ; I ; I, :r111!11 II! !
I
I
I
0.001
I ..c::uo >OCoi'Ol
0.01
I
Jll
GRAVEL I~ I
I
h1
I
I
I
l
I
I I I
0 .1
.
I (
I 10
tOO
GR.AJN QII('.IETER (mm) Vlsull description : Smd. brOVII"'3tt goy. lhll corall';htRs.lnc• sit, tract c'Lty. So~ ~lnSlf\caUon tUSCS) : SP-5.'.1
·----- ~ .. ---.. ~ .....,..... ~u ••,. ......
PrJject : Peng~mb
CltT\LL'"C"oe
'>\
T•""
,~.,..., .,
No
(rrrr)
'~lnt
rt'tlKit'd
~rr.2r:"!j
riner
(ru' l
~a
u·
:B.1oo
0 .0)
O.CJ
oro
10J.OC
0~
1 0'
15.u:J
O.OJ
0 .0)
0(.(1
1:1.()(() 9 50) •.7$:)
1S.OO
1:11
1~0 . 20
11.~ll
1(9 20 12J.:J1
11 . ~5
1.:1 12 l9 15 1A
9 .92
I
100.0( 9£.09 91 . 11 74.96 B• .ll'l 51 .10 4U6 41.76 2£ .60
C.S
314 319
!l .BE
gr
94 .14
7.SI
I ~1 . }')
3')
1.100 0.601
102.20
5)
(120)
33 . ~0
8.45 6.9)
59:~
1(0
0.1~)
:no
oo1s
156.20 132-10
16
i'.:JS 3S
TOTAL
TO'r.AL SMlP\..E . gr ·
1316 10.!14 3'2.J.4
51 ~I
?~
>c)
Si ~
--~ ·- -
«
•2'
«'1
2
2
•
'uti
•
) : .....
B01eldepU1 : a/-'-18 /-8 .CO s1& -7.00 m LWS
Hydromer~r
me>n
)E
(. r:~ .1~·~
·~ ·
Sl""' op,.,-g
35
• . ..........,.,,._,.,.,r........... _ ...
GRAIN SlZE DISTRIBUTION
·}
~ .:li'J
_,..
'¥
C-YT H,U .
~r'leC": ~ ~
~CJ
rtMnq
O<":J('"I
·on,•p /'or
tRI)
(Po)
L (t!">1
5J
50 05
; ;:
5-<
11 .53
2UOJ
0.01204
0.066
1
46 05 ~5 . 0S
7s SJ
57
•o •s
49
1!.800 8 JOC
Q.01204 9.01204
0.048 0.105
~2 . 1J5
s~
46
~ ~oc
0.01~04
om
'1- 40
Jl.05 34 .05 3105 1; 05 2e .05 :3 .05
9.8 10 1 10.
~I
!8.93 ' 15. 78 ' 14 .1J ' 12.98 ' IUIJ
. 0.01204 0.01704 0.01204 . 0.01 204 ' 0.01204 . 0.01204 ' 0.01204
0 .022
20
~ . 01~04
err.
~
•r. 3' ~s
16
:lJ
~0
~9
>O
::1i
110
~·14
?..t :r:
21 .05
11 05
meri...:;: l
~mer
:oc
(~' I
~
11
I"""•
25
R.07 . 7.37
' J 200 252! 1 300 0 881 ' 0 38( : 0 19( ' o to;
13
I!
1.97
Q01(
10 . ~
I:
JO
9 . 1~
... 11
~;
ll .:iJ 10 .18
CLAY'
O. mm
.,
JB 36 J3
~
>.
Ut
80
111
I
u..
0.019 O.DH ' 0 .010
· i
I
0 L"'::i:
0.001
0 .01
0 .(04
·,,
0001
,.
GRAVEL
lk4Quoof0~
v
II I
.
v
II 4 I
-rm
' O.CXJ7
0.005
~
lll 11 ·11 I II ! d:I l dI ,/'( I I
I:
a:
~ 6C
SAND
SILT
Il
i
I
I
0 .1 G RAJN 0\M'ETER (11YT1)
lCD
10
Vlsull duoipllon : Sind, 9rey. some conlnn.lls , Inlet sill . trace dll'f. SoM c1assirll:rrtlon (USCS) : SM
1210
GRAIN SIZE DISTRIBUTION .,
PDject : Peng~mb
C~.mut3CJ'-.e
...
l't!ti!lt'~
% r
~ner
O.Cu
101 .0(
1) ;.'5
51
oro
10).0(
()~
000
101 .0(
wei~ht
I o'
J3 . HO
1 ~· 3:4 :l1l
25 4(0 1:1.000
gr O.OJ O.C)
n
;-,rne (rnn)
.>COJ31
Hy>J . Corr. H>'d .
:r Jcn~
00)
QJ)J .
~ . ~)
15 .:r. l9 .W 17.(0
ueJ
51 _,...
1.11 212 2.0i ( 01
r:JlfnQ
EMec::\"t
~ . CJrr.
"'"""
onty- l~r
Lic~•l 7d
4ij
~6 . 05
~-1
·~
~E
S'l 50 46
101
- ~9
nao ~1 . ;J
u . o1~,.
J1 .20l IU01 880( 505(
O . OI~:)l
o.tt'li 0.!>4S
0.0172(
OJ!~
~ . 012,.
I)CJ:l9
J8J'
001~~~
{J _CCJ
1 17
9£ .93
J'
9! .80
j1
~9 .05
10
~
jJ
5 <6
;}( . ~4
31
12 .1:
noc
9(.52
27 0~ 25 .05
I::·
g _.:~
31 : :;
11~
~9
23 . 0~
IU
~7
11 .E2' 'O .E9
2~
05
~~.:
:•
J.46
..
21 16
3.05 .
021!
l . OI~:!-'
v.C.O:
HJ
o111
J.om•
o(lj(
1-l;
10
~ . Bd
0 01(
~ . On:!-'
O.lCI
CIS:iJ
39.35 '
6 .65
16 ;:
9; .BB
O.:Yll
l)>l
39
~0
~J
l(l)
0.1~)
'.99
.30.(;'2
n :~ 57,.
7: .96
ss
10 '"
4: .34
~0
: ;J
17 .0S
IH
2('()
0 075
~45 . 13
1:379
T6
J~
2'-55
1''
1• .05
,~
~197
itS .'- =·
1305
: BH-18 /-9 .00 sJd -iO.JO m LWS
120 'iJ tor!;
=~
.
5 05
I
CLAY' l
D. "'m
3l()
J)
TCT At s.<.MFLE gr
•:
19 .&4 IB .O: 13.1 '
5)
38
Ut
42 .05 3405
!6
TOT.>!.
· ~fu(j'
100
:ner.itc;L·>j~.!..'l_ _ _ _ _ _ _ _ _ _ _ _ _ __
(Pel 48 .05
- - - - '''-':'-s_,,1 OlD . , Olil
Uor~de~U1
Hydrometer
%
(r.'lfT)
~50)
!i
Jlali
rne>n
No
<.75)
Beno~
o.ca;
143E 0'14(
n.ot2:!' 0.012:!' J.017:!<
0.01! 0.011
0~1;
~ . o1n•
ou::e
a: ~
ii: ~
eo 60
!
20
II
r !
l : ..
0.001
II
~
- _l_L_!_l
~
I
: I
-'0
SAND
SILT
----
iI
I
!
'.!.-
!A" I l AI I
'
0 .1 '
.
I
: I
I . '
,
I
II I
!I I ! II
"' I ·I I . Ill'I,I :' I. I ij I.
0.01
GRAVEL
1~"''""""1
II
l
I I I I
•
10
!
i
II I
I
100
GRAJN CW..€TCR (mm) VhlJII eescrl~lon · : Smd , grey, Sod clanilkJtlon (USCS! : SIA
trac•
C'OftV1hotl1~.
lltlle sit. lr-ace dll'f
·I
• ,...,., "
~·
' ; .. •J .
GRAIN SIZE'b!S.TRfBLrTiON Pr.:>ject
~
.. BOie/d-epui : BH-18
: Pengemba;lgan PelatJunan Benoa Bali
/-11.00 s/d -12.00 m LWS
L~Uoo S/~e
: Pela.butun !lenoa Bali A11slpls
s;..,..~rg
Hroro/'T'103r"'
Ct.r."~u.a~e
~
frN
,\(.:'lJ.Il~
rttJt •N
'lrr.>n<~
~ll!r
(rrlf"''J
'tac.rq
00)
ow
100.0Q
O.i5
14
,,...,.,,
~"' \~~nt
' s·
33 .100
O.DJ
I o• 314
1SAOO
n jJ(I)
O.Ol
O.CJ 0.0)
319
9.~J
5 02
0 .4)
GOO 04)
<.75)
10 ·~ 17 .00
0 .87 1.4>
:
;s ·~
~~
gr
00)
' 16
~ .3D 1.100
:n
0 .9Yl
S) 1(0
03J) 0.15)
'17 .:0 11e ~ <48 .15
7(Q
001S
:'09~
1 .40 5 02 9.3) 35 .;.8 16.93
~XI
r. .;.i.
TOTAl
OUJ
~\
~ i
E~rc-: ...
~~on
croft
!FJJ
(P.c)
L (cr•l
mer.,cu1 if")
SJ
50 05
;.
s-:
49
~805
%~
. . 24.111
47
·' eeoc
J'
20.49 18.87
OOG J 30C
oou;! ,. ·om
16~!
0 OlliP 0019 ;., 00110S :· ' tl.CH 1 o on;5 0010
43 OS
•1
38.0S
9U3 91 .19
j9
3~ . 05
:;.
)I
05
10 ~
.JI
19 05
Ill
j:
16.72 15.10
iS
~) . 05
17
:s
11.9:
~,
19 05 :lOS :I 05
2;
~?
13
. ~ . 72 . : 56
; c~
:.a:
8~ . 87
16
:<:51 !<:! Jg
8C.49
;o
401
eo
1,
::-: ~-:
11 . ~8
1:?0
! •I
I
?~ .•f"'!
~
0~
001:71
J< ~~
~
's
IH
~ ~
. . 1UOl 1
.1 ~e! 0 75( · · · a~n ' I' ' .
q
1!1 .'
' us 1 :e
0 ''~ 0 II! 0 01( .
0.01175 . 0047 ~ .o 11 ;e ' · 0 .(134 o·olliP
I
0.001
1
1CD
10
GRAIN CMMEIER (:rm)
Vh~ll Oe,:a,~ICK1 :
, i):'
So~
0001
~. 1
0.01
l.Onrt · 'oca. i(
!
I
· , :Oo11 ;e ,I .· Oro! Otol
.
60
ocr.1
~ . il11i5
I
Sand, gr~y. 1111\e Ill. tnt I Clll'f, lnCI Corallsn..fl. clau:>nc.rtlon (USC:Sl : SM
12~0
TOTAL StJ.IFU ''
GRAIN
s'tzE
olsrRrsorfoN n~relde~th : BH- 19 /-2.00 sld -J .OO t:1
I
Pr.Jject
I
triiO
..
. 13.18
•o
~ . 89
2! 8(1) I
~0
euo
1
I
CLAY:
I
1~ . 95
SAND
., SiLl I . ,~ .,._....,«-
O. mm
l..1
!"!~ r
Ceot ""~
1J
:~
'+r<>
rrlOn?
:31 a.d 9 .• H
IOO.OC I OO.OC
1.:7
05
(.)rl
/
: Peng
LWS
Location : Pelabuhan Benoa Bali
Hr'lrorrnr,u
Siove Anllly~lr ~~op,....rg
mean
%
Clt"TH..{]0\. t
'1\
T!rr.~
\...et~ht
rmtr•eo:1
~.""l!';\~~
flner
(rrin)
00)
000
O.iS
0.0)
0(0 . 0 (()
IOl .OC 100.0(
'""
iiTYT)
1 ;·
33 .100
0.0)
1 o·
75400
0.0)
3t4
I;DOJ
o.oJ
319
• qr
"
· om
BO)
.69)
O.B1
0 .~1
s.es
on
1.!0
er.~o
~.36)
27 .(()
J ..j)
•:c
9! .10
8!.48 K07
I)
1.18)
!5.iS
6.61
11 51
])
Of'()
171 ).4
14 ..:1
~:13
~)
0.3J) 0.15)
~40
50
:JI}ol .}-4
lCB H.OI
~:13
4£.19 4 07
0015
3':!.14
3 .~
93 l7
0 IJ
100 200 TOTAl
TOTAI. Stun..E 1'
94U .31
~ .fl7 ~
1 31
~1
.
Hyd .
r:on
~.
!:::.'tee::~~
H,tt
CJn
''\ t"nt'f
•.
Ul '
reacfn9
v.-pt·,
en~
1R1 ,1
(F>c)
L (cr.r)
me,;lc~•
(i''l
80
· ! \'}
cr ..
\' ,1 1, ~
z
•I ' .
•~'I
~0
'0
1:?0 i~ tors
C~YJ . SILT 100
UJ
60
u: '
40
'#.
.)
16
t
O.mm
lor
· e.lc~
0.5
IOO .CC 9U9
L}~)
~c:u>f
20
Ee_~~J'
!~ .
I . I. ~ . w
·~
I
J, ;_
.· !;i. j
'I
I
,
'
'~
I
~
r
I
,' \
t
0 .001
•
'
,
SAND .~
' l ' •
GRAVEL
ltwe:~roc:w.c:j
.:. 1: 1 'II I i.~I ' 'I lvtfli I
·I I i · ~ .. I ! I ,I .lj . I I I ·''·- I I v . I I I 11 i I ii l
I
I_L
0.01
0.1
GRAiN DVJ.AET:R (mm)
'!i ,
. ,I
II ;I
I
: · ·· V~-S·un· deWJ~tlon :· Sand: brown. · 'noll classil\ca1ion· (lJSCSJ ' : SP
Inee · stl~s
10
I
II d II 100
,., ... ,..,.t'I' •",. , ~·~I #J .... I\L.'ti'?~r.M*ht'""'tM~t""""".....,..,.'..l-."t .f . ,,. .,,l\,...JJ'.,I'> 4·•""'u-f,_.........
I'
'
l~IIO P
' 1tL
I JOtor
IJ
@'
1
i
t:'t!:f.ll
j •
GRAIN SIZE DISTRIBUTiON -~
l'roje
BO!efdepth : llH-19 1-< .00 s/d -5.00 m LWS '
~drc ~r~~----~------- ~-----------------------------------------------
..,'0
-; .~11~· {/
nu•n
~
CU"T1UIIItl,
:;
~.-
~ht
...,..nbl
% rttlh<'d
finer
(min)
o.oo
oro
u.oo
100.00
0~
om , oro
o.ro tHO
100 .00 100.00
o.s
ll
Ja ~s
1
~a
.&! U5
0.16 I !0
9i81
1
•s
., 05
9e H
:o 1
9 l"3
II) _:
j4
~ Q] : '·
, .Tl'"ll;
r..,.-~
or •. 100
I '
I0
2S.•oo
ocn
'\•4
~~ t. oo
o.ro
310
i.Sl'' <7!J I
I~
7.7)
~::m
19110
0.19 0 !:I 2.:19
16
I I iD
~0
5J I
)J
o &:lJ
11s.rJ ,_ 13..10
n-:v
5)
0
11,l.xl
13 UJ
::!5 /9
:m
·
Sol
1(1)
0 ISJ
<07
~
-'6 ;-g
n~il
j(AJ
0071
19 •-! ;gr :t!
9!) 11 ;1
~1.'1
-- - -·
;or.AL
9i 00 !1<571 91.11 7i .ilO
J.:e
tUl I l -12 •
"'"
----· - ---------------n:JT.hl !ffil
.~ l'f\ HU •
reb· .· ~
(.:"'1 HyO
rr 10(-\q
F.ncc:r ...
IR.I)
fPC)
""""' L ;cml
ll
5J 05
; ,.a
Hyo Corr
~lnu
m•fll!CUl
21 .800 . , . 0.111216
;s
~2
: JS
15.800 •,'
9.::
49
: -15 ' q'
46 41
I g5 .,'~ 5 \J
JB
~~
8.300 ..F 0.01118 . ~ .-100 "1 0.01218 ··' 3100 _.,_. 0.01216 2.575 0.01218 1.JJB a 01116 .·.. 0.700 " 0 0111 & '
);~
,.
11
• ~a :·I
~
~9
l ge : :1 l .: S · I
18
3.J JO
30
7'
60
;J
>C =~ ii C5 :• 05 19 C5
! i .S
~3
120
1~
\l 05
lJ
~0
~ . ee
~Q~
~t ~
1~
0
!1
1 -~ ~o - .. _ - 1
SILT
1
0. 3~0 .
•,: 0108 , 0108 0 0\C
;~
0.0121&
0.01116 0 01116 J 01;15 ,, 01~11
~ GO
0-0% ,, 0.0211 01122 ' 0.019 0 .01< .
..
l1.. • ' .,_ -40
20
0.010
0 .~1
'
I
I I
t
0
1
\"
v.
I
..., ~l
IV
'•:
0.1 GRAIN
0.01
~
'
VISVII Gascrlpllon: S•nd.
;) _~1
Sol clanltlcltlon tUSCS) : SP·SM
~
I I
I
I
I
I
'
l
.I
I
O.tol ,, O.CO! 0 .00.
I
r .
' .
J
GRAVEL
~
r-1
..
y
I
,z: • .
' il.o-16
v
I
80
0.066
8. )8 .'
!' 2
1
CLAY
(Rl
Sol
4()
~-t.:!_ _ II
D.mm
K
tOO
);
0~
lJI
onoyror
i 100
10 (X.l.METER (rrrn)
9rrt. tra<:t sll. tratt cfry
SNIF'J:. . ~r ·
GRAIN SIZE DISTR:SUTION Prvject
:
Penge rnb ~
Location : Pejabuhan Siw. Ana!plr St~
No
me:m
cp_....;r.g (ITYT.)
l ·~r,tl[
·ra- .,eLu ~n
.
1
'!enoa El::lfi
__,_______________________
ll;e !:'n~_fiJ
%
(,lfnui.:VJ.,
rt'tA,.~
~\ r ~r.;n:-·:!
~
..,rr
I;·
o·
3><
JIB
~.)(r rt."tl .
E:rleCD•"t
frr.,·.J
:t_.J""';
"r•H)f"\~
::::ect""
Ot•~·tor
: =>c)
l iC-'1'1
"'UHCVI (!")
om
O(()
0 uU
;t tJ
u ~...~
a :~
5:J
suo5
•to
000
01))
1)00
1nl 00
0s
·jQ
1l GOO
001
ac.J
ooo
1(\J
"' ~~
oc
4'
.1-.t
GS
as
~!00
3.iJ
0.73
tl.:S
;; i']
•1
:?
' 7!0
• . l'l
o121
o . ~-9
:!!l
:· :>6)
5 91
0~3
; 1:?
J! uS J/ c.s
1-SI
2.i5
-~ <1 ;r 33 1i :'4
1 .~
g; .11
:5
1.100
ll.SO
,,
~rol
171Q
5)
~
3J)
:ro 11
:oo
0 !5)
·zrn
o075
lCTAL TCT.•l
..\c:u:u tty;:
)) HU ~
SII~F\E
~r
,_1.
::s
•JUO
Jl'-6 :0.16
di.S1
3£ 49
l::lJ))
9.1I
:0.32
~~
9:."-18
70 f.'1 1310
)5
71
t-+,: . r;o"
rur~
_____ !5.!.!.____
Q'
1
BO!efdepth : aH-19/-d .iXl sld .7.00 m LWS
~~
10 lO 60 1?0
~5
30
i.C
tt"5
S4
::-
~1
;; r~
2.
•8
:~
·-= 31
•3
:~·· ;~;~
u •O
31
~2 . 05
111
~
:s 05
11 .r.
~Q
14 10
' :1 05
t·: :·
~s
11 C5
::- . ~
~1
>~
05
IJ 3
1
05
148
9
"
~
~er
7• ; 9
•O J6 J1
)5
1\
::J'
a
:·
:s<~
:e : ~ :: :o 1 ao
L~
"
:J, mrr •
tOO
11aoo I! BOO
n o1:1e
o.oo
84()(
~ . 01178
OU3<
~6()( ,
3:3: 7eiX llO£ -_ o 111
JOllie
Ot6-<
em
J .o11 ;s
o
00111t
O
0011:&
0019
-. 001178
001~
0.01171 0.01178
0,010
0.01178
0 .005 a.004 0.(:(11
l .J7
0401 0 11! 0 111
r.0\179
~ . 90
0 01(
0.011 19
O.tol
1
•
!
1 11111
1
.'t•w;::
, • .•. 1
. .1it.l
•
I.
rtJ.tl
80
a: z. u: .,_
UJ .
. I 0 ! -0.001
! l ll
Jill
I
• ! l l 1\
0 .01
Q,l
I
I I Ill!!
I
I
' I
I
lj
"I!
Ia
I
I
1 1 I!J{
leo
GRAJN CMMETER (nvn) V\sull dt$C11fAion: Stnd. brownlm gny, litH• stt, Inlet c'.lry. !n(t 11ltll$.
Soa classiflorllon (USCS) : SM
Oo < H
o.Jh·-···· .......... . ,_,...... . .. ........ ~·
,.~~
~-_._._-----
GRAIN SIZE DISTRIBUTION !
.,
Pr.Jject : Pengembangan Pe~at;uhan Oenoa eali Location : Pelabuh3n Benoa !>ali
S"-ve
HydromtJter
Ar!B~'Jis
Si~~,...,..o
(IT\IT)
flo
Bore/de~
me on
~
Cll"l'lu•"""
....
7'•~
,\lef~nt
f!"te~
'-\ r~li\r-~j
"1\t(
(rTtn)
gr U'
J.l.IOO
O.OJ
0
!j)
O.lQ
I 0'
1S.~OO
0 .0)
tHO
314 318
U .COO 9.S0)
00) 11.!()
1.31
1 .~
JO.iO :loi.IO
3 3) 3.67
H5
~ . 381
37.16
1.18J
57.30 n .CI2 100 :l) :'S1.35
L.7~ I~
l)
OSGl
5)
fi.30)
roo
o.15l
~oo
a.o75
TOTAL
or rru.oc
()
Cvn H)'l:l
:N~c~~
ltaOt'a.;
rt:,Ont;
.,~J("'
; : I~
r"'c>
L (cr.n
.l.c.\ul
~
H(C .: ,,,
~ t{'lt(
·
s.: ,,
1a
99
5·) 05
! • :~
9U6
,,
~8 ~5
.... 1)5
a.J
J8
9! . ~S
jq
"ll5
~.7
J(!
8 .31
91.39
:;.t
10 ~
~5
~ .OJ
1'1 .'31
eng
:n
31 05 05
:g
10 . ~
6.1&
19 .47
:7 05
IU
JI
9 .91 10.!14
~ ~5
91.53 71 .64
;s
:;
ec.eo
:
2! 05 ;; 05
11 . ~
29~
1Z
:~
U7 .
?Q .L';
~'};3
~0
;gos
12 . ~
::
104 . ~
11 .~~
JU7 I !.12
16(15
13
=~
i52 H
:l)~'$
~ '::~
!..;·,
: .23 U9 1.D! '·'
,, '
TOT.AI. SJ.MPlE . gr
:::~ :~ 'r!
•a :9
:5
., :~
.,
I
eco
0 0 /2(>.1
0[166
0 0 11C.C
1),().18 .
i I I I
O . OI~!).C
0.035 .
0.01104
o.cm
.,. -40
0.01104 0 01~!).C
O.OZl
20
0.0 17!).C 0.017C4
0.014 1).010 0.006
0 20(
0.01~(}C
0005
0 10E 0 01('
~
. 9.50
!?30
i
~ 60 u..
8~0(
"'!'J,.,
0 . 01~C4
0.0<))
~ DI~(}C
l)OQ.l
0 ::CJ
0.001
.
u::
HSC 3 500 1 •21 1 ~00 0 719 o·40C
IS 7' 13 .68 11 70 !1 0'! 10 :;1l
I
f'tE
I
I
I
I
0
I V I l I .. i ·J I IV I J ·- r lll
.
. I
l I
i
0.01
0.001
-
~ f-
I i i I : I II
I
i
GAAVEL
, ...,.,..fOCW
II ' ao : · iII
I! 6Ccl
2!
18 1J
-5ANo--=l
CLAY f-SiLT-~-,-
il ,
men,tA..-.:l'~'
~j
i~
05
O,mm
100
St
101
>•
L1
on~· ':'
: BH-19/-8.00 s/d -9.00 m LWS
0.1 GRAJN DlA.METER (1'TTT1)
100
10
Vlsull ~s.:ripllon : Sand. brownish gre'j, it1/e :llt.lrece ch!f,INKs shefts . Soli class:tlcatlon (I.JSCSl : SM
I
GRAIN SIZE DISTRIBUTION ~ · l l ' ..
Location : Pelabuhan Benoa E;a/i Sieve Anal)•:/:
y,
C:Jnvi...!D'-t
~-
:~o
\vet~ht
,,
m1 ... ~
~ rrt;~f""''tl
~11er
irM')
O.CJ 0 .0)
C.J
1)((1
OCJ.
0 CJ
0 CJ
000 •) :.p
1.5"
3) .100
o·
:S .4[tQ
3·4
1lDCIJ 9.50) <75)
~1 . 00
3Ct
J (~
)I) ((I
~ . 73
5 r::
36)
Js ;o
~
l1l
~
t)
f?
Bore!de~~h : at-i-19 I -10.00 sld -10.50 m LNS
\1.)
;~
;
l!we
~c:u.Jt ~;
(;Tir)
·~JC~
:OJ .OC IOJ .OC :Ol DC
•J . ~ !-
'lee:,
Hft
~
;r.
· ~flf'('(
·-;:p
r"'q
L (c::ll
r1er.:;.:~: '·=·~
5J
S~O$
7 .J
!~
~1 . 53
21 .00)
1! €0) 8 30( .
7E
!:
:a s:
•J!J
J;
19
9£ .G6
•S ·
•:· 05
tl" H
9·UO
J~ ~~
jJ
)J .... ~
·o:
..
J!
."l 05
;:);
]I
:;~
•o
}eN;
4 .~
1.(:...
~ . ~6
57 :'0 !.... :'0
; ,; ; T. ~ l
:3
~lj
7f .50
;c;
3! .97
J()
100
~ . 15)
~4~ . 33
)3!<8
11 ;·J ~5 :0
?('()
!1075
:14.r.o
13.14
."8 IJ
~1.96
!~2.).1
i8 .14
~~
.00 ;~
:.c 1)5
30
,J
=~ o5
I'' ., 1
1:?')
::)
: 11)5
r: . ~
r;r.;
:1!
15.G5
1:) -.:
JS '
ICC
ea
Ol65
• JCC
.JOtt<2 J ~ 1108
;edt ·l rr.s
J
i
-1 J 11
1 Jt 1
a•
~!
19 09
•:
:s ~: i
~
:,..:
:• !S : ~ il
: j'(
> 01:
::' o:
oe!t-1 0 ~~( '
J; 111 Jllt !!
:JJ
0 ~0~ 0 10(
J
~ . ~7
0 00~
:!
'-
i;
"LAY
.'
,;s
q~
;:J,mrr.
L1
onN:.;r
.J~
1.19)
7211
E ."!ec:~
Jit
0 60) 030)
TCT ~L $tUPLE gr
~
~tJ~n9
51
I;
70TAL.
::.:n
dll
~~
3J ~)
I '
Hy.~rom-:ret
~i~op~ro
1
l
:· Pengembang<~n ?eiabuhan 9enoa Bali
Pr:Jject
:o jS
I
J.6: l
I
I
I"' ,
5)!
J ll47
J It 55
lla21
·J ~IIi~
·) 019 J 01J
ea
I
·
ec
a:UJ z
60
zA
4(
u:
-
. I
I
I
.
a Jo ~ 'I
[)J7
j
I: ,
II;I
ft4(
I
!I
.
I
. '
I'I', I
j ,
!
~
'
I
:c ~_l_LI:
J 010 ~
;
i
,,,1 .__
: ..C:U.Ot.:tc-..........
ill lt-+f . , I !IH Ur : I 1
I:;~~'
;I
il i 1
GRAVE
~~ .!
I il ___.!._~-~-~.:._!__!!~!~~-:I! ··~!.ill
J. 1
0 J1
1
II II
I
11/:!1 / II : I :!:Y'l~lli: II
r : q.i ~,,;.·1 :
--
SAND - · ..
SiLT
i
lit i 1111 10
100
OAAN OI.V-.1!"1' !!J'\ (lt'.tn)
1 o1: ee
•1C'.lJ::3
o11 es
1)(1)(
Vlsull
. :) .01198
0(01
So~
I,
cu:nruon : Sand . ~rownls.,
cless:ncJnon (USCSJ : SM
~~~)'.
1!11• :1n.1rece clt'(,lrac•
sh•h.
,.
~
• • • • • .......... ., .... •• ....... ~
·~o
u. '""""' ....._..,. . _ . _,___________,_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
GRAIN SIZE DISTRIBUTION .If
Prvject : Peng~mbangan i'e:at.uh:Jn Benoa Bali Location : Pelabuhan B~a ~afi SlovB Anaf\'$/S
meJn
~tvt' ~!nno No
,.,..;Qht
(mrn)
~
Cumuaa.e
~;
l't'Uif~
~ ft'VIt"''!e.:l
finer
1()) OQ
10) 0(
BoreldeJ:oth : 3H-19/-11.00 s/d-1::.00m LWS HyarornerM I me ..\l::uao HyU . r:,rr. H-,11 . {rr,.,}
'5'
la .IOO
0.00
OJn
o·
25 .~00
0.0)
00)
u(A)
1
3r4
13D!O
3r9
9.500
9 .13 9 .1)
<.7SJ
18.30
1.11
1.:'2 : .:J
111
1.11
J!.Q
~taonq
E!'leco~"!
"~" ~
•5 C5
3.3
..:~
~ ~
4.
I(
9U9
~.1
-"!
:I
;~
9 10(
97.57
35
tO .<
~£
;o
32 05 11 GS ?1 .05
:~
19
30
~
I
~6j
0.011 B9
O.OIS
s 01
0 BOE
JOnes
J .OII
:J a1188 'I J II B
u.
'6
."J
::as
r: . ~
5)
(13())
T3 .L4
9
7J
:-253
7141
'0
::1
t~
~ -~
~~
liS i3 05
.s
!~ .05
.
'1
i (15
: :.
7CT.A1..
•or.AI..
1:
~~.~B
!! ::'
ii..'<3~
l-'::'8
SI.MFt..E ;r
:a •:o ;~ • r1
01120
~ . 67
ar.:1
~
u.o118~
.J
·~n
'3-1 ,.,
2sn
:?
1'2 .$
0 00)
;: ~9
uCGJ
;).(146
0 .(!)5
tr.
~)
;-a :a
lOIIetl ' 0.0116g o.o11 es n.o11 ea
:
B:<.l :·] ;g
ro
~())
5
3&1 4 CO 54-1
:"03.)1
MilOS
s ~oo ·
:·
~H .,;,
.
,.
.. o:
:·
~6
3
.,. •• J
..
J
.,
ua
. 0 o!.!C" 0 ....... ,
) 59
0 ! ~~
''-" 1: 2e
0 01(
1~:~!~
'-
JB
: !"
eo
:).~
2UOU
Jt
30 .0 I :e .!.l
~15
:: 90
II~
n.r-4
JJ 1 5
Sol
9.5-l 9.05 .
II
CLAY
D. mm
mer.•:~ ... ; ;~·)
~O .C5
i
~;
100
"B 41
05
(cr1)
I 100
O.tSJ
L1
tP.c)
:.:m
(I
~fr'l
50 OS
;~
:s :00
c,,.,
Ont! 1.:r
)J
0
95 .40 91.11 BUI
::?fO
i-lyll .
(F..t)
9' 0(1)
It lCV"•)
F'flf.
I I'~
I
I
GRAVEL
I
lv~--"
I
(
~0
i
O.J1
0.001
0.1
1(!)
10
GRAJN Dll.METER (mm}
J.rol
J.:ct J.:('l1
- -~~
J.. """rocw
Ill'
jjl II
&0
u:~
··!'
r-~- SAND
-SILT
I I II I I I l .Ill! I!II" I; II v I . I· I II ::o I J I u.! ! Iill I I I I! !' J..-~ 1 II II ! 'l I ITII I 0
rr
.\l
0 .(127
1
'1\s.U(( eesaiptlon: Stnd . grey, trace Sl'lells. little. sln.lr3:t 'l.!'f. !lo~ cless.l\cJ1!on (USCS) : SM
7!0
GRAIN SIZE DISTRIBUTION :.Orelde~th
Prvject : Pengl!mba01g4n ?e-.abuhan Bcnoa Bali Location : Pelatuhan Beooa ?.ali Sieve Anlll\'3iS
.,.,
r,·,,e
.\.ttu.J: ,..,....,
fnef
{:nn)
ltJ..:n;
:.:~
I()J.Q[
G"
~
'""'
imrT)
'~~ht
~f'tt'O
I~·
33.1l0
0 0)
' o·
75 .4(()
?:.!14
JGI
J J
) •<
llD!ll
JEI
) f!7
9U9 9€.1 0
!· ~
9!.0)
H3 ;tH3
: !l
~:"-I
L}5)
· ·: .11
~ . 2.5)
l)(G
Hl ~ . t;
oP!NrQ
or
!~,,
Ot)
S .":ec:-~ ~,
!:.':'
H,t : ;n Cllfy'
11 fr.•r
_ ': c~ : ll
t•ter·;("... i \ ..:' )
~0
:.::s
: J
!-'
SJ
J: 05
: ·;
.!•i
"') t)~
H
9~ .49
"J
J\•
~s
)
:
: 30 : )5
:c :,;
BU•I
"·I
J:
:s
lE
'LaO
·;
.; ::
;: .35
:o ~ .
::
;..
.) : :5
:o :
;~
, .Oi ) j':J
II• 1':!
~~
:j
G~
J;
·; 0 :2().:
.) L6'::
SOl 8 8C( ~ SS(
I 0 !~().:
:;u..e
1,1:~~
•lU3:5
1 0 o:;c.:
\)(rlE
3 ~0( ., ~~l
. .1 0111:.:
vrm
a Ol'lC.:
!)
1 :11:
1 a:~~
•J .o1.:
., ;a
011<
IC•:c,.;
·J . ~IC
nil
04tl
. .!01~1>"
~ .())!
~ ~ ~s
10t7().: 1 ~1'1(;.1 1 ul :,}.:
u!l.e
~£
~&"
r:
le9 l1
IS IS
s:
~ :)
4UO
·o
:·1
15 lr. 15 'l1
57!; . "" l9
JHO
;a
::!
:! JS ll.)S
1!.81
~0
l 'l
IS 05
13
. "';~
g 2s
1:;0
~
11.05 905
IJ i
'!
~.~I
0211 0: :•
IJ :·
~:
96
0 OIC
ii.XJ
1((1
0 15)
160 )I . 179 3-4
}(Q
O .Oi~
;no
5-";
!oJI; •5
'«) ;;
tO'S
24
t.rs
:'i
~ '!
O.•r.m
\)()}
!J 1j
?1: ;·:- .
~J
•.
OIS
,)(OJ
•J .(OI
90
c::
...~ #-
60 ~0
~0
( (
:
"'su((
I
::1 .t--
I1 I' II i I
'
0.01
1
n•E
..,..lit. ... roc-~
II I
II
j
\.:JfV"\V~L
IT I
I / I : I I I . II II I I I I . ! I ! Yr ' I l : V!j i I Iii i 'j
4":,, .
0.001
SAN')
..;JU.. I
v\J'\ I
100
~J
:•I
L1
~•:r
ti ·;;
~J
TCT.:.t. SIJAF\£ qr
Hyc
tt'Jdn~;~
3o)
:~
~)
•erA!.
r:.)t'T
81.37 BHS
I.IEJ ~ &J
~;
Su'l'\\ii.JC'Io~ ~
.:.H:.;.:::,d:..:ro:,::m<>:::..:,fl1:.:1~---------------------------
ret1ne l
mean
:·~t'Vt'
: SH-20 I tD.OO s/d -!.CoQ m LWS
I
!
:
II
•
I
I
J.1 1 OIWN CJIAM!:lffi 1mm)
~•:so:npt1o.1: Smd. greyish orown. trace SoU cless.ncJtlon tVSCS) : SP-51.1
~>tlt~s.lr11ce
10
.
10(
Hn.lrilo:e cttry.
.,_,. ' ·' "
·-·' -
~·
·-·---
GRAIN SIZE DISTRIBUTION PrJject : Pengembangan Pelabuhan Bcnoa Location : Pelabuhan Benoa E:ali Slove Ans1y11: s;,.,.,opmr.q
6:~1i
Boreluepth : BH-20 /-2 .00 St'd -:1 .00 m LWS Hydromeff!r
mean
~
CumlJN•O
%
Tme
~a•r•ed
'n rrtJnt..,
ftner
(rrW"'l)
0 .00
l)(t)
Hll .OO
o;5
100 .00 IDl.OO 9G . I4 91 .10
0~
~.,
(nvr)
,..,;~ht
I 5'
3a.HO
000
to·
25.400
00)
OlD
0(0
3:4 310
ll coo 9.50J
0 .0)
OC)
(l(l()
7.0~
o.es
0.!<0
' .7!.l
1e.;s
2.().1
·. BO
.... 55
5 .<3
~}I
IS
1.360 1.100
124.34
15 .16 16 .:10 16 .tJZ
cr
3J
0 .600
133.70
5)
030)
131
100
0.15)
;oo
o075
171 .i0 59 .i3 ~99 L'
TOT..>L
TOT..>t SIMF1.C:
3~
or
;")
iO .~
;;3
~0
st.ae 76 .50
') ·
Er.ec~""
Hj1l.Corr .
r'!adin'i
dtpvl
on,,·hu
(l'i •l)
(P.c)
L (en I)
5J
50 .05
H
.\Ctual Hya . C~n . l-ir
men• levi
·K fntt
L~
K
15.79
2&.600
.
0.01196
a::
51
~e
OS
7.9
51
15 , 15 .
IUOO
0.01196
1)047
•s
41 05
9 .S
~6
IJ.:s
9000
0.0119E
Jl
3• .05
IQ I
30
10.73
s o~c
o.o119s
0.(135 o021
n
29 GS '21 GS
10 . ~
363~
ii .01126
1).(12.3
IIJ
Y.SJ
2800
O.Oll96
0.070
::s
1105
11
33 31 :'6
9.18
30
6.95
150G
0.01196
0 .015
0
0.001
nuo
If>
~J
IS .C5
12 s
~:;
8.01
0 791 :
0.01196
1)011
•H .IS 2U4
'0
·~
I; GS
1~ . 1)
)'
5.39
Q.O 1196
0.(09
~0
Jl)
13 .:·
-l.Q 1196
l),(l)l
!US
13
:c
IS ;8
~
"":s
IS 05 14 C5
0 ~3( 0 2::1(
-143
0 Ill
lOll ~6
O.Ct'\4
~C$
u:·
:~
~ . as
ooH
J.c:m
0001
110
80
0 .065
3'!?0
:-1 ~I(S
!I
(~' l
!-5 ;i ;~ i6
~ iJ$
CLAY 100
Sol
p
., .,
;.
810
SAND
1
O. mm
~ 60
u: .,.
f
~J .. ,...•o<""""'
SiLT
u
If
!IIi I I p·
II! lillY 11 0 IIJr l' I I' n I VII ! 'h / . I · II frfll I Ill 11 11 II' I
I
40
I~
20
I .. ..: l-0 .01
GitAVEL
I
il.! 1 GRAJN DlAJ.IE"TER (rr.m)
10
100
Vlsull cesCJipflon: Smd. grey. litHe ~il. tnc• clll'f, trace snells . !>oil class:nc;rtJon (USCSl : SM
.,,
GRAIN SIZE DISTRIBUTION !r ''
PrJject : Pengemba;'lgan ?eiatuhan eenoa eali L~ation : Pelatuh3n Bencn eali Sieve Ansi"lit !i~'t' qJ~ro
:nev.
~
I Ia
·~~ht
rrt'J•fl~
Cu•T..tllJ'.~
'\;
Bore/de~Ul
\;
r~[~,...e:
ftner
T..Tie ~
rr ,
qr I ;•
1
o··
'),.;
nHo
0 .0)
;s
11 :·.c
ll .GtO
'·' ro
10).0(
•l ;5
: :.~
~us
a.:
j
.r:·
9t%
-='
!.J
91 56
OGJ 1 ,;s
•l
1 . ~1
9.5G)
~ ~3
q~)
)g _;s
S.1:. · · t:L~5
~ .36)
128 .16
17 .(13
I;
1.16)
:-53 10
~3 . i:'
1)
(I
OC)
187 24
17.:·8
0.: ) 7
31.3:0
:c
0 .3))
131 ?0
17 .::8
:-J·~
11
5~
;o
l'll
~ .n
I.S
)~
7~
1e
1 '~
·I~
51
. 5-l.
, ' " '' )<1'1
i
,:.;r: !-f)"'
E'!:tc:.~
.' !iiCV"Y]
te~cn-;
Cl"~:"'\
i~ I)
I ~ C)
!.. ~ Cf:ll
.lc:"l;JI
~.,
H,t C.:r:-
!\:'r1t1'
9 83 5 E7
:~cr: tt..-..
;
!0 ~~ tlfS
='.mrr
SA.NO
-·L-
CLAY 10C
(~!
8C (l:
:r,Jc T~stl
1'! 0
L1
0111'J' !r)(
9! .21
::-= ; :
m LW5
.:..,H'J,.;.1ro:..::.;:.rT'>t:.:..:..:..:ro~r--------------------------
I (rrr:-)
: 3h-20 /-5.00 s/d -5.7:J
w .,.
GG
ii: i-
.(Q
20 0 0.001
' J .01
il .1 OR.NN OIAME'TER
10
(mmi
V\sull deso1pllon: Sand. brown. fra ,: e ,;rn: lit11e w<~ns . !:oil classinc:rtl~n (USCS) : SP
10J
GRAIN SIZE DISTRIBUTION Pr.:~ject : Peng~mba'1gan Pela~,uhan Be.1oa Bali Location : Pelabuhan Benoa E;afi
B01e/depth
- Sieve Analplr
_H_,_1_ro_n_.e_re_r_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
Sie-vt Cifl!fY.g {mm)
NO
mrM
%
\~lgt1:
rt13tflCCI
v.
Trmr
r\11"!(
(rrtn)
Cumvatr.. r:
%
ret.,n~:J
:.r~~.ll
1
I ~1.)5
JJ . 1(()
o·
314 318
25 . ~(1()
~I.~
liDCI() 9.50)
)11Ii
~ . 3&')
14 4J
12S .L' 119.15
~7
12~97
81))
~ - ~~
17 ).:'
J1 :d 39 •a )d
u •
:.:Jrt
L,
•. nt-r
"
Ol'l:.Y ' Mr
l (C:':\J
~tri;..:~:t (h')
: ...
~
IUB
0! .57 8l .38 66 .72 6& .00 s; 91
0.5
50
4105 .11 1]5 )4 05
79
51
IHO
1!.900
' 9 .~
J<
'1 .9-0
10 I
~1 .05
11 :'
30 21
uo :.ai
9 90( 5 050 37JJ
11638 105.7!
7.51
t'"BS
0.:)))
so
5!1.1.~
1fi(J
D 1SJ
160~8
lfJ)S
i9 lJ
~( . 17
36 . ~
5 .~7
. ~'6 J(l
1~ . ~0
1liJ.B!I
l5<0
: =II
.!ol
l' 30
:9 ;s 16
JS
"0 lO
=~
:J
..~ '.
:;o ?..t
i~
!It'S
05
11
~
~s
~
nos
29
11
9
~~
l
:o
22 OS ?1 cs 10 ()5
12
~6
l 41
11 . ~
:s :4
a 1~
1~ .~
1' liS
13 .::
!8
•) 05
1~
•.
:~
O,mm
~~ . coo
0.066
.
0 . 0121~
0.!146
1
0 . 01,~
O.O:?e
. 9.01212
. 0.1117
o.om-:
arm
0.01212
' 0.0?1 0 015 •J.010
•
1
2W HaE
0.01~12
0 i!( 0 •CJ . 0 "OJ ,' ... 0 !! :
s.aJ ~ . 09
.
U.O121 ~
u~
'
-1
.
0 012:2 01;1 ~
~
1 01~1 ~ :;
cow
~ 01~1
z
u:~1:
1550
I
CLAY 100
IF' C)
Yl
TOTAl. SJ.MFU: . gr·
~~
sa os
5)
TOTAL
d~CI1
:j
-H .OS JUS 3U2
a075
Et!-:c:J·~
r~lOt"l'}
u 25
I. IB'J 080)
:;oo
C::.rr ;.....tyct
91 .•19
tl~'i
5.91 3.0 13.C6 8.12 7.tn
~9 . '-S
• .7!0 ld
8.52
i-tyd
l::::r.q
~~
9'
15'
: 2.K- 201-d.OO slll-7.CO m LWS
80 lr
I .
I I
~ 60 G: .,. 40 I
20 I I 0
II .
.
II
1 1111 .·
G-~001
' 0 .((:6
GMVEL
, ... OL.-oof'Q(~(
II I
I
I
I
,.,;f. ~NO
SILT
rI I II I' r
I
~.--~.-
II kf I " I. I. I I I II I· Jdrti. ! CtrtTI 1 ur ·r ! ·Ill
O.U1
II ljj
IV
0. 1
II
ll
II
'I' I:
I
100
10
GRAIN OlA.METER (rr.m)
0.000
Vlsuil eua1pllon: s~nd •nd eorallshells. 7'Y· lrKe sil. tnc• c11y. So~ clasS>rlcatlon (USCS) : SM
OC04 ~(1()1
GRA: 'J SIZE DISTRIBUTION Pr )ject
:
Peng~rrb
.,.
1
?c:at:.uhan oenoa Eali
t
)
/ 1
.J ' \
Uoreider~h : aH.20 /-8 .:JO s/d -J.OO m LWS
Lc.cation : Pelat:utun Beno
H:·:Jromt-re:
Sir'V1: CIP~t"Jr~
m'an
'%
Cl.."'n.,.::;J::r-~
~t,
T. :r,~
~lo
weir~
rt.'lJ•f•t'O
% f!t'lr ,f:
liner
trr1n)
•mrr)
~·
Jl .H(l
IJI;le
tL~l
::J :: :
t)•
1S.4((.1
!3 07 37 (JS
J.ll
IJ ;: 17 :;
]lc
310
1l
Qr()
~
:!3
al.! .1"'.'1
91
~9
9U9 8~ ·IS
c:.:.:'l :~
~v
l
,-:. :n
7"
~ 5
~7
· 'J ::
I! !Ol
-•:os
·~: ~ . -:
~F.
, ;·1s· ·1 ~s ~o5 :1.0~
as::c . ~ e!~ J4ei : 7j~
:·:g u;
:.::!
1 01 ~ 76 )01176
o;.u
"JOlla
i; 1
0"0 '
r 311 ;s 1 Jit7s :I U: I ;'5 1 011;~
")1
;_?
££.43
:1
36 05
42.;:!
51 .77
:·.35)
I ::U 2C
J~
!2
1.1EJ
1?2 3l
7.13 :-- .;i
:;
.~\
5C.02 4; OA
1s }~
Jlos '2~ 05
:!
·:~05
:'i :I
:;ns
/l)t
!.';
ISl L' 51 !C 1J:.109'1
HJ J :;.r l5115
TCT:.t. SIUF\£ 9'
1510
I~;;
J! "H
..,-.4..
;o
.): ~ 1
11 .•9
:s
:o
1• 15
i:' .;~
~e
.., ~
.. ,
·5
1:.'1)
f..s
~ I( s
:·j
~· -.=ts
.lC
1G
1:.'
~;
1; ·)5
I '~!·
p ':5 ,. l"-5
! ': ~ . IJ ·.
CLAY !•
-----:-,_-:,-----:-:.2~::-:.l:-:-~2::1~.6:::0:::)-~,-:,:-0:-:11-:;7s--v:-.-:,16ol:--
to .~ ~0 ~~ 1!-
,, .
~ . lf"(j
1oo
;r, :J5
H 03
lOS 7J
- er · ;.~:.; \: ·:
'·
:...i
·•BJS
10f.5
l:tl2S
_.:c . .:,
!~ fnt-r
:)
~17~
(16/:.)
cn.v.,,,
l: -·i
165 J9
I• JC•J 0.1!) ~ OiS
H,'C .: .Jr.
(te~:":
lj~
;.soJ
!J 100 7.0
=!~tc::. ~
~ ;~
L . T~)
1; :'J
TCT A!.
:~
·=P
1 ;· t
...1.::...a• ':''1
J6 J~
~!
:8· . s :.,,.
'f
.1 gp
r,
.
. O~Co!
0 :~!
c:ct
0!~6 003!
'J 01106 ~J11;d :J 011 ;s
o.cf26
-101175
o.o::2
1
tJ .019 O.OH 0~10 J co1
;\os ~~.roJ ·)(~11
60 ((
UJ
z u:: ~
SAND
SILT
GRAVEL
~,-M-rrr--:-::-;-;..Y-,rfniTii-niTrr:mrnm -+-:-'-ittt-~~:-
_,_I
1
sc~;--~~~~~~~ffll~~~m-~rrm
~o~~~~H+-~~~~~~~~~r-rnm~ I ::o .i . (·
.
0.001
0.01
J.1
10
GRAIN O~~ER (mm) \11surl e<~=1;-.CI0<1; S~nd and On!hh&its. gro'!f . lrace llft . lrft.:t :lt!'f . So11 closSJnc.ltlon I:..JSCS! : Sl.l
100
v
GRAIN SIZE DISTRIBUTION " PrJject : Peng~mbangan Peiacunan Benoa eali Location : Pelabuhan Btnoa Baft· Siove Anslpl: Si""" """,.;.- 9
rne1n
~\
""'
,.,...;rnt
~?t"in~
(rnn-)
"·
Cr.-...J.!!.·~e
'n
finer
r!'"'..11("1ej
Borelder-th : eH-20/-XJCOs/c -liDO m LWS Hr_drofJ?IJf'f!l (min)
gr I 5'
135.30
)3 , 1(()
9.51>
e .,.c
91.~2
- --
i•ne ..\c!IJJI Hy1S . Ccn . H)'d .
0 ;'5
Enec::ve
H,oo . Corr
rt>Oir')
rtJdn?
Oe~l,
onfy· lor
(R.I)
(~C)
L(cm)
m~n·k..~;(R)
53
50 .05
7 .~
So4
',\ fntr
ll.C9
21 .800
1 u·
75 .400
103 .55
6 .55
:! : ..
a~ . es
49
48 .05
6.1
50
t~.os
:Y~
13DOO
~~ -·5
!S ~~
40 .05
~- '
o1ol
to.•s
IUOl g 10(
;·00.29
91.99 SUI
~J
9 50)
2.9l 12.88
30
33.05
10 . ~
31
885
s 100
75')
159 .38
10.11
~ . 360
122.<;6
IS
1.160
1~5~
7.16 9.22
))
0 EO)
5.31
319
l
0.5
X :9 ...:?-J .tC ~;
suo
:>9
~8 . 05
11.4
~0
51.44
Z1
1~ ':'~
11.1
~9
&.01 6.29
:: 79
~2.27
~~
~1
I
~5
5
~l:J
:5
13
~·
05
!J
o.:m
llU9 li.f.9
s~
:;::;.a
3!.90 :iU6
}0
~I
:w
0 15)
175 3'-J
11 13
:·:.:
;~
tU:
•.o
;u
20 .05 18 05 :: 1)5
;'(()
(I
,;J)J 16 ~7
:c ;:
I : . 1J
110
:u
IJ C!
;-tt.r<
l')
~
015
•c-r....
131?.51
70T.>.!. SM
0$
~'
·~ 1': .•
rc:
lA
3800
0.01~12
D.onm
0 . 0121~
0 .~9
0037 .
0.01211 Q.OIZ12
0.077 0 .074
0.01211
0 .071
s1
192! 1 52!
0.01212
s.::-.c
. 0 17!
0 . 01~11
0015 0011
12 .i
~2
Ul
Q~~'
0.0171:
0 OCI3
l 'i ~·
~~
~ ~e
0~1!
ol.01~11
1]
13 . ~
li
l
~ . 0111Z
0 .(04
14 5
11
0 "' COt(
0 . 0121~
0{(11
~I
OJ
loo
~ ~
0.066
0 . 01~12
CLAY
~
SILT
I
eo
~
I!': I
I I II'' -r
40 20
I
o
, ........
I 0,.,._ i GRAVEL
I. I
I
.I
1
i ·
iI
I. y
~,
1111
O.U1
0.1
I
rm
ij
I
I
I
.
GR.IJN OlA.MEiER
OCI3
-
v
Q
~ I
1
±illL I I Ill '
lr I
0.001
f'to£.
Ill . III
I;
60
SAND
I
1
I
1~
10 (rmt)
Vlsui! aescnplloo: Sind and coralisherts. ;rey, lr&ee sll. nee Cll'f . Sod c!ass;ncatlon (USCS) : SM
1590
GRAIN SIZE DISTRIBUTION PrJject : Pengo!:-:'lb3;'1!;dn ?tSatu~.an ~enoa Bali Location : Pelabuhan Btnoa C:ali SiliVPAr.st•sis ~i~l'
sc
.
~.
~
C:.r. ·-~·t
f,T,fl' )
,~,~ht
i!'t~lfl('\)
·~ .- ~;rt:
huer
;rrt{l)
J)ll(l
9' 0£)
o uJ
: ..:.
I C.l .OC
.; l'5-
4((1
:46 10
16 '"
·:: :..:
a: .as
05
ll CIO
:s110
!9
.~.!
:f.
6! :H
l·B
:~;
~·
T•m~
rt:~dr-.g
(!t"'l1
onrv '"'
tF' ,,
,.
f:,C)
~ (Cf'llJ
;;, as
:~
~r.')
.J
. 51
•8 OS
Jl
.u .os
I!J~f'"T1
·11
rr,.,.
L~
~.
O.onrr.
U . 01~()4
J.Ws
u 01104
01148 0.1135
:4.~J
2U(J)
! :;
~'
?'l .
1l.f6
1!.600
S .~
"G
1~ . iJ
8 40(
. ~ . 0 1~().:.
11,1'4
~
.;sc
· 1.o11~
o. cr~
i
!0.60
J :oc
0.0 12~
0.012
::!E 06
J~
J
10 I
~&
u:
251!
J .Ot;Q.:
0.013
1059
Jol
31
cs
ILi!·
JS
ol.95
~:)
::.os
II ;•
~I
:.eo
1Jt< c 7C(
0.01704 IJ.012()<
~~
:1.or 4 gz ,
0~01 .
~.011()<
0 .014 () .010 Ol'Ol
021!
·1.012~
O!Ul
0111
1012()<
0 .004
GOt(
H1~()4
0 .001
s.:.,
5
I :G)
II~
; J7
~.:·
!)
(I 6C)
!J 10
~ I)
·:·::
~~ - ~B
'f.
~:
tiXJ
;1 :.:0
JC]
J!..J
~(4ft
:o
1'0
!1 . 1~)
~-~ ~~,
If 07
0 01S
~(;0
3 .~ J '1 .J3
:::. : 2
:{0
~.:.c
I•
I >o3 .3<
;s.:s
"'
•If ·10
Jij
~
J
r
!15
,~
.,
~0
=· ::J
:; 05
I~
9
:t
1~·o
:l
1405
13::
'f
~··
1<
1~ .05
13 ;
IE
CLAY' 1o.;
~
177 :0
lS~5
c,,..
•s
:· .);)
i C IAL s;uF LC Qr
Hyo.
;e
:: ::J :·;...
7GrAJ..
E~ecn.-e
3.9
'lfl g :;1
;Q
"¥l Ccrr Ht'd.
I.OS
l4d )(1 147 ).1
~
~ctu••
J1 05
~! 71
; :
.;...! : ·:
/-0.00 sld
: BH-21
-1.0~ m LWS
.:.H:.;.~..: - '.:..:ro:.::fl.:..:lE'..::I'6::.1_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
1ntJn
cp!.rirg
15 3:4
Borei'deph
"OS i4i
II!
l 'IU i
80 rr
~
fi: r
60
'/. · 40 20
S:LT
I !
I
0 0.001
!
I
I!
I..
'
!,_. 0 .01
Fl'i~
!""::u--ro.:~.o(
I i!I I
I II''f;
ill'
SAND"------
GAAVEL
' ! llli li I ! ; l : I Ill! I ! I l
I
I
'
1
I
lUi _l !_LI I I 11 ! v ! I !j ! 111 :! ,, _ill I ] IJl l Ill Ill 1
'
"·'
IQ
GRAJN 0\AME'TER (fnm)
Vlsull cescr1p11o.1: CorallsheKs and sand . gr•y. Inset sll. trace ~'"I· So~ ctess.'tkiltlon (USCS) : GM
ll 101
.I
JURUSAN TEKNIK KELAUTA.N . FAkuLTASTEKNOLOGIKELAu1N~ITS
DATA KOL.AM KEDALAMAN RENCANA = 11 .0000
m
SLOPE =
1:3.0- 1:6.0
KEDALAMAN EKSISTING = 9 DRAFT/SARAT KAPAL MAX= 10
= 255000
LUAS KOLAM
ADDITIONAL DATA HARGA BBM/L T
KAPAL KERUK NAMA KAPAL
= Rp 1000
LOA : 109 m HARGA PELUMAS/LT = Rp 15000 GAJI KRU
= Rp
: KALIMANTAN II B : 18
m
DREDGING DEPTH: 20 HARGA BELl
6000000
T : 6.33 m
m
= Rp50000000000
DAYA POMPA= 1796
hp
PRODUKTIVITAS= 200 JUMLAH KRU = 10
m3/jam ORANG
JENIS PENGERUKAN : CAPITAL DREDGING
HASIL PERHITUNGAN: I
i
No. ; 1
Output Item
: DIKERUK
NILAI 12
!
3 4 5 6
VOLUME KERUKAN
I
SEDIMENTASI
1
UNIT m
I
2
1481995.00
o. 062413226651
m/tahun
TSHD
TIPE KAPAL YANG SESUAI i
6,779.02
; BIAYNM3 BIAYA TOTAL
m
i 10,046,474 ,842.67 !
Rp Rp
.JURUSAN TEKNIK KELAlJTAN FAK.LJLTAS TEKNOLOGI KELAUTAN ITS
DATA KOLAM KEDALAMAN RENCANA = 11.0000
m
SLOPE =
1:3.0- 1:6.0
KEDALAMAN EKSISTING = 9 DRAFT/SARAT KAPAL MAX= 10
= 255000
LUAS KOL.A.M
1-.DDITIONAL DATA HARGA BBM/L T
KAPAL KERUK NAMA KAPAL
= Rp 1000
LOA: 41.4m HARGA PELUMAS/LT = Rp 15000 GAJI KRU
= Rp
: MUSI30 B: 13.4m
T: 2.9 m
DREDGING DEPTH: 17.6 m HARGA BELl
6000000
= Rp2500000000G
DAYA POMPA= 3600
hp
PRODUKTIVITAS= 200 JUMLAH KRU = 10
m3/jam ORANG
JENIS PENGERUKAN : CAPITAL DREDGING
HASIL PERHITUNGAN: I
~ i 'No. I ' 1
' 2
I
NILAI
Output Item
:I DIKERUK
UNIT m
: 2 I
I
! J
m
VOLUME KERUKAN
i
1481995.00
I
3
:I SEDIMENTASI
! 0.062413226651
4
1TIPE KAPAL YANG SESUAI
i CSD I
6,752.75
5
BIAYNM3
I
6
BIAYA TOTAL
i 10,007,534 ,875.16
I
i
m/tahun
Rp Rp
unit Main; interface uses Windows, SysUtils, Classes, Graphics, Forms, Controls, Menus, type TMainForm = class(TForm) MainMenul: TMainMenu; Filel: TMenuitem; FileNewitem: TMenuitem; FileOpenitem : TMenuitem; FileCloseitem: TMenuitem; Windowl: TMenuitem; Helpl: TMenuitem; Nl: TMenuitem; FileExititem: TMenuitem; WindowCascadeitem: TMenuitem; WindowTileitem : TMenuitem; WindowArrangeitem: TMenuitem ; HelpAboutitem: TMenuitem; OpenDialog : TOpenDialog; Editl: TMenuitem; Cutitem: TMenuitem; Copyitem: TMenuitem; Pasteitem: TMenuitem; WindowMinimizeitem: TMenuitem; StatusBar: TStatusBar; ActionListl: TActionList; EditCutl: TEditCut; EditCopyl: TEditCopy; EditPastel: TEditPaste; FileNewl: TAction; FileSavel: TAction; FileExitl: TAction;
procedure FileNewlExecute(Sender: TObject) ; procedure FileOpenlExecute(Sender: TObject); procedure HelpAboutlExecute(Sender : TObj ect); procedure FileExitlExecute(Sender: TObject); procedure FileCloselEXECUTE(Sender: TObject);
StdCtrls, Dialogs, Buttons, Messages, ExtCtrls, ComCtrls, Std.Actns, ActnList, ToolWin, ImgList;
FileOpenl: TAction; FileSaveAsl: TAction; WindowCascadel: TWindowCascade; WindowTileHorizontall: TWindowTileHorizontal; WindowArrangeAlll: TWindowArrange; WindowMinimizeAlll: TWindowMinimizeAll; HelpAboutl: TAction; FileClosel: TWindowClose; WindowTileVerticall: TWindowTileVertical; WindowTileitem2: TMenuitem; ToolBar2: TToolBar; ToolButtonl: TToolButton; ToolButton2: TToolButton; Too1Button3: TToolButton; Too1Button4: TToolButton; Too1Button5: TToolButton; Too1Button6: TToolButton; Too1Button9: TToolButton; Too1Button7: TToolButton; Too1Button8: TToolButton; ToolButtonlO: TToolButton; ToolButtonll: TToolButton; ImageListl: TimageList; SaveDialogl: TSaveDialog; APAl: TMenuitem; Simpanl: TMenuitem; procedure TObject);
APAlClick(Sender:
private { Private declarations procedure CreateMDIChild(const Name: string); public { Public declarations } end; var MainForrn: TMainForm; implementation
{$R *.DFM} uses ChildWinrev, About; procedure TMainForm.CreateMDIChild(const Name: string); var Child: TMDIChild; begin { create a new MDI child window } Child TMDIChild.Create(Application); Child.Caption Name; end; procedure TMainForm.FileNewlExecute(Sender : TObject); begin CreateMDIChild('ANALISA'); end ; procedure TMainForm.FileOpenlExecute(Sende r: TObject); begin if OpenDialog.Execute then
procedure TMainForm.FileExitlExecute(Sende r: TObject); begin IF (APPLICATION.MESSAGEBOX('KELUAR PROGRAM INI?', 'KELUAR',MB_YESNO OR MB_ICONQUESTION)=IDYES)THEN Close; end; procedure TMainForm.FileCLOSElExecute(Send er: TObject); begin CLOSE; end; procedure TMainForm.APAlClick(Sender : TObject); begin APPLICATION.HELPFILE:='MYHELPER. HLP'; APPLICATION . HELPJUMP(' '); end; end.
unit childwinrev; CreateMDIChild(OpenDialog.FileNa me); end; procedure TMainForm.HelpAboutlExecute(Send er: TObject); begin AboutBox.ShowModal; end; type TMDIChild = class(TForm ) PG : TPageControl; TabSheetl: TTabSheet; TabSheet2: TTabSheet; TabSheet3: TTabSheet; Panell: TPanel; BitBtnl: TBitBtn; BitBtn4: TBitBtn; BitBtn5: TBitBtn; SGTEK: TStringGrid; TabSheet4: TTabSheet; Label6: TLabel; CMAT: TComboBox; CAIR: TComboBox; CBUANG: TComboBox;
interface uses Windows , Classes, Graphics, Forms, Controls, StdCtrls, Buttons, ExtCtrls, ComCtrls, Grids,MATH,SYSUTILS,DIALOGS, DBGrids, Db, DBTables,QUICKRPT;
CVOLUM: TComboBox; CTRAF: TComboBox; BitBtn2: TBitBtn; BitBtn3 : TBitBtn; LabelS: TLabel; LabellO: TLabel; SGCAP: TStringGrid; BitBtn7: TBitBtn; CMA : TComboBox; CAI: TComboBox; CBUAK : TComboBox; CISI: TComboBox; CLALU: TCornboBox; BitBtn6: TBitBtn; TabSheet5: TTabSheet; DSCSD: TDataSource;
TABELCSD: TTable; DSTSHD: TDataSource; TSHD : TTable; DBCSD: TDBGrid; Label37: TLabel; Label38 : TLabel; DBTSHD: TDBGrid; Label39: TLabel; GroupBox3: TGroupBox; Labell: TLabel; Editl: TEdit; Label2: TLabel; Edit2: TEdit; Label3: TLabel; Edit4: TEdit; Label4: TLabel; Edit6: TEdi t; Label40 : TLabel ; Label41: TLabel; Label42: TLabel; Label43: TLabel; BitBtnl3 : TBitBtn; BitBtnl2: TBitBtn; GroupBox4: TGroupBox; SELOP: TComboBox; Label44: TLabel; EditS: TEdit; Label45: TLabel; Label46: TLabel; Edit21: TEdit; Label47: TLabel; Label48: TLabel; Label49: TLabel; Label50: TLabel; Label51: TLabel; Label52: TLabel; Labelll: TLabel; Label53: TLabel; Label54: TLabel; Label55: TLabel; Edit22: TEdit; DSGRAB: TDataSource; TabGRAB: TTable; DBGRAB: TDBGrid; GRAB: TLabel; DSBUKET: TDataSource; TabBUCKET: TTable; DBGridl: TDBGrid; Label58: TLabel; dsvolker: TDataSource; volker: TTable; DBVOLKER: TDBGrid; SED: TTable; DSSED: TDataSource; DBSED: TDBGrid; Label60: TLabel;
DateTimePicker2: TDateTimePicker; CATATAN: TMemo; TabSheet6: TTabSheet; GroupBox6 : TGroupBox ; GroupBox7: TGroupBox; Label7: TLabel; LabelS: TLabel; Label9: TLabel; Label59: TLabel ; Label61: TLabel; Label62 : TLabel ; Label63: TLabel; Label64: TLabel ; Label65 : TLabel; Label66: TLabel; Label67: TLabel; Label68: TLabel; Label69: TLabel; CBTIPE: TComboBox; Edit25 : TEdit; PMP: TEdit; Edit27 : TEd it; BELI: TEdit; Edit7: TEdit; PROD: TEdit; KPL: TEdit; LOA : TEdit; B: TEdit; T : TEdit; DEPTH: TEdit; Edit24: TEdit; GroupBoxB: TGroupBox; Label70: TLabel; Label71 : TLabel; Label72: TLabel; Label73 : TLabel; Label74 : TLabel; Label75: TLabel; Label76: TLabel; Label77: TLabel; Label78: TLabel; Label79: TLabel; Label80: TLabel; Label81: TLabel; Edit 9: TEd it; EditlO : TEdit; Editl2 : TEdit; Edi tl3: TEdit; Editl4: TEdit; Editll: TEdit; Editl7: TEd it; Editl8: TEdit; Edit19: TEdit; Edit2 0: TEdi t; BitBtnlO: TBitBtn; Edi tl5 : TEd it;
Edit 16: TEd it; BitBtnll : TBitBtn; BitBtnl4 : TBitBtn; Label82: TLabel; BAYAR : TEdit; Label83 : TLabel; Edit 2 3 : TEd it; Labell6: TLabel; Labell7: TLabel; GroupBoxl : TGroupBox; Rl : TRadioButton; R2: TRadioButton; R3: TRadioButton; procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure BitBtnlClick(Sender: TObject); procedure BitBtn4Click(Sender : TObject); procedure BitBtn5Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure CAIRChange(Sender: TObject); procedure CBUANGChange(Sender: TObject); procedure CVOLUMChange(Sender : TObject); procedure CTRAFChange(Sender: TObject); procedure BitBtn2Click(Sender: TObject); procedu re CMAChange(Sender: TObject); procedure CAIChange(Sender : TObject) ; procedure CBUAKChange(Sender : TObject); procedure CISIChange(Sender: TObject) ; procedure CLALUChange(Sender : TObject); procedure BitBtn7Click(Sender: TObject); procedure BitBtn3Click(Sender: TObject); procedure BitBtn6Click(Sender: TObject ) ; procedure CMATChange(Sender: TObject ) ; procedure BTOKClick(Sender: TObject ) ; procedure BitBtn20Click(Sender: TObject);
Edit3: TEdit; GroupBox2: TGroupBox; Label14: TLabel; EditS: TEdi t; Labell3: TLabel; Labell2: TLabel; cbalat: TComboBox; M2: TMemo; Panel2: TPanel; Image2: Timage; Imagel: Timage;
procedure BitBtn9Click(Sender: TObject); procedure BitBtnl3Click(Sender: TObject); procedure BitBtnl2Click(Sender: TObject); procedure SELOPChange(Sender: TObject); procedure CBTIPEChange(Sender: TObject); procedure DBVOLKERKeyPress(Sender: TObject ; var Key: Char); procedure DBSEDKeyPress(Sender: TObject; var Key: Char); procedure cbalatChange(Sender: TObject); procedure RlClick(Sender: TObj ect); procedure R2Click(Sender: TObject); procedure R3Click(Sender : TObject); private { Private declarations } public { Public declarations } ST,LT ,CSD,CS,GH,GP,HOE ,KET,DIP,B AR,STAN,LET,CD,CL,HOP,PON,HO,KE, DI,BA:STRING; BBM , OLI ,PIPA,KPS, DIAM,KUAT ,HARGA ,SISA,FAKTOR,AKHIR,TOTALAN:DOUBL E; EKS,Ph~:single;
THN,KRU:INTEGER; TJUMLAH:SINGLE;
Tjuml:double ; end ; implementation USES RPT; {$R
* .DFM}
procedure TMDIChild .FormCl ose(Sender : TObject ; var Action: TCloseAction); begin Action caFree; end; procedure TMDIChild .BitBtnlClic k(Sender: TObject) ; begin IF PG.ACTIVEPAGE=TABSHEET2 THEN PG.ACTIVEPAGE :=TABSHEET l ELSE IF PG.ACTIVEPAGE=TABSHEET3 THEN PG.ACTIVEPAGE :=TABSHEE T2 ELSE IF PG.ACTIVEPAGE=TABSHEET4 THEN PG .ACTIVEPAGE:=TABSHEET3 ELSE IF PG.ACTIVEPAGE=TABSHEET5 THEN PG.ACTIVEPAGE :=TABSHEET4 ELSE IF PG.ACTIVEPAGE=TABSHEET6 THEN PG.ACTIVEPAGE: =TABSHEET5 begin CATATAN.ENABLED :=FALSE; EDIT3.ENABLED:=FALSE; WITH SGTEK DO BEGIN CELLS [0 , 0] :='KONDISI'; CELLS [0,1] :='MATERIAL'; CELLS [0 , 2] :='PERAIRAN'; CELLS [0 ,3] :='PEMBUANGAN'; CELLS [0 ,4] :='VOLUME'; CELLS [0,5] :='TRAFIC'; cells [0,6] :='JUMLAH';
end ; procedure TMDIChild.BitBtn4Click(Sender: TObject); begin CLOSE; end ; procedure TMDIChild.BitBtn5Click(Sender: TObject) ; begin IF PG.ACTIVEPAGE=TABSHEET3 THEN PG.ACTIVEPAGE:=TABSHEET4 ELSE IF PG.ACTIVEPAGE=TABSHEET1 THEN PG.ACTIVEPAGE:=TABSHEET2 ELSE IF PG.ACTIVEPAGE=TABSHEET2 THEN PG.ACTIVEPAGE:=TABSHEET3 ELSE IF PG.ACTIVEPAGE=TABSHEET4 THEN PG.ACTIVEPAGE:=TABSHEET5 ELSE IF PG.ACTIVEPAGE=TABSHEET5 THEN PG.ACTIVEPAGE:=TABSHEET6 end; procedure TMDIChild.FormCreate(Sender: TObject) ;
CELLS [ 1 , 0 ) : = ' STANDART TRAILLER '; CELLS [2,0) :='LIGHT TRAILLER'; CELLS [3,0):=' CSD'; CELLS [4,0) :=' CLAMPSHELL'; CELLS [5,0] :=' GRAB HOPPER'; CELLS [6,0] :=' GRAB PONTOON'; CELLS [7,0] :='BACKHOE'; CELLS [8,0) :='BUCKET'; CELLS [9,0) :='DIPPER'; CELLS [10,0) :='BARGE'; BEGIN
WITH SGCAP DO CELLS [0,0] :='KONDISI '; CELLS [0 ,1] :='MATERIAL'; CELLS [0,2] :='PERAIRAN'; CELLS [0 ,3] :='PEMBUANGAN '; CELLS [0 , 4] :='VOLUME '; CELLS [0 ,5 ] :='TRAFIC'; cells [0, 6] :='JUMLAH'; CELLS [1,0) :='STANDART TRAILLER' ; CMAT.ENABLED:=FALSE; CAIR.ENA~LED:=FALSE;
CBUANG.ENABLED :=FALSE; CVOLUM .ENABLED:=FALSE;
CELLS CELLS CELLS CELLS CELLS CELLS CELLS CELLS CELLS
[2,0) :='LIGHT TRAILLER'; [3,0) :=' CSD'; [4,0] :=' CLAMPSHELL'; [5,0) :=' GRAB HOPPER'; [6,0) :=' GRAB PONTOON'; [7,0) :='BACKHOE'; [8,0) :='BUCKET'; [9 , 0) :='DIPPER'; [10,0) :='BARGE';
CTRAF.ENABLED:=FALSE; CMA.ENABLED :=FALSE; CAI.ENABLED:=FALSE; CBUAK.ENABLED:=FALSE;
CISI.ENABLED:=FALSE; CLALU .ENABLED:=FALSE; BITBTN2 .ENABLED:=FALSE ; BITBTN3.ENABLED :=FALSE; BITBTN6.ENABLED:=FALSE; BITBTN7.ENABLED:=FALSE; SGTEK.ENABLED :=FALSE; SGCAP.ENABLED:=FALSE; EDIT4 . ENABLED:=FALSE; EDIT4.COLOR:=CliNFOBK; EDIT6.ENABLED:=FALSE; EDIT6.COLOR:=CliNFOBK; EDIT7 .ENABLED:=FALSE; EDIT7 . COLOR:=CliNFOBK; EDIT8.ENABLED:=FALSE; EDIT8 .COLOR:=CliNFOBK; EDIT9.ENABLED:=FALSE; EDIT9.COLOR:=CliNFOBK; EDITlO.ENABLED:=FALSE; EDITlO . COLOR :=CliNFOBK; EDITll.ENABLED:=FALSE; EDITll.COLOR:=CliNFOBK;
EDIT12.ENABLED: =FALSE; EDIT12.COLOR:=CliNFOBK; EDIT14.ENABLED:=FALSE; EDIT14.COLOR:=CliNFOBK; EDIT17.ENABLED:=FALSE; EDIT17.COLOR :=CliNFOBK; EDIT18.ENABLED:=FALSE; EDIT18.COLOR:=CliNFOBK; EDIT19.ENABLED:=FALSE; EDIT19.COLOR :=CliNFOBK ; EDIT20.ENABLED:=FALSE; EDIT20.COLOR: =CliNFOBK; EDIT21.ENABLED:=TRUE; TJUMLAH:=O; EDIT22.ENABLED:=TRUE; TJUML:=O; EDIT22 .TEXT:=FORMAT ( ' %10.12F', [T JUML)); bayar .ENABLED:=FALSE; bayar.COLOR: =CliNFOBK; EDIT23 .ENABLED:=FALSE; EDIT23 .COLOR: =CliNFOBK;
SELOP.Items .AP PEND('STIFF CLAY ' ) ; SELOP.Items.APPEND( 'FI RM CLAY'); SELOP.Items.APPEND('SANDY CLAY ' ) ;
SELOP .Items.APPEND ( 'MEDIUM SAND'); SELOP.Items.APPEND('COARSE SAND'); SELOP .Items.APPEND ('FINE SAND' ) ; SELOP.Items .APPEND('MUD' ); CBTIPE.ITEMS.APPEND('GRAB') ; CBTIPE .ITEMS.APPEND('BUCKET' );
CBTIPE.ITEMS.APPEND('CSD'); CBTIPE . ITEMS . APPEND('TSHD'); cbalat .items.append('TSHD'); cbalat.iterns.append('CSD'); cbalat.iterns.append('BACKHOE'); cbalat.iterns .append('GRAB'); cbalat .i terns.append('BUCKET'); cbalat .items.append('DIPPER' ) ; end; CMAT . Iterns .APPEND('LOOSE SILT ' ) ; CMAT.Iterns .APPEND ( 'COHESIVE SILT ' ) ; CMAT.Iterns.APPEND('FINE SAND'); CMAT . Iterns . APPEND('MEDIUM SAND ' ); CMAT . It erns.APPEND('COARSE SAND'); CAIR.Iterns.APPEND('PERAIRAN TERTUTUP ' ) ; CAIR . Iterns .APPEND('PERAIRAN TERLINDUNG ' ) ; CAIR.Iterns.APPEND('PERAIRAN TERBUKA ' ) ;
CBUANG .Iterns.APPEND( 'BUANG PANTAI ' ) ; CBUANG.Iterns .APPEND('BUANG TIDE'); CBUANG .Items.APPEND('BUANG LAUT '); CBUAK .Iterns. APPEND('BUANG PANTAI'); CBUAK .I terns .APPEND ( 'BUANG TIDE') ; CBUAK.Iterns.APPEND('BUANG LAUT ' ) ; CVOLUM.Items.APPEND( ' VOLUME <100 .00 0 rn3'); CVOLUM.Items.APPEND('VOLUME <2 50.000 m3'); CVOLUM.Items.APPEND( ' VOLUME <500.000 rn3' ) ; CVOLUM.Items .APPEND ( ' VOLUME >500 .000 rn3 ' ) ; CISI.Items .APPEND ( 'VOLUME <100.000 rn3');
DI DI DI DI DI DI
SGTEK.CELLS[8,2] :=KET; SGTEK.CELLS[9,2] :=DIP; SGTEK.CELLS[l0,2] :=BAR; IF CAIR.TEXT='PERAIRAN THEN ST:='3'; LT:='2'; CSD:='l'; CS :='l'; GH:='l '; GP:= 1 0'; HOE:= 1 1'; KET:= l'; DIP :=' 0 1 ; BAR:='O';
END; TERBUKA'
SGTEK.CELLS[2,2] :=LT; SGTEK.CELLS[3,2) :=CSD; SGTEK.CELLS[4,2] :=CS; SGTEK.CELLS[5,2) :=GH; SGTEK.CELLS[6,2] :=GP; SGTEK.CELLS[7,2) :=HOE; SGTEK.CELLS[8,2] :=KET; SGTEK.CELLS[9,2] :=DIP; SGTEK.CELLS[l0,2] :=BAR; END; END;
1
SGTEK.CELLS[l,2) :=ST; procedure TMDIChild.CBUANGChange(Sender: TObject); ST:= 2'; LT:='2'; CSD:= 1 3'; CS:= 1 3'; GH:='0 1 ; GP:= 1 2'; HOE:='2 KET:='2'; DIP:= 1 0 1 ; BAR:='3 1
1
1
;
IF CBUANG.TEXT='BUANG THEN ST:='3'; LT:='3'; CSD:= 3'; CS:= 1 0'; GH:= 0'; GP:= 1 0'; HOE:= 0' ; KET:= 1 0'; DIP:= 1 0 1 ; BAR:= 0';
END; DI
TIDE'
1
1
1
SGTEK.CELLS[l,3) :=ST; IF CBUANG.TEXT= BUANG THEN BEGIN ST:= 1 3 1 ; LT:= 3'; CSD:= 1 0 1 ; CS := 0 GH:= 3 GP: = 3 1
1
1
1
1
1
BEGIN SGTEK.CELLS[2,3) :=LT; SGTEK.CELLS[3,3] :=CSD; SGTEK.CELLS[4,3) :=CS; SGTEK.CELLS[5,3) :=GH; SGTEK.CELLS[6,3] :=GP; SGTEK.CELLS[7,3] :=HOE; SGTEK.CELLS[8,3] :=KET; SGTEK.CELLS[9,3) :=DIP; SGTEK.CELLS[l0,3) :=BAR;
1
1
begin IF Cbuang.TEXT=' BUANG DI PANTAI' THEN BEGIN SGTEK.CELLS[2,3] :=LT; SGTEK.CELLS[3,3] :=CSD; SGTEK.CELLS[4,3) :=CS; SGTEK.CELLS[5,3) :=GH; SGTEK.CELLS[6,3] :=GP; SGTEK.CELLS[7,3] :=HOE; SGTEK.CELLS[8,3] :=KET; SGTEK.CELLS[9,3) :=DIP; SGTEK.CELLS[l0,3] :=BAR;
;
SGTEK.CELLS[l,3) :=ST;
1
BEGIN
END; DI
LAUT' HOE:= 1 3 1 ; KET: = 1 3 1 ; DIP := 1 0 1 ; BAR:= 0 1
1
;
; ;
;
SGTEK.CELLS[l,3) :=ST; SGTEK.CELLS[2,3] :=LT;
CISI.Items.APPEND('VOLUME <250 . 000 m3'); CISI.Items.APPEND('VOLUME <500.000 m3'); CISI.Items.APPEND('VOLUME >500.000 m3'); CTRF.F.Items.APPEND('TRAFIK PADAT'); CTRAF.Items.APPEND('TRAFIK JARANG');
CMA.Items.APPEND('LOOSE SILT'); CMA.Items.APPEND('COHESIVE SILT'); WITH SGCAP DO BEGIN CELLS [0,0] :='KONDISI'; CELLS [0,1] :='MATERIAL'; CELLS [0,2] :='PERAIRAN'; CELLS [0,3] :='PEMBUANGAN'; CELLS [ 0, 4] : ='VOLUME ' ; CELLS [0,5] :='TRAFIC'; cells [0, 6] :=' JUMLAH'; CELLS [1, OJ:=' STANDART TRAILLER '; CELLS [2,0] :='LIGHT TRAILLER'; CELLS [3,0] :=' CSD'; CELLS [4,0] :=' CLAMPSHELL'; CELLS [5,0] :=' GRAB HOPPER'; CELLS [6,0] :=' GRAB PONTOON'; CELLS [7 , 0] :='BACKHOE'; IF CAIR.text='PERAIRAN TERTUTUP' THEN BEGIN ST:='1'; LT:='2'; CSD:='3'; CS:='3'; GH:='3'; GP:='2'; HOE:='2'; KET:='2'; DIP:='O '; BAR:='3'; IF CAIR.TEXT='PERAIRAN TERLINDUNG' THEN ST:='3'; LT :='3'; CSD:='3'; cs: =' 3'; GH:='3'; GP: =' 3'; HOE:=' 3 I; KET:='3'; DIP:= 'O';
CMA.Items.APPEND('FINE SAND'); CMA.Items.APPEND('MEDIUM SAND'); CMA.Items.APPEND('COARSE SAND'); CMA.Items.APPEND('GRAVEL'); CMA.Items.APPEND('SOFT CLAY'); CMA.Items.APPEND('MEDIUM CLAY'); CMA.Items.APPEND('BOULDERS'); CMA.Items.APPEND('ROCK'); CLALU.Items.APPEND('TRAFIK PADAT'); CLALU.Items.APPEND('TRAFIK JARANG');
CELLS [8,0] :='BUCKET'; CELLS [9,0] :='DIPPER'; CELLS [8,0] :='BARGE'; END; CAI.Items.APPEND('PERAIRAN TERTUTUP'); CAI.Items.APPEND('PERAIRAN TERLINDUNG'); CAI.Items.APPEND('PERAIRAN TERBUKA'); END; END; procedure TMDIChild.CAIRChange(Sender: TObject); begin
SGTEK.CELLS[l,2] :=ST; SGTEK.CELLS[2,2] :=LT; SGTEK.CELLS[3,2] :=CSD; SGTEK.CELLS[4,2] :=CS; SGTEK.CELLS[5,2] :=GH; SGTEK.CELLS[6,2) :=GP; SGTEK.CELLS[7,2] :=HOE; SGTEK.CELLS[8,2] :=KET; SGTEK.CELLS[9,2] :=DIP; SGTEK.CELLS[l0,2) :=BAR; END; BEGIN BAR:='2'; SGTEK.CELLS[1,2] SGTEK.CELLS[2,2) SGTEK.CELLS[3,2] SGTEK.CELLS[4,2) SGTEK.CELLS[5,2) SGTEK.CELLS[6,2) SGTEK.CELLS[7,2]
:=ST; :=LT; :=CSD; :=CS; :=GH; :=GP; :=HOE;
SGTEK.CELLS[3,3] SGTEK.CELLS[4,3] SGTEK.CELLS[5,3] SGTEK.CELLS[6,3] SGTEK.CELLS[7,3]
:=CSD; :=CS; :=GH; :=GP; :=HOE;
procedure TMDIChild.CVOLUMChange(Sender: TObj ect); IF CVOLUM.TEXT='VOLUME <100 .000 m3' THEN BEGIN ST:='2'; LT:='3'; CSD:='3'; CS:='3'; GH :='3'; GP:='3'; HOE:='2'; KET:='3'; DIP:='O'; BAR:='3'; IF CVOLUM.TEXT='VOLUME <250.000 m3' THEN ST:='3'; LT:='2'; CSD:='3'; CS:='3'; GH:='3'; GP:='2'; HOE:=' 3'; KET:='2'; DIP :='O'; BAR:=' 3'; IF CVOLUM.TEXT='VOLUME m3' THEN ST:='3'; LT:='2'; CSD :='3'; cs: =' 3'; GH :='3'; GP:='2'; HOE:=' 3'; KET:='2'; DIP:='O'; BAR:='3';
<500.000
IF CVOLUM.TEXT='VOLUME m3' THEN BEGIN ST:='3'; LT:= ' 2 '; CS D:=' 3 '; CS:='3'; GH:='l'; GP:='l';
>500.000
SGTEK.CELLS[8,3] :=KET; SGTEK.CELLS[9,3] :=DIP; SGTEK.CELLS[l0,3] :=BAR; END; END; begin
SGTEK.CELLS[l,4] :=ST; SGTEK.CELLS[2,4] :=LT; SGTEK.CELLS[3,4] :=CSD; SGTEK.CELLS[4,4] :=CS; SGTEK.CELLS[5,4] :=GH; SGTEK.CELLS[6,4] :=GP; SGTEK.CELLS[7,4] :=HOE; SGTEK.CELLS[8,4] :=KET; SGTEK.CELLS[9,4] :=DIP; SGTEK.CELLS[l0,4] :=BAR; END; BEGIN SGTEK.CELLS[l,4) :=ST; SGTEK.CELLS[2,4) :=LT; SGTEK.CELLS[3,4] :=CSD; SGTEK.CELLS[4,4) :=CS; SGTEK.CELLS[5,4] :=GH; SGTEK.CELLS[6,4] :=GP; SGTEK.CELLS[7,4] :=HOE; SGTEK.CELLS[8,4] :=KET; SGTEK.CELLS[9,4] :=DIP; SGTEK.CELLS[l0,4] :=BAR; END; BEGIN SGTEK.CELLS[l,4) :=ST; SGTEK.CELLS[2,4] :=LT; SGTEK.CELLS[3,4] :=CSD; SGTEK.CELLS[4,4) :=CS; SGTEK.CELLS[5,4) :=GH; SGTEK.CELLS[6,4] :=GP; SGTEK.CELLS[7,4] :=HOE; SGTEK.CELLS[8,4) :=KET; SGTEK.CELLS[9,4] :=DIP; SGTEK.CELLS[l0,4] :=BAR; END; HOE:='3'; KET:=' 1'; DIP :='O'; BAR:='3'; SGTEK.CELLS[l,4) :=ST; SGTEK.CELLS[2,4) :=LT;
SGTEK.CELLS[3,4) :=CSD; SGTEK.CELLS[4,4) :=CS; SGTEK.CELLS[5,4] :=GH; SGTEK.CELLS[6,4] :=GP; SGTEK.CELLS[7,4] :=HOE; SGTEK.CELLS[8,4] :=KET; p r ocedure TMDI Child.CTRAFChange (Sender: TObj ect ) ; IF CTRAF.TEXT='TRAFIK PADAT' THEN BEGI N ST:='3'; LT: = '3'; CSD : = '1'; CS : = '1'; GH :='2'; GP:='2'; HOE:=' 1'; KET: = '3'; DIP :=' O'; BAR :='2'; IF CTRAF.TEXT='TRAFIK THEN ST:='3'; LT:='2'; CSD:='3'; CS:='3'; GH :='2'; GP :='2'; HOE :=' 2 '; KE T:=' 1'; DI P :=' O'; BAR:='2';
begin
SGTEK.CELLS[1,5] :=ST; SGTEK.CELLS[2,5] :=LT; SGTEK.CELLS[3,5] :=CSD; SGTEK.CELLS[4,5] :=CS; SGTEK.CELLS[5,5] :=GH; SGTEK.CELLS[6,5] :=GP; SGTEK.CELLS[7,5] :=HOE; SGTEK.CELLS[8,5] :=KET; SGTEK.CELLS[9,5] :=DIP; SGTEK.CELLS[l0,5] :=BAR; END; BEGIN
JARANG'
SGTEK.CELLS[1,5] :=ST; p r oc edure TMDIChild.CMATChange (Sender: TObj ect ) ; I F CMAT.TEXT='LOOSE SILT' THEN BEGIN ST :=' 3 '; LT :=' 3 '; CSD:='3'; CS : = '3'; GH : =' 2 '; GP:='2'; HOE:=' 2 '; KET :=' 2 '; DIP :=' O'; BA.R. :=' 3 '; IF CMAT.TEXT='COHESI VE THEN ST: = ' 3 '; LT: = ' 2 ';
SGTEK.CELLS[9,4] :=DIP; SGTEK.CELLS[l0,4] :=BAR; END; END;
SILT'
SGTEK.CELLS[2,5] :=LT; SGTEK.CELLS[3,5] :=CSD; SGTEK.CELLS[4,5] :=CS; SGTEK.CELLS[5,5] :=GH; SGTEK.CELLS[6,5] :=GP; SGTEK.CELLS[7,5] :=HOE; SGTEK.CELLS[8,5] :=KET; SGTEK.CELLS[9,5] :=DIP; SGTEK.CELLS[10,5] :=BAR; END; end; begin SGTEK.CELLS[1,1] :=ST; SGTEK.CELLS[2,1] :=LT; SGTEK.CELLS[3,1] :=CSD; SGTEK.CELLS[4,1] :=CS; SGTEK.CELLS[5,1] :=GH; SGTEK.CELLS[6,1] :=GP; SGTEK.CELLS[7,1] :=HOE; SGTEK.CELLS[8,1] :=KET; SGTEK.CELLS[9,1] :=DIP; SGTEK.CELLS[10,1] :=BAR; END; BEGIN CSD:='3';
cs: =' 3';
GH:='3'; GP:='3'; HOE:='2'; KET:='3'; DIP:='O'; BAR:='3'; SGTEK.CELLS[l,l) :=ST; SGTEK.CELLS[2,1) :=LT; IF CMAT.TEXT='FINE SAND' THEN ST:='3'; LT:='3'; CSD:='3'; CS:='3'; GH:='2'; GP:='2'; HOE:=' 2'; KET:='2'; DIP:='O'; BAR:='3'; IF CMAT.TEXT='MEDIUM SAND' THEN ST:='3'; LT:='3'; CSD:='3'; CS:='3'; GH:='2'; GP:='2'; HOE:='3'; KET:='2'; DIP:='O'; BAR:='3'; IF CMAT.TEXT='COARSE SAND' THEN ST:='3'; LT:='2'; CSD:='3'; CS:='3'; GH:='2'; GP:='2'; HOE:='3'; KET:='2'; DIP:='O'; BAR:='3'; SGTEK.CELLS[l,l) :=ST; procedure TMDIChild.BitBtn2Click(Sender: TObject); VAR a,b,c,d,e,TOT:integer; f,g,h,i,j,tet:integer; k,l,m,n,o,tut:integer; p,q,r,s,t,tat:integer; u,v,w,x,y,tit:integer; a:=strtoint(cells[l,l));
SGTEK.CELLS[3,1] :=CSD; SGTEK.CELLS[4,1] :=CS; SGTEK.CELLS[5,1] :=GH; SGTEK.CELLS[6,1] :=GP; SGTEK.CELLS[7,1] :=HOE; SGTEK.CELLS[B,l] :=KET; SGTEK.CELLS[9,1) :=DIP; SGTEK.CELLS[lO,l] :=BAR; END; BEGIN SGTEK.CELLS[l,l) :=ST; SGTEK.CELLS[2,1) :=LT; SGTEK.CELLS[3,1) :=CSD; SGTEK.CELLS[4,1) :=CS; SGTEK.CELLS[5,1) :=GH; SGTEK.CELLS[6,1] :=GP; SGTEK.CELLS[7,1) :=HOE; SGTEK.CELLS[B,l) :=KET; SGTEK.CELLS[9,1] :=DIP; SGTEK.CELLS[lO,l] :=BAR; END; BEGIN SGTEK.CELLS[l,l) :=ST; SGTEK.CELLS[2,1) :=LT; SGTEK.CELLS[3,1] :=CSD; SGTEK.CELLS[4,1) :=CS; SGTEK.CELLS[5,1) :=GH; SGTEK.CELLS[6,1] :=GP; SGTEK.CELLS[7,1] :=HOE; SGTEK.CELLS[B,l] :=KET; SGTEK.CELLS[9,1] :=DIP; SGTEK.CELLS[lO,l] :=BAR; END; BEGIN SGTEK.CELLS[2,1) :=LT; SGTEK.CELLS[3,1] :=CSD; SGTEK.CELLS[4,1] :=CS; SGTEK.CELLS[5,1] :=GH; SGTEK.CELLS[6,1] :=GP; SGTEK.CELLS[7,1] :=HOE; SGTEK.CELLS[B,l] :=KET; SGTEK.CELLS[9,1] :=DIP; SGTEK.CELLS[lO,l] :=BAR; END; end; z,ab,ac,ad,ae,tst:integer; ze,ai,au,aa,ao,sts:integer; zo,aba,aca,ada,aea,ses:integer; zoe,abah,acah,adah,aeah,sesi:int eger; zoei,abahi,acahi,adahi,aeahi,set an: integer; begin with sgtek do begin b:=strtoint(cells[l,2]);
c:=strtoint(cells[1,3)); d:=strtoint(cells[l,4]); e:=strtoint(cells[1,5)); f:=strtoint(cells[2,l)); g:=strtoint(cells[2,2)); h:=strtoint(cells[2,3)); i:=strtoint(cells[2,4)); j:=strtoint(cells[2 ,5) ); k:=strtoint(cells[3,l]); l:=strtoint(cells[3,2]); m:=strtoint(cells[3,3)); n:=strtoint(cells[3,4]); o:=strtoint(cells[3 ,5) ); p:=strtoint(cells[4,1)); q:=strtoint(cells[4 ,2) ); r:=strtoint(cells[4,3]); s:=strtoint(cells[4,4)); t:=strtoint(cells[4,5)); u:=strtoint(cells[5 ,1) ); v:=strtoint(cells[5 ,2) ); w:=strtoint(cells[5 , 3)); x:=strtoint(cells[5 ,4) ); y:=strtoint(cells[5,5)); z:=strtoint(cells[6,1]); ab:=strtoint(cells[6,2]); ac:=strtoint(cells[6,3]); ad:=strtoint(cells[6,4]); ae:=strtoint(cells[6,5]); ze:=strtoint(cells[7,1]); ai:=strtoint(cells[7,2)); cells[1,6) :=inttostr (tot); cells[10,6]:=inttostr cells [2 , 6] :=inttostr cells[3,6] :=inttostr cells[4,6] :=inttostr
(setan); (tet); (tut); (tat);
cells[5,6) :=inttostr (tit); cells[6,6] :=inttostr (tst); cells[7,6] :=inttostr (sts); cells[8,6) :=inttostr (ses); STAN:= '3'; LET:='3'; CD:='3'; CL:='3'; HOP:='2'; PON : =I 2 I; H0:='2'; KE :=' 2'; DI: =I 1 I; BA:='3 ';
au:=strtoint(cells[7,3]); aa:=strtoint(cells[7,4]); ao:=strtoint(cells[7,5]); zo:=strtoint(cells[8,1]); aba:=strtoint(cells[8,2)); aca:=strtoint(cells[8,3]); ada:=strtoint(cells[8,4)); aea:=strtoint(cells[8,5)); zoe:=strtoint(cells[9,1)); abah:=strtoint(cells[9,2]); acah:=strtoint(cells[9,3]); adah:=strtoint(cells[9,4]); aeah :=strtoint(cells[9,5)); zoei:=strtoint(cells[lO,l]); abahi:=strtoint(cells[10,2)); acahi:=strtoint(cells[10,3)); adahi:=strtoint(cells[10,4]); aeahi:=strtoint(cells[10,5]); TOT:=(a+b+c+d+e); tat:=p+q+r+s+t; tit :=u+v+w+x+y; tet :=f+g+h+i+j; tut:=k+l+m+n+o; tst:=z+ab+ac+ad+ae; sts:=ze+ai+aa+au+ao; ses:=zo+aba+aca+ada+aea; sesi:=zoe+abah+acah+adah+aeah; setan:=zoei+abahi+acahi+adahi+ae ahi; cells[9,6) :=inttostr (sesi); CATATAN.text:='PILIHLAH PERALATAN KERUK DENGAN SKOR BESAR ! I; END; END; procedure TMDIChild.CMAChange(Sender: TObject) ; begin IF CMA.TEXT='LOOSE SILT' THEN BEGIN SGCAP.CELLS[2,1) :=LET; SGCAP.CELLS[3,1) :=CD; SGCAP.CELLS[4,1) :=CL; SGCAP.CELLS[S,l] :=HOP; SGCAP.CELLS[6,1] :=PON; SGCAP.CELLS[7,1] :=HO; SGCAP . CELLS[8,1] :=KE; SGCAP.CELLS[9,1] :=DI; SGCAP.CELLS[lO,l] :=BA; END;
SGCAP.CELLS[l,l) :=STAN; BEGIN IF CMA.TEXT='COHESIVE SILT' THEN STAN:='3';
LET:='3';
CD:='3'; CL : ='3'; HOP:='3 '; PON:='3'; H0:='2'; KE:= 'l'; DI: =' 1' ; BA: =' 3'; SGCAP.CELLS[l,l] :=STAN; IF CMA . TEXT= ' FINE SAND' THEN STAN:='3'; LET:='3'; CD:='3'; CL:='3'; HOP:='2'; PON:='2'; H0:='2'; KE:='2'; DI:='l'; BA:='3'; IF CMA.TEXT='MEDIUM STAN:='3'; LET:='3 '; CD:='3'; CL:='3 '; HOP:='2'; PON:='2'; H0:='3'; KE:='2'; DI: =' 2'; BA:='3';
SP~D'
THEN
IF CMA .TEXT= ' COARSE SAND' THEN STAN:='3'; LET:='3'; CD:='3'; CL:='3'; HOP:='3'; PON:='3'; H0:='2 '; KE:='2 '; DI:='3'; BA:='3'; IF CMA . TEXT= 'GRAVEL' THEN STAN:='3'; LET:='2'; CD:='3'; CL:='3'; HOP:='3'; PON:='3'; HO: =' 3'; KE:='3'; DI :=' 3'; BA:=' 3';
SGCAP .CELLS[2,1) :=LET; SGCAP .CELLS[3,1] :=CD; SGCAP.CELLS[4 ,1) :=CL; SGCAP.CELLS[5,1) :=HOP; SGCAP .CELLS[6,1] :=PON; SGCAP .CELLS[7,1) :=HO; SGCAP .CELLS[ B,l) :=KE; SGCAP .CELLS[9,1) :=DI; SGCAP .CELLS[lO,l ] :=BA; END; BEGIN SGCAP .CELLS[l,l) :=STAN; SGCAP . CELLS[2 ,1) :=LET; SGCAP .CELLS[3,1) :=CD; SGCAP .CELLS[4,1) :=CL; SGCAP.CELLS[5 ,1) :=HOP; SGCAP . CELLS[6 ,1] :=PON; SGCAP .CELLS[7,1) :=HO; SGCAP.CELLS[B ,l) :=KE; SGCAP .CELLS[9,1 ) :=DI; SGCAP . CELLS[lO,l] :=BA; END; BEGIN SGCAP .CELLS[l,l ) :=STAN; SGCAP.CELLS[2 ,1] :=LET; SGCAP .CELLS[3,1) :=CD; SGCAP .CELLS[4,1] :=CL; SGCAP.CELLS[5,1) :=HOP; SGCAP.CELLS[6 ,1] :=PON; SGCAP .CELLS[7,1) :=HO; SGCAP .CELLS[8,1] :=KE; SGCAP .CELLS[9,1) :=DI; SGCAP .CELLS[10,1] :=BA; END ; BEGIN SGCAP .CELLS [ l,l) :=STAN; SGCAP .CELLS[2,1] :=LET; SGCAP .CELLS[3,1] :=CD; SGCAP . CELLS[4 ,1) :=CL; SGCAP . CELLS[5 ,1 ) :=HOP; SGCAP.CELLS[6,1] :=PON; SGCAP .CELLS [7 , 1] :=HO; SGCAP.CELLS[B,l) :=KE; SGCAP .CELLS[9, 1) :=DI; SGCAP.CELLS[lO,l] :=BA; END; BEGIN SGCAP .CELLS [l ,l ) :=STAN; SGCAP.CELLS[2 ,1 ] :=LET; SGCAP.CELLS[3,1) :=CD; SGCAP.CELLS[4,1] :=CL; SGCAP.CELLS[5,1) :=HOP; SGCAP.CELLS[6,1) :=PON; SGCAP . CELLS[7 ,1 ] :=HO; SGCAP.CELLS[B,l) :=KE; SGCAP .CELLS[9,1) :=DI;
SGCAP.CELLS[l O,l] :=BA; IF CMA.TEXT='SOFT CLAY' THEN STAN :='3'; LET:=' 2'; CD: = 'l'; CL:='3'; HOP:='3'; PON :='2'; H0 :='2'; KE :='3'; DI :=' 2 '; BA:='3'; I F CMA.TEXT='MEDIUM CLAY' THEN STAN :='2'; LET :='l'; CD :='l'; CL :=' 2 '; HOP :='2'; PON :=' 2 '; H0 :=' 3 '; KE :=' 3 '; DI : = ' 2 '; BA: = ' 2 '; IF CMA.TEXT='BOULDERS' THEN ST.l4.N : = ' 0 '; LET:=' O'; CD :='l'; CL:=' l '; HOP :='l'; PON :='2'; H0 :=' 3 '; KE :=' 2 '; DI :='3'; BA :=' O'; I F CYill.TEXT='ROCK' THEN STAN :=' O'; LET :=' 0 '; CD :=' 3 '; CL :='l'; HOP :=' O'; PON :=' O'; H0 :=' 3 '; KE:=' l '; DI: =' 3 ' ; BA : = ' O';
END; BEGIN SGCAP.CELLS[l,l] :=STAN; SGCAP.CELLS[2,1] :=LET; SGCAP.CELLS[3,1] :=CD; SGCAP.CELLS[4,1] :=CL; SGCAP.CELLS[S,l] :=HOP; SGCAP.CELLS[6,1] :=PON; SGCAP.CELLS[7,1] :=HO; SGCAP.CELLS[8,1] :=KE; SGCAP.CELLS[9,1] :=DI; SGCAP.CELLS[lO,l] :=BA; END; BEGIN SGCAP.CELLS[l,l] :=STAN; SGCAP.CELLS[2,1] :=LET; SGCAP.CELLS[3,1] :=CD; SGCAP.CELLS[4,1] :=CL; SGCAP.CELLS[S,l] :=HOP; SGCAP.CELLS[6,1] :=PON; SGCAP.CELLS[7,1] :=HO; SGCAP.CELLS[8,1] :=KE; SGCAP.CELLS[9,1] :=DI; SGCAP.CELLS[lO,l] :=BA; END; BEGIN SGCAP.CELLS[l,l] :=STAN; SGCAP.CELLS[2,1] :=LET; SGCAP.CELLS[3,1] :=CD; SGCAP.CELLS[4,1] :=CL; SGCAP.CELLS[S,l] :=HOP; SGCAP.CELLS[6,1] :=PON; SGCAP.CELLS[7,1] :=HO; SGCAP.CELLS[8,1] :=KE; SGCAP.CELLS[9,1] :=DI; SGCAP.CELLS[lO,l] :=BA; END; BEGIN SGCAP.CELLS[2,1] :=LET; SGCAP.CELLS[3,1] :=CD; SGCAP.CELLS[4,1] :=CL; SGCAP.CELLS[S,l] :=HOP; SGCAP.CELLS[6,1 ] :=PON; SGCAP.CELLS[7,1] :=HO; SGCAP.CELLS[8,1] :=KE; SGCAP.CELLS[9,1] :=DI; SGCAP.CELLS[lO,l] :=BA; END; END;
SGCAP .CELLS [l ,l ] :=STAN; p r o cedu re TMDICh i l d. CAI Ch ange (Sender: TObj e ct) ; STAN :=' O'; LE T:='l'; CD : = ' 3 ';
begin IF CAI.TEXT='PERAIRAN THEN BEGIN CL:='3'; HOP:='3'; PON: =' 3';
TERTUTUP'
H0:='3'; KE: =I 3 I; DI:='3'; BA:='3'; SGCAP.CELLS[l,2) :=STAN; SGCAP.CELLS[2,2) :=LET; SGCAP.CELLS[3,2] :=CD; IF CAI.TEXT='PERAIRAN TERLINDUNG' THEN STAN:='3'; LET:='3'; CD:='3'; CL:='2'; HOP:='2'; PON:='3'; H0:='3'; KE:='2'; DI:='2'; BA:='l'; IF CAI . TEXT= ' PERAI RAN THEN STAN:='3'; LET:='2'; CD:='l'; CL:='l'; HOP:='l'; PON:='l'; H0:='2'; KE:='l'; DI:='l'; BA: =I 0 I;
TERBUKA'
SGCAP.CELLS[4,2) :=CL; SGCAP.CELLS[5,2) :=HOP; SGCAP.CELLS[6,2) :=PON; SGCAP.CELLS[7,2] :=HO; SGCAP.CELLS[8,2) :=KE; SGCAP.CELLS[9,2] :=DI; SGCAP.CELLS[l0,2] :=BA; END; BEGIN SGCAP.CELLS[l,2) :=STAN; SGCAP.CELLS[2,2) :=LET; SGCAP.CELLS[3,2] :=CD; SGCAP.CELLS[4,2) :=CL; SGCAP.CELLS[5,2) :=HOP; SGCAP.CELLS[6,2) :=PON; SGCAP.CELLS[7,2] :=HO; SGCAP.CELLS[8,2) :=KE; SGCAP.CELLS[9,2] :=DI; SGCAP.CELLS[l0,2] :=BA; END; BEGIN SGCAP.CELLS[2,2) :=LET; SGCAP.CELLS[3,2] :=CD; SGCAP.CELLS[4,2) :=CL; SGCAP.CELLS[5,2) :=HOP; SGCAP.CELLS[6,2] :=PON; SGCAP.CELLS[7,2] :=HO; SGCAP.CELLS[8,2] :=KE; SGCAP.CELLS[9,2) :=DI; SGCAP.CELLS[l0,2] :=BA; END; END;
SGCAP.CELLS[l,2) :=STAN; procedure TMDIChild.CBUAKChange(Sender: TObject); IF CBUAK. TEXT=' BUANG DI LAUT' THEN BEGIN STAN:='3'; LET:='3'; CD:='l'; CL:='l'; HOP:=' 3'; PON:='3'; H0:='3'; KE:='3'; DI: = I 3 I ; BA:=' 0';
begin
SGCAP.CELLS[l,3) :=STAN; SGCAP.CELLS[2,3) :=LET; SGCAP.CELLS[3,3] :=CD; SGCAP.CELLS[4,3) :=CL; SGCAP.CELLS[5,3) :=HOP; SGCAP.CELLS[6,3) :=PON; SGCAP.CELLS[7,3] :=HO; SGCAP.CELLS[8,3) :=KE; SGCAP.CELLS[9,3) :=DI; SGCAP.CELLS[l0,3] :=BA; END; BEGIN
IF CBUAK. TEXT= I BUANG THEN STAN:='3'; LET:='2'; CD:='3';
DI
PANTAI
I
CL:='3'; HOP:= I 0 I ; PON:=' 0';
HO:='O'; KE:=' 0' ; DI :='O'; BA:='3 '; SGCAP.CELLS[1,3] : =STAN; SGCAP.CELLS[2,3] :=LET; SGCAP.CELLS[3,3] :=CD; IF CBUAK. TEXT=' BUANG DI THEN STAN :=' 3'; LET :='3'; CD :='2'; CL: =' 3'; HOP:='O' ; PON: = ' 0 '; HO:='O'; KE:='O'; DI :=' O'; BA :='O'; SGCAP .CELLS[1,3) :=STAN;
TIDE'
procedure TMDIChild.CISIChange(Sender: TObject); BEGIN STAN :=' 2' ; 1ET :='3'; CD:='3'; CL :=' 3 '; HOP:='3 '; PON:= ' 3' ; H0:='3'; KE : ='2'; DI: =' 3 '; BA: =' 3'; IF CISI.TEXT='VOLUME m3 ' THEN STAN:='3'; LET :='2'; CD :='3'; CL:='3'; HOP :=' 2 '; PON:='2'; HO : =' 3'; KE:='3' ; DI: ='2'; BA:=' 3';
<250 . 000
IF CISI .TEXT=' VOLUME m3 ' THEN STAN :='3'; LET :='1'; CD :='3'; CL:='3' ;
<500 .000
SGCAP .CELLS[4,3) :=CL; SGCAP .CELLS[5,3] :=HOP; SGCAP.CELLS[6,3) :=PON; SGCAP.CELLS[7,3] :=HO; SGCAP.CELLS[8,3] :=KE; SGCAP .CELLS [9 ,3] :=DI; SGCAP.CELLS[10,3] :=BA; END; BEGIN SGCAP.CELLS[2 , 3] :=LET; SGCAP.CELLS[3,3] :=CD; SGCAP .CELLS[4,3] :=CL; SGCAP .CELLS[5,3) :=HOP ; SGCAP.CELLS[6,3] :=PON; SGCAP .CELLS[7,3) :=HO; SGCAP .CELLS[ 8,3) :=KE; SGCAP .CELLS[9,3 ) :=DI; SGCAP .CELLS [10,3] :=BA; END ; END; begin IF CISI.TEXT='VOLUME m3 ' THEN SGCAP.CELLS[1,4) :=STAN; SGCAP.CELLS[2,4) :=LET; SGCAP .CELLS[3,4] :=CD; SGCAP.CELLS[4,4) :=CL; SGCAP .CELLS [5 , 4) :=HOP; SGCAP.CELLS[6,4) :=PON; SGCAP .CELLS [7 ,4] :=HO ; SGCAP.CELLS[8,4) :=KE; SGCAP.CELLS[9,4] :=DI; SGCAP.CELLS[10,4] :=BA; END; BEGIN SGCAP .CELLS[1, 4) :=STAN; SGCAP.CELLS[2,4) :=LET; SGCAP.CELLS[3,4) :=CD; SGCAP .CELLS[4,4) :=CL; SGCAP .CELLS [5,4) :=HOP; SGCAP .CELLS[6, 4] :=PON; SGCAP.CELLS[7,4] :=HO; SGCAP.CELLS[8,4] :=KE; SGCAP .CELLS[9,4 ] :=DI ; SGCAP.CELLS[l0,4] :=BA; END ; BEGIN HOP :=' 1 '; PON:= ' 2'; H0:= '2'; KE :='3';
<100 . 000
DI: =' 1'; BA:='3'; SGCAP.CELLS[1,4) SGCAP.CELLS[2,4) SGCAP.CELLS[3,4] SGCAP.CELLS[4,4] SGCAP.CELLS[5,4]
SGCAP.CELLS[6,4] :=PON; SGCAP.CELLS[7,4] :=HO; SGCAP.CELLS[8,4) :=KE; SGCAP.CELLS[9,4) :=DI; SGCAP.CELLS[l0,4] :=BA; END;
:=STAN; :=LET; :=CD; :=CL; :=HOP;
BEGIN IF CISI.TEXT='VOLUME m3' THEN STAN:='3'; LET:='1'; CD:='3'; CL:='3'; HOP:='1'; PON: =' 1'; H0:='1'; KE:='3'; DI:='1'; BA:='3'; SGCAP.CELLS[1,4) :=STAN; SGCAP.CELLS[2,4) :=LET;
>500.000 SGCAP.CELLS[3,4] :=CD; SGCAP.CELLS[4,4] :=CL; SGCAP.CELLS[5,4] :=HOP; SGCAP.CELLS[6,4) :=PON; SGCAP.CELLS[7,4] :=HO; SGCAP.CELLS[8,4) :=KE; SGCAP.CELLS[9,4] :=DI; SGCAP.CELLS[l0,4] :=BA; END; END; begin
procedure TMDIChild.CLALUChange(Sender: TObject); IF CLALU. TEXT=' TRAFIK PADAT' THEN BEGIN STAN:='3'; LET:='3'; CD:='3'; CL:='2'; HOP:='2'; PON:='1'; HO: =' 2'; KE:='1'; DI: =' 2'; BA:='2';
SGCAP.CELLS[1,5] :=STAN; SGCAP.CELLS[2,5] :=LET; SGCAP.CELLS[3,5] :=CD; SGCAP.CELLS[4,5] :=CL; SGCAP.CELLS[5,5) :=HOP; SGCAP.CELLS[6,5] :=PON; SGCAP.CELLS[7,5] :=HO; SGCAP.CELLS[8,5] :=KE; SGCAP.CELLS[9,5] :=DI; SGCAP.CELLS[10,5] :=BA; END; BEGIN
IF CLALU.TEXT='TRAFIK THEN STAN:='3'; LET:='3'; CD:='3 '; CL:='3'; HOP:='3'; PON:='3'; H0:='3'; KE:='3'; DI : =' 2'; BA:='2'; SGCAP.CELLS[1,5] :=STAN;
JARANG'
SGCAP.CELLS[2,5] :=LET; SGCAP.CELLS[3,5] :=CD; SGCAP.CELLS[4,5] :=CL; SGCAP.CELLS[5,5) :=HOP; SGCAP.CELLS[6,5] :=PON; SGCAP.CELLS[7,5] :=HO; SGCAP.CELLS[8,5) :=KE; SGCAP.CELLS[9,5) :=DI; SGCAP.CELLS[10,5] :=BA; END; END; VAR
procedure TMDIChild.BitBtn7Click(Sender: TObject);
X, Y: INTEGER; begin FOR X:=l TO SGCAP.COLCOUNT DO
FOR Y:=l TO SGCAP.ROWCOUNT DO SGCAP.CELLS[X,Y] :=' '; end; procedure TMDIChild.BitBtn3Click(Sender: TObject); VAR I J: INTEGER; a2,b2,c2,d2,e2,TOT2:integer; f2,g2,h2,i2,j2,tet2:integer; k2,12,m2,n2,o2,tut2:integer; p2,q2,r2,s2,t2,tat2:integer; u2,v2,w2,x2,y2,tit2:integer; z2,ab2,ac2,ad2,ae2,tst2:integer; ze2,ai2,au2,aa2,ao2,sts2:integer I
begin with sgcap do a2:=STRTOint(cells[l,l]); b2:=STRTOint(cells[l,2]); c2:=STRTOint(cells[l,3] ) ; d2:=STRTOint(cells[l,4]); e2:=STRTOint(cells[l,5] ) ; f2:=STRTOint(cells[2,1]); g2:=STRTOint(cells[2,2] ) ; h2:=STRTOint(cells[2,3] ) ; i2:=STRTOint(cells[2,4] ) ; j2:=STRTOint(cells[2,5)); k2:=STRTOint(cells[3,1) ) ; l2:=STRTOint(cells[3,2]); m2:=STRTOint(cells[3,3]); n2:=STRTOint(cells[3,4] ) ; o2:=STRTOint(cells[3,5] ) ; p2:=STRTOint(cells[4,1]); q2:=STRTOint(cells[4,2)); r2:=STRTOint(cells[4,3]); s2:=STRTOint(cells[4,4]); t2:=STRTOint(cells[4,5)); u2:=STRTOint(cells[5,1) ) ; v2:=STRTOint(cells[5,2)); w2:=STRTOint(cells[5,3] ) ; x2:=STRTOint(cells[5,4] ) ; y2:=STRTOint(cells[5,5) ) ; z2:=STRTOint(cells[6,1]); ab2:=STRTOint(cells[6,2]); ac2:=STRTOint(cells[6,3]); ad2:=STRTOint(cells[6,4]); ae2:=STRTOint(cells[6,5]); ze2:=STRTOint(cells[7,1]); ai2:=STRTOint(cells[7,2]); au2:=STRTOint(cells[7,3]); aa2:=STRTOint(cells[7,4)); ao2:=STRTOint(cells[7,5]); zo2:=STRTOint(cells[8,1] ) ;
begin FOR I:=l TO SGTEK.COLCOUNT DO FOR J:=l TO SGTEK.ROWCOUNT DO SGTEK.CELLS [I, J) :=' '; end; procedure TMDIChild.BitBtn6Click(Sender: TObject); VAR zo2,aba2,aca2,ada2,aea2,ses2:int eger; zoi2,abai2,acai2,adai2,aeai2,ses i2:integer; zoe2,abae2,acae2,adae2,aeae2,bru tu2:integer; begin aba2:=STRTOint(cells[8,2]); aca2:=STRTOint(cells[8,3)); ada2:=STRTOint(cells[8,4]); aea2:=STRTOint(cells[8,5]); zoi2:=STRTOint(cells[9,1]); abai2:=STRTOint(cells[9,2)); acai2:=STRTOint(cells[9,3]); adai2:=STRTOint(cells[9,4)); aeai2:=STRTOint(cells[9,5]); zoe2:=STRTOint(cells[l0,1)); abae2:=STRTOint(cells[l0,2]); acae2:=STRTOint(cells[10,3]); adae2:=STRTOint(cells[l0,4]); aeae2:=STRTOint(cells[10,5]); TOT2:=a2+b2+c2+d2+e2; tat2:=p2+q2+r2+s2+t2; tit2:=u2+v2+w2+x2+y2; tet2:=f2+g2+h2+i2+j2; t ut2:=k2+12+m2+n2+o2; tst2:=z2+ab2+ac2+ad2+ae2; sts2:=ze2+ai2+aa2+au2+ao2; ses2:=zo2+aba2+aca2+ada2+aea2; sesi2:=zoi2+abai2+acai2+adai2+ae ai2; brutu2:=zoe2+abae2+acae2+adae2+a eae2; CELLS[l,6) :=INTTOstr (tot2); CELLS[2,6) :=INTTOstR (tet2); CELLS[3,6] :=INTTOstR (tut2); CELLS[4,6) :=INTTOstR (tat2); CELLS[5,6) :=INTTOstR (tit2); CELLS[6,6] :=INTTOstR (tst2); CELLS[7,6] :=INTTOstR (sts2); CELLS[8,6] :=INTTOstR (ses2); CELLS[9,6] :=INTTOstR (sesi2 ) ; CELLS[l0,6) :=INTTOstR (brutu2);
CATATAN.text:='PILIHLAH PERALATAN KERUK DENGAN SKOR BESAR .I ' ,• END; END; procedure TMDIChild.BTOKClick(Sender: TObject); var JAKER,HARGA,SISA,kuat,kps,bbm,ol i,BLJ,BJ,OLJ,NSUT,SUSUT,BAIK,ASU ,GJ,gaji,OJ,volurne:DOUBLE; kru:INTEGER; begin HARGA:=STRTOFLOAT(beli.TEXT); SISA:=HARGA*0.05; KRU:=STRTOINT(EDIT27.TEXT); JAKER:=STRTOINT(EDIT24.TEXT); KUAT:=STRTOFLOAT(pmp.TEXT); KPS:=STRTOFLOAT(prod.TEXT); BBM:=STRTOFLOAT(EDIT15.TEXT); OLI:=STRTOFLOAT(EDIT16.TEXT); BLJ:=0 . 15*kuat; BJ:=bbm*blj; OLJ:=7*(0.0007*kuat); OJ:=olj*oli; GAJI:=STRTOFLOAT (EDIT13.TEXT); GJ:=kru*gaji/(4*6*JAKER); ASU:=0.025*harga/(6*48*JAKER); BAIK:=FAKTOR*harga/JAKER; SUSUT:=(harga-sisa)/30; NSUT:=susut/(48*6*JAKER); AKHIR:=(BJ+OJ+GJ+ASU+BAIK+NSUT)/ KPS; CBTIPE .TEXT: =' '; kpl.text:=''; b. text:= t. text:= 1 1 ; loa. text:=' 1 ; pmp. text:= depth . TEXT := 1 1 ; edit25.text:=' '; edit27 . text := 1 1 ; procedure TMDIChild .BitBtn9Click(Sender: TObj ect); begin 1
'
;
1 1
;
Laporan:=TLaporan.Create(self); WITH Laporan do begin LAPORAN . QRLABEL26.CAPTION:=forma t ( %5.4f [plan]); LAPORAN . QRLABEL25 . CAPTION:=edit2 .text; LAPORAN.QRLABEL33 . CAPTION :=SED [ 1 LKOL 1
1
1
);
,
volume:=strtofloat (edit21. text); TOTALAN:=AKHIR*volume; edit7.text:=format( ' %12 .2n', [sis a));
edit9 .text:=format ( ' %10 . 2n ', [blj J) ; edi tlO. text :=format ( '%10. 2n ', [bj J); edit11. text:=format ( 1 %10 . 2n 1 , [ol j J) ; edit12 . text :=format( ' %10 . 2n [oj 1
,
J);
edit14.text :=format(' %10.2n ', [gj J) ; edi t17. text: =format ( ' %12 . 2n ', [as u]);
edi t18. text: =format ( ' %12 . 2n 1 , [ba ik)); edi t19. text: =format ( ' %12 . 2n ', [su sut]) ; edi t20. text: =format ( ' %12 . 2n' , [ns ut]) ; bayar .TEXT:=Format(' %12 .2N', [AKH IR]) ; EDIT23. TEXT: =FORMAT (I %12. 2N ' I [TO TALAN ] ) ; end; procedure TMDIChild.BitBtn20Click(Sender: TObject); begin edit15.text:= 1 1 ; edit16.tex t:=' 1 ; beli . TEXT:= 1 1 ; prod . TEXT:= 1 ' ; EDIT13 .TEXT := 1 I ; EDIT24.TEXT:= 1 ' ; end; LAPOR~ .QRLABEL37.CAPT ION := (EDIT
8.TEXT) ; LAPORAN .QRLABEL7 8.CAPTION :=EDIT6 .TEXT; LAPORAN.QRLABEL45.CAPTION:=T.TEX T;
LAPORAN . QRLABEL19.CAPTION :=KPL.T EXT; LAPORAN.QRLABEL2 3.CAPTION :=LOA . T EXT; LAPORAN . QRLABEL38.CAPTION:=B .TEX T;
LAPORAN.QRLABEL14.CAPTION:=EDIT1 .TEXT; LAPORAN.QRLABEL83.CAPTION:=beli. text; LAPORAN.QRLABEL85.CAPTION:=DEPTH .text; LAPORAN.QRLABEL94.CAPTION:=EDIT1 5.text; LAPORAN.QRLABELlOl.CAPTION:=EDIT 16.text; LAPORAN.QRLABEL105.CAPTION:=EDIT 13 . text; LAPORAN.QRLABEL106.CAPTION:=EDIT 27.text; LAPORAN.QRLABEL61.CAPTION:=pmp.t ext; LAPORAN.QRLABEL77.CAPTION:=prod. text; LAPORAN.QRLABEL78.CAPTION:=edit6 .tex t; LAPORAN.QRLABEL10.CAPTION:=FORMA T ( ' %20 . 2F' [TJUMLAH]); LAPORAN.QRLABEL79.CAPTION:=FORMA T ( ' %10 .12F' [TJUML]); LAPORAN.QRLABEL80.CAPTION:=CBTIP E.TEXT; LAPORAN.QRLABEL81.CAPTION:=Forma t('%l2 . 2N' [AKHIR]); LAPORAN.QRLABEL109.CAPTION:=Form at (' %1 2. 2N' [TOTALAN]); LAPORAN.QRLABEL113.CAPTION:=EDIT 3.TEXT; end; LAPORAN.PREVIEW; end; I
I
1
1
procedure TMDIChild.BitBtn13Click(Sender: TObject ) ; VAR DRT KERUK:SINGLE;
IF EKS>=PLAN THEN EDIT6.TEXT:=FLOATTOSTR (KERUK); end; BEGIN IF EKS
1
begin DRT :=STRTOFLOAT (EDIT1.TEXT); EKS:=STRTOFLOAT (EDIT2.TEXT); PLAN:=DRT*1.1; EDIT 4 .TEXT:=FLOATTOSTR (PLAN); BEGIN KERUK: =0;
procedure TMDIChild.CBTIPEChange(Sender: TObject); BEGIN IF CBTIPE.TEXT='TSHD' THEN FAKTOR:=0.000135; IF CBTIPE.TEXT='CSD' THEN FAKTOR:=0.000140; IF CBTIPE.TEXT='BACKHOE'THEN
FAKTOR:=0.000140; IF CBTIPE.TEXT= 'GRAB' THEN FAKTOR:=0.000130; END; procedure TMDIChild.DBVOLKERKeyPress(Sende r: TObject; var Key: Char);
VAR JB: DOUBLE ; begin IF DBVOLKER .SELECTEDINDEX=4 THEN BEGIN VOLKER [ ' VOLK ' ) :=VOLKER [ ' JARAK' ) * (VOLKER['PIAS1 ')+ VOLKER[ 'PIAS2'))/2; JB:=VOLKER.FIELDS[4) .ASFLOAT; TJUMh~:=TJUMLAH+JB;
EDIT21.TEXT:=FORMAT('%20.2F', [TJ UMLAH]); end; END; procedure TMDIChild.DBSEDKeyPress(Sender: TObject; var Key: Char); var jsed:double; begin IF dbsed.SELECTEDINDEX=5 THEN BEGIN sed['cz'] :=18*log10(12*sed['ked' ) I sed [ 'r' ) ) ; end; IF dbsed.SELECTEDINDEX=6 THEN BEGIN sed['cz90'] :=18*log10 (12*sed[ 'ke d') I sed [ 'D90')) ; end; IF dbsed.SELECTEDINDEX=9 THEN BEGIN sed['miu'] :=power ((SED[ 'cz') /SED[ 'cz90'] ) , 1.5); end; IF dbsed .SELECTEDINDEX=10 THEN BEGIN sed['miO') :=(0.66*5.4)/(2*sinh(O . 041 *sed [ 'ked' ] ) ) ; end; IF dbsed.SELECTEDINDEX=11 THEN BEGIN sed['SC'] :=1025*9.81*POWER(sed[' arus' ) I SED [ 'cz' ] , 2) ; end; IF dbsed.SELECTEDINDEX=12 THEN BEGIN sed [ ' ANOL ' J :=SED [ 'mio') * 9. 83/6.2 8;
end; IF dbsed.SELECTEDINDEX=13 THEN BEGIN sed['FW'J :=exp (5.977+(5.213*power(SED['ano1')/s ed [ 'r' J , -0 .194) ) ) ; end; IF dbsed.SELECTEDINDEX=14 THEN BEGIN sed [ 'BJK'] :=sed [ 'CZ'] *POWER ((SED ['FW ') /(2*9.81)),0 .5 ) ; end; IF dbsed.SELECTEDINDEX=15 THEN BEGIN sed['SCW') :=SED['SC')*(1+POWER(( 0. 5* (SED [ 'BJK') *(SED [ 'MIO'] /sed [ 'arus' ) ) ) ) , 2) ) ; end; IF dbsed.SELECTEDINDEX=16 THEN BEGIN sed['sb') :=5*sed['d50']*sed['aru s')*POWER(9.81,0.5)/SED['CZ')*EX P(-
(0 .27*1.5 85* sed['d50']*1025*9.81 ) I (SED [ 'MIU I J /SED [I sc' J)); end; IF dbsed.SELECTEDINDEX=17 THEN BEGIN sed[ 'VS'] :=POWER ((SED [ 'SCW'] /102 5), 0. 5);
end; IF dbsed.SELECTEDINDEX=18 THEN BEGIN sed [ 'ZET' ] : =0 .16* SED [ 'VS'] *sed [' ked']; end; IF dbsed.SELECTEDINDEX=19 THEN BEGIN sed['CB'] :=sed['sb']/(6.34*sed [ ' VS ' J *sed [ 'r' J ) ; end; IF dbsed.SELECTEDINDEX=20 THEN BEGIN sed['ce1'] :=(sed ['CB ')*sed['ZET' )/(0.0325*sed['ked'])* (1 -EXP (( 0 . 0 3 2 5 *sed [ ' ked' ] Is ed [ ' ZE T ' ) ) ) ) ) ;
end; IF dbsed.SELECTEDINDEX=21 THEN BEGIN sed [ 'ss'] :=sed [ 'VS') *sed [ 'CE1' J * sed [ 'ked' ) ; end; IF dbsed.SELECTEDINDEX=22 THEN BEGIN sed [ 'stot' J :=sed [ 'SB' J +sed [ 'SS' J
end; IF dbsed.SELECTEDINDEX=23 THEN BEGIN sed['sth'] :=sed['stot']*3600*24* 365; end; IF dbsed.SELECTEDINDEX=26 THEN BEGIN sed [ ' sm' J :=sed [ ' s th' ] I ( (sed [ ' l ko l' ]+sed['ldas'] )/2) ; end; Jsed:=sed .fields[26] .asfloat; TJUML:=TJUML+Jsed; EDIT22.TEXT:=FORMAT('%10.12F', [T JUML]) ; end; procedure TMDIChild.cbalatChange(Sender: TObject) ; VAR A,B,C,D,E,F,GELOM:SINGLE; begin GELOM:=STRTOFLOAT (EDIT5.TEXT); BEGIN; IF CBALAT.TEXT='TSHD' THEN BEGIN Jl.:=4; IF GELOM< =A THEN M2. TEXT:=' TIPE ALAT MEMENUHI SYARAT BATAS' ELSE M2.TEXT:='TIPE ALAT TIDAK MEMENUHI SYARAT BATAS'; end; END; begin GELOM:=STRTOFLOAT (EDIT5.TEXT); BEGIN ; IF CBALAT.TEXT='CS D' THEN BEGIN B: =4; IF GELOM< =B THEN M2.TEXT:='TIPE ALAT MEMENUHI SYARAT BATAS' ELSE M2.TEXT :='TIPE ALAT TIDAK MEMENUHI SYARAT BATAS'; end; END; END; begin GELOM:=STRTOFLOAT (EDITS. TEXT);
BEGIN; IF CBALAT.TEXT='GRAB' THEN BEGIN C:=3.5; IF GELOM<=C THEN M2.TEXT:='TIPE ALAT MEMENUHI SYARAT BATAS' ELSE M2.TEXT:='TIPE ALAT TIDAK MEMENUHI SYARAT BATAS'; end; END; END; begin GELOM:=STRTOFLOAT (EDIT5.TEXT); BEGIN; IF CBALAT.TEXT='BUCKET' THEN BEGIN D:=l.O; IF GELOM<=D THEN M2. TEXT:=' TIPE ALAT MEMENUHI SYARAT BATAS' ELSE M2.TEXT:='TIPE ALAT TIDAK MEMENUHI SYARAT BATAS ' ; end; END; END; begin GELOM:=STRTOFLOAT (EDIT5.TEXT); BEGIN; IF CBALAT.TEXT=' BACKHOE' THEN BEGIN E:=O.B; IF GELOM<=E THEN M2. TEXT:=' TIPE ALAT MEMENUHI SYARAT BATAS' ELSE M2.TEXT: ='TIPE ALAT TIDAK MEMENUHI SYARAT BATAS'; end; END; END; begin GELOM:=STRTOFLOAT (EDIT5.TEXT); BEGIN; IF CBALAT.TEXT='DIPPER' THEN BEGIN F:=O.B; IF GELOM<=F THEN M2.TEXT:='TIPE ALAT MEMENUHI SYARAT BATAS' ELSE
M2.TEXT:='TIPE ALAT MEMENUHI SYARAT BATAS'; end; END; END; END; R2 .ENABLED:=FALSE; R3.ENABLED: =FALSE; CMA.ENABLED:=FALSE; CAI.ENABLED:=FALSE; CBUAK .ENABLED:=FALSE; CISI.ENABLED:=FALSE; CLALU.ENABLED:=FALSE; SGCAP.ENABLED:=FALSE; BITBTN6.ENABLED:=FALSE; BITBTN7.ENABLED:=FALSE; CMAT.ENABLED:=TRUE;
TIDAK
procedure TMDIChild.R2Click(Sender: TObject); Rl.ENABLED :=FALSE; R3.ENABLED:=FALSE; CMAT.ENABLED :=FALSE; CAIR.ENABLED:=FALSE; CBUANG.ENABLED:=FALSE; CVOLUM.ENABLED:=FALSE; CTRAF .ENABLED:=FALSE; SGTEK .ENABLED:=FALSE; BITBTN2.ENABLED:=FALSE; BITBTN3.ENABLED:=FALSE; procedure TMDIChild.R3Click(Sender: TObject); Rl.ENABLED:=FALSE; R2.ENABLED: =FALSE; CMAT.ENABLED :=TRUE; CAIR.ENABLED:=TRUE; CBUANG.ENABLED:=TRUE; CVOLUM.ENABLED:=TRUE; CTRAF.ENABLED: =TRUE; SGTEK.ENABLED:=TRUE; BITBTN2.ENABLED:=TRUE; BITBTN3.ENABLED:=TRUE; CMA.ENABLED :=TRUE; unit Rpt; interface uses Windows, SysUtils, Messages , Classes, Graphics, Controls , TLAPORAN = class(TQuickRep) QRShapel6 : TQRShape; TitleBandl : TQRBand; QRLabell : TQRLabel;
procedure TMDIChild.RlClick(Sender: TObject); begin CAIR.ENABLED:=TRUE; CBUANG.ENABLED:=TRUE; CVOLUM . ENABLED:=TRUE; CTRAF.ENABLED:=TRUE; SGTEK.ENABLED:=TRUE; BITBTN2.ENABLED:=TRUE; BITBTN3 .ENABLED:=TRUE; EDIT3.TEXT:='MAINTENANCE DREDGING '; end; begin
CMA .ENABLED:=TRUE; CAI .ENABLED:=TRUE; CBUAK .ENABLED:=TRUE; CISI.ENABLED:=TRUE; CLALU .ENABLED:=TRUE; SGCAP.ENABLED:=TRUE; BITBTN6.ENABLED:=TRUE; BITBTN7.ENABLED: =TRUE; EDIT3.TEXT:='CAPITAL DREDGING'; end; begin
CAI.ENABLED: =TRUE; CBUAK.ENABLED: =TRUE; CISI .ENABLED:=TRUE; CLALU.ENABLED:=TRUE; SGCAP .ENABLED:=TRUE; BITBTN6.ENABLED:=TRUE; BITBTN7.ENABLED:=TRUE; EDIT3.TEXT:='CAPITAL MAINTENANCE'; end; END. StdCtrls, ExtCtrls, Quickrpt , QRCtrls; type
QRimagel: QRShapel: QRShape2: QRLabel6:
TQRimage; TQRShape; TQRShape; TQRLabel;
DAN
Forms,
QRLabel7: TQRLabel; QRLabel8: TQRLabel; QRShape4: TQRShape; QRShape5 : TQRShape; QRLabel48: TQRLabel; QRLabel50 : TQRLabel; QRLabel51: TQRLabel; QRShape13 : TQRShape; QRShapel4: TQRShape; QRLabel68: TQRLabel; QRLabel69: TQRLabel; QRLabel70: TQRLabel; QRLabel74: TQRLabel; QRLabel78: TQRLabel; QRLabel79: TQRLabel; QRLabelBO: TQRLabel; QRLabel81: TQRLabel; QRShape17: TQRShape; QRShapelB: TQRShape; QRLabel89: TQRLabel; QRLabel90 : TQRLabel; QRLabel92: TQRLabel; QRLabel93: TQRLabel; QRLabel99: TQRLabel; QRLabel76: TQRLabel; QRLabel77: TQRLabel; QRLabel98: TQRLabel; QRLabel62: TQRLabel; QRLabel63: TQRLabel; QRLabel64: TQRLabel; QRLabel66 : TQRLabel; QRLabel20: TQRLabel; QRLabel24: TQRLabel; QRLabel25: TQRLabel; QRLabel26: TQRLahel; QRLabel27 : TQRLabel; QRLabel29: TQRLabel; QRLabel33: TQRLabel; QRLabel34: TQRLabel; QRLabel35: TQRLabel; QRLabel36: TQRLabel; QRLabel37: TQRLabel; QRLabel55: TQRLabel; QRShape25: TQRShape; QRShape26: TQRShape; QRLabel56: TQRLabel; QRLabel57 : TQRLabel; QRLabel58: TQRLabel; QRLabel59 : TQRLabel; QRLabel60: TQRLabel; QRLabel61 : TQRLabel; QRLabel65: TQRLabel; QRLabel67 : TQRLabel; QRLabel84: TQRLabel; QRLabel88: TQRLabel; QRLabel106: TQRLabel;
QRLabellll: TQRLabel; QRLabel82: TQRLabel; QRLabel83: TQRLabel; QRShape15: TQRShape; QRLabel28: TQRLabel; QRLabel2: TQRLabel; QRLabel4: TQRLabel; QRLabel5: TQRLabel; QRLabellO: TQRLabel; QRLabelll: TQRLabel; QRLabell3: TQRLabel; QRLabel14: TQRLabel; QRLabell5: TQRLabel; QRLabel16: TQRLabel; QRLabell7: TQRLabel; QRLabellB: TQRLabel; QRLabel19: TQRLabel; QRLabel21: TQRLabel; QRLabel22: TQRLabel; QRLabel23: TQRLabel; QRLabel30: TQRLabel; QRLabel31: TQRLabel; QRLabel32: TQRLabel; QRLabel38: TQRLabel; QRLabel39: TQRLabel; QRLabel40: TQRLabel; QRLabel41: TQRLabel; QRLabel44: TQRLabel; QRLabel45: TQRLabel; QRLabel47: TQRLabel; QRLabel49: TQRLabel; QRLabel71: TQRLabel; QRLabel85: TQRLabel; QRLabel86: TQRLabel; QRLabel87: TQRLahel; QRLabel91: TQRLabel; QRLabel94 : TQRLabel; QRLabel95: TQRLabel; QRLabel96 : TQRLabel; QRLabel97: TQRLabel; QRLabellOO: TQRLabel; QRLabellOl: TQRLabel; QRLabell02: TQRLabel; QRLabell03: TQRLabel; QRLabell04: TQRLabel; QRLabel105: TQRLabel; QRLabell07: TQRLabel; QRLabell08: TQRLabel; QRLabell09: TQRLabel; QRShape3: TQRShape; QRLabelllO: TQRLabel; QRLabell12: TQRLabel; QRLabelll3: TQRLabel; QRLabel3: TQRLabel; QRLabel9 : TQRLabel;
private declarations
Private
public declarations
Public
end; var LAPORAN: TLAPORAN;
implementation {$R
end.
* .DFM}
D90 : 0.0012 m
D50: 0.00018 m
r: 0.06 TRANSPORT SEDIMENT (titik 3)
Transport: Ke Utara: 0.000430600 m 3/detik = 13579.407 m 3/tahun Ke Selatan: 0 m 3/detik
Total : 13579.407 m 3/tahun Jika luas kolam: 255000 m 3 dan luas dasar: 180200 m 3 maka sedimentasi/tahun = 0.0624053 m = 6.624 cm/tahun.
PROFIL CHEK STABILITAS kolam labuh (slope 1:4)
19 13 0. 300. 300. 300. 1 300.300.320.295.1 320. 295. 358. 293. 2 358. 293. 370. 290. 3 370. 290. 374. 289. 4 374. 289. 590. 289. 4 590.289 594.290.4 594 290 606. 293. 3
606. 293. 714. 295. 2 7t4. 295. 734. 300. 1 734. 300 1034. 300. 1 () 295. 320. 295. 2 714. 295. 1034. 295. 2 0 293.358.293.3 606. 293. 1034. 293. 3 0 2R9. 374.289.4 590.289.1034.289.4 0. 289.374.289.4 590.289.1034.289.4 SOIL 4
14. 14. 0 27. 0. 0. 1 15. 15. 0 28. 0 0. 2 16. 16. 0. 30. 0. 0. 3 17. 17. 0. 31. 0. 0. 4 WATER
1 10.055 2 0 302.
1034.302. CIRCLE '55 0 300. 374. 590. 0. 1. 0. 0.
--SLOPE STABILITY ANALYSIS-SIMPLIFIED JA"TBU METHOD OF SLICES IRREGULAR FAILURE SCRFACES
PROBLEM DESCRIPTION BENOA SLOPE 1:4 BOUNDARY C'OORDI"\JATES 13 TOP BOU NDARJES 19 TOTAL ROLt\DARIES
BOU\DAR)
X-LEFT
Y-LEFT
X-RIGHT
Y-RIGHT
SOIL
TYPI·.
NO
(FT)
(FT)
(FT)
(FI)
BELOWBND
no
3on no 300.0U 300.00 30U.OO 320.00 295.00 295.0(1 358.00 293.00 2 293 ou 37n.oo 290.00 3 5 29UOU 374.00 289.00 4 6 289.00 590.00 289.00 4 7 289 0(1 594.00 290.00 4 8 290.00 606.00 293.00 3 9 293.00 714.00 295.00 2 ] (I 295.00 734.00 300.00 11 300.00 1034.00 300.00 12 .00 295.00 320.00 295.00 2 7]4.((1 29'5 on 1034.00 295.00 13 2 14 .on 293.00 358.00 293.00 3 606 (I! I 293 00 1034.00 293.00 15 3 16 .on 2R9.00 374.00 289.00 4 17 590.00 289.00 1034.00 289.00 4 ()(I 18 289.00 374.00 289.00 4 19 590.nn 289.00 1034.00 289.00 4 [SOTROPJC SOIL PARl\11ETERS 2 3 4
1
3(H1.0(l 32n.ou 358. no 37() uo 374.00 590. (10 5940(1 606.00 714.00 734.00
4 TYPE(S) OF SOIL
SOIL TOTAL SATURATED COHESION FRICTION PORE PRESSURE PIEZOMETRIC TYPE UNIT WT. UNIT WT. INTERCEPT ANGLE PRESSURE CONSTANT SURFACE
::\0
(PCF)
(PCF)
(PSF)
::\0.
(DEG) PAR..-\:\fETER
1-+0 14.0 0 27.0 .00 .0 1.:'.0 15.0 0 28.0 .00 .0 3 16.0 16.0 .0 30.0 .00 0 4 17.0 17.0 0 31.0 .UU 0 1 PIEZ0:\1ETRIC SCRFACE(S ) RL\ \.E BEE:\"" ')
(PSF)
") 3 4 SPECIFIED
L""".\"IT \\ciGHT OF WATER= 10.06 PIEZOl\fETRIC SL'RFACE :\""0. 1 SPECIFIED BY 2 COORDI?\ATE PO I~TS
POI'\T
X -\YATER Y-\A/ATER (FT) (FT)
~0
302.00 ""' 900.00 302.00 A CRITICAL FAIL L'RE SL'RFACE SEARCHL\G l\1ETHOD, L""SI'\G A R -\?-\D0 :\ 1 TECffi-JQCE FOR GE:\""ERATD:'G CIRCLl...AR SLKFACES, HAS BEE:\"" SPEC IFIED. (1(1
25 TRL-\L SL'RFACES RA. YE BEE~ GE:\""ER..-\ TED . .:' SC RFACES I\l:TLA. TE FRO:\f EACH OF .:' POI?-\TS EQL'ALL Y SP.-\CED _.:,,LO::\G THE GROC \ TI SL'Rf.:..cE BET\'v'EE:\"" X= 0(! FT A"\TI X= 300.00 FT . EACH SCRFACE TE R..\fi~\- ..:l. TES BETY\ .tE"\- X= 3-4-\} i)) FT . A:\""D :< =:'56 00 IT L\ lPOSED. .-_j. T '.1.1-HCH .-\ SCRF.-\CE EXTE"\TIS IS Y = ?T. LI?
J iYj
-:-}.;::
SEG~\.LE :\""T S DEFI"\""E EACH TRIAL FAILCRE
F::::LLO\YI:\""G .·\RE DISPL-\ YE:u THE TE:\"" :\10ST CRITIC.-"1.. OF ·:-R I.-\ ~
;: .-".:-:. . C"F-:...E SCR.."C.-\CES E.'{.-\\H"\""ED
"\ ,,- c.·l-
/.....,1)
-
\_
\
'--
•
00 FT
.I
~ .,.-- ,....,
j \. --
J
_.;_ '~.
~
•• >.....: ~
THE Y .-\RE ORDERED -
'Tj 1 J)
1J J
-.J
·J\
JJ '..J r
I
1 .J J
J..-
'. J)
'. J.J
'.J)
'JJ
t J
._ __,
'. .J J
I )
-..=..· "()
l .) l ,) l ) I .J t ) l ) t ) I .) l ) ,__. 1--' ---· ...._. ()") --J '.)\ '-' ' .I...:.. 1-JJ l J •--• •:-.::• \.0 ·:>0 -J 0\
~_.
1J r
+~
1-----'
.. _ ...
'.JJ
l -J
~·
1---'
~_.
I
#
.::;. 'L)
0")
--..J 0\
I
Jr
-1--
~J ) t .)
I
.
r->
~
Q9 I
_;
·/,
l ) l ) l l lJ.J 1J ) '...J J
1.J )
0'.)
-._J -.J ()\ 0\
•Y)
('/)
l l I l 1J
J
I )
t.d
l.) l J
l l
l J
1J.J
1J.J
1 )J
r4n
l J
'...JJ I j I J l ..) t .) t ..) t J -J ()', 'J o ;+-- t, J l )
t..d
'"'-J 'J r l .) '....JJ -.....J __.
Lu
·=__.
tJ)
' .h (X)
UJ
0")
1JJ
_ .... ' •.h
tJ J
1-J)
·: >0
l ) l J
0\ -.,J /")"') '0 ..........
-1-
lJJ
-~~
00
1JJ I
.lt
Jr
+..
·=-.:·
'.J)
1
l ) I, ).}
I..J)
q:,
I .) l .) l ) l j l .) l j t- j l ) l .) l -l l j l j l ) l .) l ·-l l ) 1J ) l .) l _) l j \ .) l J l.J {..) l.J l.J l .J ......,..l , ~ 1--' .,._.._. - - ' 1 ,___. '-' C...O -.,J 0\ 1 ../r -l- 1J.J l .J __. .::;. \{) ; ; --.) •.II .{-..:.. 1 C.i'? C:· _.. lJ) . j .). '.:!...' 'J r .)1 0\ 0\ 0\ Q\ Q\ Q\ 0\ ~ J --...) "Y) ("'/) 1 1 1.J.J l J 0':1 __. t.) ·-• J r \() ( J .J J .J_:.. -J.. .:. -~ ~ 1 .. _ • ;:::._ -~ C.> •::>0 l J l )
l J l -l
I, J)
1.J.J
I,J _}
:-.:>
I ) l .)
9'
l -l
l .J l -j
t ·J
l )
__.
1--'
....,_.
tJ.)
VJ
0 -
__.
~J ~
\Q ___. t ) _,..;,. \D '..JJ 'D \.0
'
l-l 1--'
0\ ·Yl
1-.J .J
l.JJ
1.
!)
•::.:• Co ::::• 00 Q-, 0\ ;::;:; Q-, 0\ 0\ lJ ) l .J ! .) l .) ;::;:; ;::;:; ;::;:; <:J\ <:J\
tJ
I, J)
'J · 'J '
JJ
l .) l )
1 ...11
f l-
1. JJ
.:_.,
I.J) l j
l J ::::• C
o '\
I. JJ
t )
1J )
l J
1 JJ
'..JJ
'. JJ
1J
J
'.JJ
t .) ~ ·-· __, ...._. .
1•.JJ
'..JJ
......... __.
~.JJ ~~
·=·
t.JJ l.d
'.JJ
lJJ
,__. ._. __. __,
JO
-
~
'.JJ
t J
'J)
.
_)
'J)
tJ J
lJ J
._. ~_. ._.
[.)
~JJ __.
'J)
'JJ
__. .........
~
:.._ 'I
r;_~
>-J
rrJ ~
t---1
,-..J U
:-.
::=:
.._..., (/.)
r )
r J
,.::J .I 1
~
I I
~
~ -!.... ':!-.
~
>-J
.._...
r::~
r,
~
{/)
r,
~__j
I'V
'Tj
)>
Q l
l
I
C/l
~
~
t-n
C/l
()
'Tj
tT1
~
5] u to
~
U) --.)
()
0 0
~
u ,_, '/. )>
~ 'lj
0
9. ---1
C/l
.....
'''~'*
1.319 ~'*'''
FAILCRE SL"RFACE SPECIFIED BY 31 COORDL\'ATE POI~-TS
POL\'T X-SCRF Y-SLKF :\0. (FT) (FT) 212.50 213.39 214.30
,-.,-
2~ 69
320.00 319.5-t 319.12 318.75 31 8.4-+ 318.17 317.96 317.80 317.69 317.6-1317.64 317.69 317.80 317.9.:5 318.17 .318.43 318.75 319.11 319.5:: .319.99 320..:50 3:21.0.:5 321 .6.:5 3::.29 .322.97
26 :7 28
2-1-.:5 .39
_,_.)_ "'""'""" 0, --o
., .-, .)
-1-
215.23
5
216.18 :217.1-1218.12 219.1 0 :220.1 (i 221 .10 ::::::::2.10 230.09 234.09 235 .08 236 (15 237.CC 237.97 238 .90 239.81 240.70 2-1-1.56 2-t2 ..39 243 .19 :2-13 .96
6 7 8 9 10
11 ''"'
~~
1~
-'
1-+ 1.:5 16 , 7
J
I
18 19 20
:...,...,1 ...,,., __"') .-,'
--+ 'I
~9
:.o 31
2-1-6
()...+
32-t.-+-:l.
2-1-6 66 2-+7 .23 2-+7.7.:5 2-+7.86
325 .:3 326.05 3:26.9(1 327.1 (J
FAILCRE SC""RFACE SPECIFIED BY 33 COORD I::\.-\ IE POI::\TS
PO:L\T
X-SCRF Y-SL""RF (FT) (FT)
::\0.
200.00
25 26
320.00 200.9-t 319.6.:' :210.89 319.33 210.8.:' 319.0.:' 210.82 31 8. 81 214-+. 80 318.61 215.78 318.45 216.7S 318.33 217.77 318.2.:' 218.77 318.20 219.77 318.20 220.77 318.24 221.77 318.31 222.76 31 8.43 27..3.75 318.58 22~. 73 318.78 225.70 319.01 226.67 319.28 227.62 319.59 228 .55 319.93 22948 320.32 230.39 320.74 231 .28 321.19 232.15 321.68 233.00 322.21 234.83 322.76
27
234.6-+
28 29
"'"'" .11
') -~
.)
4 5 6 7 8 9 10
11 12 13 14 1.:' 16 17 1S 19
2U 21 ']'}
--~ .;:..)
24
30 31 '"'">
.) _
'"'~ .).)
"'**
__
)_.
.... ""' ........
·-
323.9S 3:-+.63 325.31
236.18 236.91 237.61 238.29 238.58
1.36-+
.::;
.)....:.~ . .)-
326.CC 326.76 32710
**'"
1
J.J
1
JJ
,-~; , '-''
t)
I )
1
..tJ
_J .
1
.J J 11
1
'u
1
( .)
>--'
l) I) l J
-.I J
l .)
1
11
I J
l)
l)
-~~·'f)-~/) --.1
l )
I J
l .J I J
t•
t )
0\
I)
'J r
l-J [ .)
I )
1-
l·.)
l) 1
J .I
o,
0 Jl
·=·
00 [ .)
1
.Jo
'Y)
'0 -1~ -1-> ~
•:;::::•
+"'
l .)
-k
-1- ·...:·
t J
I .) ,___.
·=· t .)
.__.
\Q
>- --• •·-~-• •';.') - .1
t .J tJ [.) '.JJ l.d -..J 0\ 1 ..11 f .J'> o, "-J 00 00 00 .j .>. '-'' 1JJ ~ 00 [ .)
-1-> +~ .f~ +~ -1-- -I-> -1-- -1--1-• -1 ~ -J-. -J-. h 0\ ,_,, 'J' . ~ '.J) t.J) t .J : ::::.
00 00 00 --.) :-J -._J .j.., C• ' J o 'JJ -._J ' -'• ·::Y.l
t)
[ .)
t .)
'JJ \.JJ 't_") 00
'JJ
=
,.__. _ _. ()\ 1 - ' '
.._ __ _. ...__, ~" 1-.JJ
,__.. •--• ,____. \C
t)
)-..--1
=.:
)
, O':r
[.) t.J t.J [ ,) l·.) [.) l ) l· ) [.) [ .) t•.) \,iJ \.J) \.J.J '. JJ '.J) t ) t J t .) l -.J t.) t.) :-1:.;.. ~- .J) ~.....) ~ 00 0\ ,_..~, 00 'Q \0 \Q \Q \o \0 \o \{) C:• \0 ·...:· ~ ~ ~ t ) .j... -._J t.) 00
:=·
0
.;3 0
l
0\ r ..1 •
.._j
- -
[ .) [.) t.) t-J t ) t.) ~ '. J) t .) ~ l.) .j_, -..) --.J ~
= ..
r ,.J)
t)
......_.
.
t.) t) t -J
t.) t ') l .) __.
.-.:..,
·=:
f.Jl
-..) -._J
;.-., .::;.
-.j
·:1 71
>-J '-....-"
~ ... F::..:l
·/.
r'
>-1 ~ I (/)
;; VJ
'J) t)
ld 'JJ '.. )1 LJ) l JJ LJ.) t .J t -.J tJ t .) tJ t >
'J )
'..JJ
:-J
0\ ~-'' :1-> '.JJ [ ..) t .) ~ •::.• 0\ --.J \0 ~ .j... --.J <:::· lJJ '.Jo \Q -.J ry:; I.J C • I .)
t)
~
=·
t .J
r..J
j"- '-'•
·=
lJj 1J) ~--'-...
1
l JJ lJj VJ lj) 1JJ l,j ) lJ) ld lJJ 1J) lJ.) lJ.) lJJ lJ) V.J VJ VJ IJJ Ld ...__. 1--' ......_.. ~----' .,._.. - -· ~-- ~ ,__. _ . _ . ....__., _ . __. __.-...... ...._......-.. ,__. ,__. ....__., ,.._.. ..J \0 00 00 :-.J CJ\ 0\ CJ\ 1./1 I.Jo Vo Ur 1J1 fJ) Vr \ .Jo 1./1 CJ\ 0\ CJ\ :-.l :-J 00
tJ)
ld ~ ;--1
J)
I...JJ
b
-~ ~ 'TJ
~
C/l r. ;_j
~
)>
0
l'-J
,>-j -
"rl
~
•, .J ...\.) ()
(/) .....-'
'lj
C/l
(")
'T1
M
, ·•
~
tTJ
2:1 tJ
to ...-::: 'J)
0\ (")
0
0
?::!
tJ
I--<
'../:
~
o-J tT1
"D
0
~
o-J
(/)
FAILLKE Sl'RFACE SPECIFIED BY 29 COORDD\A TE POll\TS
POI\T ::\0.
'")
3 4
5 6 7 8 9 10
11 12 13 14 15 16 17 18 19 20 21
X-SLKF Y-SDKF (FT) (FT) 225.00 22:5 .83
226 .69 '227.59 228 .52 229.46 230.43 231.41 232.40 233 .40 234.40 235 .40
236.39 237.37 238 .33
.320.00 329.44 328.94 328.50 328.11 327.80 327.54 327.35 327.23 327.17 327.18 327.26 327.40 327.61 327.89
239.27
328.22
240.19 241.07 241.93
328.63 329.09
242.75 243 52
329.6 1
')'")
244.26
330.18 330.81 330.49
'"'" 24 25
244.94
,:; _..,..:.. . -~
,:.; ~
,..,~
245 .58 2-46 16
_ ()
246 .69
27
247.16 '247.57 247 Sl
28 29
"'\ •"'""""'
"'"'"
00
-::~'") -'-·-·-"'./
333.SO 3.34.65 "'\""'
-.)
.).) )
~""
_)
336.4:' 337.1 (l
FAILuRE Sl;"RFACE SPECJFIED BY 37 COORDI::\A TE POINTS
POil\T ~0.
,..,
3 ...,.1 'I
6 7
8 9 10 11 12 13 14 15 16 17 18 19 20 21
.,,.., 7'~
--~
24 .-,_)
26 27 28
29 30 31
X -Sl;"RF Y-SLKF (FT) (FT) 210.00 210.73 211.50 2123(1 213.14 214.00 214.90 215 .82 216.76 217.72 218.70 221.68 222.68 222.67 222.67 223.67 224.66 225.65 226.62 '227.57 228.51 :229.42 230.31 231.17 232.00 232.79 233.55 234.27 234.95
235.58
37
236.16 236.70 237.18 237.62 :238.(() 238.32 238 .35
***
1.463
"')
-~~ ~-~
.).)
34 35
36
320.00 319.31 318.67 318.08 317.53 317.03 316.59 316.20
315.86 315.58 315.35 315.19 315.08 315.03 315.03 315.10 315.22 315.41 315.65 315.94 316.29 316.70 317.16 317.67 318.23 318.84 319.49 320.19 320.2 321. 322.1 ""\ •""\ -""1
-""~_.:;;
;).).)_;)_
324.23 325.13 326.05 327.00 327.10
***
FAILL'RE SDKFACE SPEC1FIEDBY 34COORDINATE POINTS
POINT X-SURF Y-SDKF NO. (FT) (FT) 1 2 3 4 5 6 7
8 9 10 11 12 13 14 15 16 17 18 19
:::.o 21 ')')
,. ., .,
L.)
24 25 :26 27 28
29 30 31
,...,
.)_
33 34
222.50 223 .25 224.04 224.86 225 .72 226.61 227.53 228.47 229.43 230.40 231.39 232.39 233.38 234.38 235.38 236.37 237.35 238 .31 239.25 240.17 241 .06 241.93 242.76 243.55 244.31 245 .02 245 .68 246.30 246.87 247.39 :247.85 248 .25 248 60 248 .76
320.00 329.34 328.72 3:28.16 327.65 327.19 326.79 326.45 326.17 325.94 325.78 325.69 •"V") ·-
.,....-
.)_).0)
325.68 325.77 325.92 326.13 326.41 326.74 327.13 327..58 328.08 328.64 329.25 329.90 33 0. 61 331.35 332.14
332.96 333.82 334.71 335.62 336..56 337.10
**~'
1.471
***
FAIU.JRE SlJRFACE SPECIFIED BY 34COORDINATE POI1\1S
POINT ~0.
2
..,
.)
4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 '")'")
,..,.., .;..)
24
25 26
27 :8 29 3(l
31
3::: .., .., ,:) _"')
34
X-SlJRF Y-SVRF (FT) (FT)
252.50 253 .23 253 .99 254.80 255 .64 256.52 257.42 2.58.35 259.31 261.28 271.26 272.25 273 .25 274.25 275 .25 276.24 277.22 278 .18 279.13 280.05 280.95 281.81 282.64 283.44 284.19 284.90 285 .57 286.18 286.74 287.25 287.70 288 .10 288.43 288 .68
330.00 333.31 338.67 338.08 337.54 337.06 336.63 336.27 33.5.96 335.72 335.54 335.42 335.37 335.38 335.45 335.59 335.79 336.05 336.38 336.77 337.21 337.71 338.27 338.87 339.53 340.23 340. 98 341.77 342.60 343.46 344.-,. .).) 345.27 346.21 347.10
**"'
1.-+96
***
FAILURE SL"RFACE SPECIFIED BY 35 COORDIKA TE POINTS
POTI\T 1\0.
X-SL"RF Y-SL'RF (FT) (FT)
9 10 11
:255.50 255.21 255.96 260.75 265.59 266.45 267.35 268.27 269.22 270.19 271.17
12
272.16
13
273.16 274.16 275.15 276.15 277.13 :278 09 279.CW 279.96 280.86 281.73 282 56
")
.:-
...,..,
4 5 6
7 8
1,-r1
15 16 17 18 19
20 21
-'")'")
,..,..,
-J '"1 1
283.35
,-,.:.~
28-+.10 284.81 285.47 286.08 286.63 287.14 287.58 287.96 288.28 288.54 288.57
-"'T
26 27 28 :29
3(1 31 ..,,..,
;)_ ~
...,
JJ
3-t 35
330.00 330.29 330.63 338.03 337.47 336.97 336.53 336.15 335.83 335.57 335.37
335.24 335.18 335.18 335.24 335.38
335.57 335.83 336.15 336.53
336.98 337.48 338.03 338.64 339.30
340 01 3-+0.76 341.55 342.38 343.25 3-1-+15 345.07 346CC 34698 3-+7. 10
,-
**'~
1.508
***
FAILURE SuKFACE SPECIFIED BY 30 COORDL\A TE POI?\1S
POL\T :\"0.
., ..., :)
-+ 5 6 7 8 9
10 11 12 13
1-+ 15 16
17 18 19 2(1 21 ..._., "' --' 24
::::' 26
27 28 ">0 - /
30 >!:>::>::
X-SURF Y-SLKF (FT) (FT) 262.50 330.00 263.48 339.79 264.46 339.62 265.45 339.48 266.45 339.37 267.44 339.30 268.44 339.26 269.44 339.26 270.44 339.29 27144 339.36 272.44 339.46 273.43 339.60 27-+.41 339.77 275.39 339.97 276.36 3-+0.21 277.32 340.48 318.28 3-+0.79 319.22 341.13 320.15 341 .50 32106 341.90 321 .96 342.33 322.S5 342.80 323 .72 .343.30 324.57 343.82 325.40 3-+4.38 326.21 3-+4.96 32700 345.57 327.77 346.21 328.52 3-+6.87 328 .76 347.10 1.518 >:
,-
)::!
('"';
ln
!'-'""' <.0
\X;! \...~
,,.
c
c_n
0
c
...:._
c 0
,__.,
""' -.J
f-l f-l f-l ..;:,.
r-' '--' ['·..) ~
t----1
f-l
r- -.J i__,.J (..~
~
:-...) r--..;-
-~
w ....
~ ~
I--'
~
'-0
--
---..;
!'.)
!'J c_,.__'
l;i
l :i 0
.£:,. : ,~,
u;
c
w
c
~<;
CJ
+
""'
(_n
!'-..)
0
w 0
""'
f-l f-l f-l
l_:;:l
""'
r-'
,:,. .;::,.
,:,. 0:• (.)l ~-, !'.) f',.) (Jl t_r. '--' (Jl I--' ,:,. I--' <.0 ['0 i'-.) f-l ',___.. l .J .£:,. f·.) (Jl !---! f-l f-l (Jl 0 0 N A .J:::,. f-l f'..) V 0 Ln ' ~• (v • .::, !.._C
w
*
w w c
N
w
0
w c
1'0
<.0
N
~
(Jl
w v• [' .)
[',)
~.)
\..v
(''\,)
'-""
2>
f-l
0
0
0
['-)
C'l
0
(]1
:----!
-
r-
"'-'
w ,_....
!'...:
N
.;::,.
u;
[' )
N
i',.) f-l I--' ,!:,.
+
...:_
I I ~ I I I I I I
•
~-·
Ul 0
~
,-
X
~
CD
__,
--.:
U,
fJ)
l.Ji f-l
--.: 0
c -:-
::::' 2>
G
f'·,,)
Ul
~
-
'-=:l
c w _::,
..::,.
0
,_
...c.
+ ,_
r:.n
\.D
----.}
0l
()1
0
-....j
""' 01
1--'
0 0
-..)
(JO
l -;
N
0
(Ji
+
----.}
+
..
~~§.~:J,s~;~:~:. -.;:::::I -\~~:iil' ~~: ~~--~··-,. ~
~
-5'• "''""' BH-4
BH-3
BH-2 BH-1 EL~)~I
r:.-.,-u
.... ,.,. . - . .
~
+--_- _ - - - _- -
:~!:>_±-~~~d;OryY,J.6~16~-~-.Q_:ii_~:-t...""' ..±~~,lii ~ cO
-·- - - -.. - -. . . -
_, _,'L. ..±~+---"' -+-o.,_ _.,._,._ t:...,w-+.., _+~-,-..... o a . · I o tJ... 0-c ...., ·•· ,,.__ +- 0 -1- - +- +- -+' - +- ·+-· :TJ •->+ .- +- +- -+' .s>...
fl
.
.-
- -f"
::c&;~~t; an:£~-+-
-+- -
+-+--+-
~-
- ~-
-.1
'~
-~~·1
••
••
-+J . . _ .
I
o
---
+- - ------l -· ~1 _ ...,...
... ~_. . ,.--- -.r-~~
0
BH-6
BH-5
41
'"· l'llr'1 -,l
--
-,.
:::7 - - - _.... - · .
_-.....,.--: -.;....- :j: _+_:-_·--,/~-~~.--:;= -+-t;acecj!!v.vtff~j\-:;: - + - r--:;: 'L :;1''':.. ,.-t__+--t _ t_t._- ..±-- t-. j ___. - +- +--__;- -~~! .,_ . -+ - +-- +- -+ - +- +- -r_.-1 \,....- +- ~ - -r-:--
+-
:...t' /• 1
4: :'
.
.
..±-:--+- -=--.,ft.
::y-...e. •.
-
-
+_--:,
l-· -
-
j
POTONGAN 1-1
BH-18
BH-21
BH-11
BH-14
(l[VATIQ1
~
~~ ·'
~
o
-
+r1~.
-
-
-
-
~~
~1~
' + - +- •;_
+ -
o0 -
-
- .
~
· ·o
-
-
-
/shetts.OO
-
+ 2.. ot:>· I ' ' - +~- -+' I I .1---~---'--='-'-- o'Q_-f"'oo:;: ,0+-o,f:L "'f -:-e-:-T
-
0
1
r~+ L -r -.,-
'
'r-
-,.-_
=
~:~~~=~+-~t..-~~-~-+~~~~f+-~t..-~~~+~-~~-~+~-~..±~~~~-:~1;:~~=..±-
-~
f-' · · .f"'
-+_::;Dr-_-:!-
~~-' +- .~.:--:o+- ~-shelts;.lrP~atf:raCf:dffiY,~._}o_ """1· b~,.,., '-·'""" "''-~ ""'". +-c"'---::.,
-r~.-1+--~~~~tl: _:-~nd~rey. ~ la_a~raljsbe~ Ira~ to ~~--:-~~1-::.. -:r ;ot"_-:;:_
0 -F" _ _-t- "'"'"'q· 0:..· ....:! _.L. .,.::1. fun<>t'K'P;:~ _._ .c ro!-l4}.+ ""0', .. -6~ \- .J..-sat,--trnc.e-to-sofN'-<"L"";<',()cse '-P--L. ..±. . . =-+·=.::--i::...o~"":: , -·- + --· _o.._ ~ c..+-"'-_ ~ _+_ ~ .± -o-_,-.,- "" o . +- +- -+ --+-.._ . _, · · . • , . _,_ ~ -+, --~ -~· -r o+ -+- -r -+0---!--'1- .,- -+ -+-<> '+- - r -
}
·- -
. "'f
-t-
+ ~ -- ~-
-
-+:-·::r:: ~ ...:...+-a?-
'"--
- -
-:r
-,
""""~
..
- ·-
-,--0-0+ - _
~~~~~fif~(-;~:~~~f~;}:~f~;:
-
+-"
-+_-:.Q.
o.:..
"'t'....:.
.. ·"·,;.·-··- -.:-.+-. <-~-- -;;-:;-
-
-
.
-t.-:;:-+--
~
PtJTONGAN 11-11
BH-13
BH-12
BH-16
BH-15
_, _ 1
(L(VATIQl m, LWS
::1:(\'ATI()NI m. L'#t'S I.:
(L(V•T~ LWS~
~
(l(\'AT101 "'· L"'S
~ . ~ ~~ }--..---.. . . . ----'----------~·1L---~-:---=-:-:::::·~~f.Utraee t(,·and ~vsne\ls~~ .,t,---+--+-_-+ _+~- + _-+ _ *]. . s 30q_brownl~~'f\Snb_::>~~to~_-o+---a... at. trace daY' - - - +-~+=-=+=-=-=-==-=· ~ 1t - - - - +-o"'~---+ --~--.;_0--~-,;~\i\t'.eS~--- +---- +-=---~---- +---- -.Ji\. -~lf'---- +---' ' ' -~-,- - - - - - - - - - - - - - .SO~ - 1~- - - - - =· !._-- -+----~- _-= ~-=-:.=+-=-o-+---- _f,g,_- +.,_o_-+---- +~---~~\s.u.ac!l~ +'_-_-+-:iF+ --o-o- +· ~· ~-~~=-=-t==~=-=;:-=-=-=-i:-=-=-~=-=-~=-~tk=-=-~~ -~~-;-~t~~~==t:=== _- ~- __.,. -_-_-_..,_ ----_-_-_-_c..---_-_-_-_-_-:.'t.r -na.gte'i·_ "..,e,~----- -o ---~~~~·1.:!~ ·'! \ - . - - m .
Vv•
-1
-J
-
-
-
-
-
-
_--~~'~!)=-~-=-=-~~-=-~-=~=:-~-=-=-~-= -- ~+-=-.,..-+---+:~-r:._· ----+ -:"- +- - +- - +- -=-:~t:..~~cit&~-~::.~~-=-~:.= +~- +- - ol-- - +- - + - + - ~ - "· ~ _,
oonuk~~ ~ t""'~,.. _r:
Sond. O"'Y
J
-
..!... -
-
<>-
~-- -~T---'<:..,.;-:--_- ~ _-_---
--o C!..-
:.l
~J+\--+ __- _+ _-_ +.= ---=--!;;....s--_-r_-::,_-_.,;._1---f-=-=-+-:::. -_+ __- _+..:..::=-_~titl~sllt~~day;\~'le - - --- .. ---------_---_-
~:',1--"l - - + - -·· -0 ~- --~ ~-.;--:~:1-+:- . [..
-l
-
.l.
-
--;;c- -Sand. 9f!Y1Sh orawnJirtle.Jo sorne.YOr.l!..
+ - ..;..
'
POTONGAN 111-111
+-+--.-+-+-+-+-~
~~~ .L
0~ -
-
-
-
0
.
-------
~-~VI!,.tio,
1'1·'•
••i.•·
--~··· ' ~ .
- - -4--. • ------- ---·- ·
~
BH 8
BH-9
M1")Jt0.:1
~...:J
~·-~
.I
••
· -~---i ~- -.= -+ ~' · _-- · ~ ::!:.. -- ~ -_ - .·-"' to"• ~0-~· -~o-+- -tao-l": -.,1:-;-,_ __ ~~="--giey~lO'anddofalt.lsi· _. :I~~--= ...,-"Q- -t....o~ ~-...- ~-.:-~-~rt.<:_;-:_-·;_ ~ _;,.p_ ~_--._·l1 j- __"" ·.... 1 '""' ~=- ·""' •- · tollttle-c'--+:-•..-- ~0 -+'-·'"' .- .:~ 'L.,. •·:
_ _
_ ·- ._;Q. !..
~ . -.
•.
· · :!_-_ •
:.... .,. - · ....:.
1
PEKERJAAN SOIL 17'Vf.STIGATION
:
.±
4
. -
.....:l- -
-
0
r;ccoralat8H-4.o&7).trace
..
.
+- -+ - .....-
_)·-
tornedium-1
c~.
-+
-~
· - 6 -+-·-+ -+-. +-'·-+ ·---
.,.
0
.
PELABUIIA .~
01
.0
+- ., , --· J l . .-Q• -+_Q,r .+- ....'?· e-+- -r-:;: -+~.;c-- -,:_.J---y_ _+ _ ....<>.5!- J. ~-.!.~..,_ 1~•.·~'\.,. o • "L \.± ' ... t_ ~ _,t:' ~.:···.::..sJ,-trcooolay,very~o:K~se·-..:t...-=;....:....\~o- · .- .+-~--+ - .-~ - \'O-\- '-.t1 ~. -~- ...-G-:;:-~~::-_ . · ·- · _ • ..:= _+- ~o-. o '---"~ - - o ~ ---::> .:...+~, • -~..J ·~ "'+ -+-• ~~-:..1
.
____________ i
------ ---;~~~_:~!_G.
C.~Y:&.:.!}!'
-· ---=:1
.:....s~: ~'e ccrol/ s~uu-~-~;::~~a;v-.·1.f-'
SURABA Y A
..:"
BH-10
(~~\-~
•
PT(Puuro}Pd>buh>.n Indonesia IU
~""&..-
BE:--iO,\
UNTUK PERENCANAAN
1
PE~GERUKAN
CATATAt.;
- o- ... / . . . .. -. cciaUshels and sand. grey
I
~
Keterangan :
c:=J
Sand
~
Clay
~
Silt
~
Coral
. 0
BH-10 (!
("'·~ J ;:Q~~
~. :.\:~~
•li ~,
s;,::-f* -:;=.~±.:ue:; -+---01-=
~=-;-=~
+ ~ - +--- +-
_~ _
; ~··a
__,e:_-- ~
--
+-
___.J..
.. _
•
...,·
"t'-Od='-"o _ _
-- _"""7c... _v _
~
-8-- t-•~~+~-~ -t(,~- . - ' ·• ~~....... . . . . ._
-"i~
+- ..:- ·:;: -:7 C:x2ifsheUs and - 0 +' ~--'....._~--
r..-- ... -
-
.
-
~·~o~.
-
• .
.
~
~ ..l
@
DEPARTE~EN .PENO!OI~AN OAH K(EU04YAAN
l£~6AGA P£NGA8 01A ~
K:PAOl
~ASYARAKAT
fNS"nTVT TEK/1\0LOCI S!:PUWH t-'OPEM3ER ~
"1 c("VT .. _Cl.,O
~·•
Th' (OJt}'!.•ur
LA(NG£::,t.J-o!V4 / I.J[N 'f'[iU.JUI ...;.-pf!()V~~--
3
81-i-20 BH-19
m.
LW'SL
--
I
'
'
·· -
'
-
L'.VS•
''j
,,
-
.
'I
-
:...
.
-
-
-
•
..L
1
' .J
fcj
-
-
. ..L
-
-
-
-
-r
.!.
-
..!..
..L
-
I
-·-
-'-.-·-
-'-,-
,
-
O·~Y. "re ~"'- ~JC-'-"'~"~' -""""'"~ --+:::_'_: :+:::_:_: :+:::_:_: :+:::_:_ -.
..L
.-_T__ -_T_-
·l" ..!..
,...
-
.c1'
-
-
-
_
-
..i.
-
--
'
-
-
-
.,. .
.:;:Tc
•c.
l
O(So(.N 8'1'
I
------
oj<)
-
- 0
~
~ ~ -:t~c~ ~_;e-""'-''"~--"'~'"''''· ~.
<=~::::::
I~'
OIR[N(AN-1KAN
-
I
'
---..i.--
01'5(TUJUI ~8 ...
:X:
-- -
.,. . ' --~~'C.L;
0K;A!J9AQ Al':.-"0 8'?
•
-,-C:i- --- ··_-+- + -_+_- ·c_ ;_•;. -'0 :1. ,+- - +- _ -~. - ~+'-' _- -. - - ·-+ - - ~T - - •, _ -'-. _ ...!..., - - -'1 ~ - + . + •- ..!....- ''f+•- - ..i., - -,,,'I ~T~ ; - _ """· ore>ib
.T_
.
~
m,
-t-'1 +--~+ ' 1 +--++-:,.J'f_-_ --' + +-+ ' . ~ -* + ·-:.J., + -r'1_) -+ - . ct:xat'sllo.\s.trace · ' _ S~DO. b.roy,nJg.::i'lStt..b,--o·Ml,.lrace to little ~ t-o<..e _ · _ _ ' _ _ ~, - -+-_ + _ + -- + .- " - ~ ·..:; _ _ =-~k\.bi'OWil,htt!e + 1-~,.ri - - ,.!· - tfo~c:a;r;-ve.-,-,c-cse iOOSe.,... . _f- - + - -;- .J' ' - -~: -r ·~s~_..,~ ... , - .- . - ~ - -,- -, .:.. - - - -.- --:n-- + - + - + --.- -'- --- .. , -·J-1..!! ~ ----:]
.
~
EL;'···;::'i
0( 7 ~
EL[VATION
,~
OII<(TAHUI
a
-"'r' -•- ..
~ .~· ~
I~Eit
.
-FWD . · PuTRO
I
I
•
JuOuL
c~.. eAR
I
~~
P~ERKIRAAN PROF1L TANAH
-- - - -
-----~~[::-- ----
·~,· ;zt
POTONGAN IV-IV ·~
I<( ~--.: ~
':.: ~
·· -c~:..-:-.:,
--·
r•tr i
fii
.;],'
•
~
.
o8
03
o8
Ia
IC• to
\(J
10
((>
16
JCJ
10
...g> 07
(1 -
.,
. .. .
\0
10
[CJ (0
(0
10 ···- ··--·-·-·· -
II
fl
IS
10
10
og
ii
;
I
b. ''' ' • ' t' ~
to .
')
~
,I II
. '' .
I
~
1 I
I I
IO
:
I
- ...I
i
.,,
to
-
10
/(J
It'
,,
i':
I: ;
• · "'
ll
v'
'
fl
I
II
II
;o
'6
o8
1, '
t6
16
og
/0
oy
IS" ,I
~.,
I -
• AR 9
0.)~
coo
II.O.H.500
9.0.}-4 .000
B ·T I
l
:Ei · IT
cr
e
AR6
r
II.OJJ.500 ,
I
I
l
\L
I
Tf 11.0.).).000
~
._ t, l•
l0l..:n'.,.l6.:1
_j
e
AR2.
9.0.)2..500
•
.•
1 ~
.. ~
......_!,
l
4
•
: -1
:~
11.0.)2..000
,•
~~
~~
...
__..... - -
~- .
f
.
'
. ·-
r
\
'
I
----------:·'
I
;
'
~/
e:..
~
..
\;..,..,,.,.~,_,.r=:<.::-.==•,_-::::>::-.-::-\
.
•
l• -1.0
--ca .
,... ,~.:. ,~T f .
'-'... .
i ~"':"
-~ ~-----·
~~- -::-....---r
•. ..
'
I•
lC::J...lt":: .•W
t•
,.. •=x.1m...,..
X..l")~~·
··~. l"'C"'t,...'t7
~-
,-• !'l
:~
»-11 1•
~-.
\
./
~,
'
.
.
:
..-
/
~--
.
.• •
'
'
-
· -" .1.
..'. ' .
I
R~ t": ~
.. [ ..
,-l
[~
/
;~/~--
'
'
t,. £ri
r: <\./ " .,
.
I
/
,<·
_/~,
:
.
r:r "'\_"t
•
-
... .__.
~ - , '~~- .._-------~
t
' ·"
\,_
}
\'
~
I
/.-J
/"-----·
~
""
f '~
;. L
I
i
~
I 9.0Jl.OOO L _
300.000
----
~
/'
·-·
300.500
301.000
~.
.-
I
.
-~
I
.' ;
'
:
. ! __ _ _ __ _ • _ ___! __
.l01.500
302.000
.l02.500
.lOJ.OOO
'
J.._ _ _ _ _ _ __
30.),500
.304.000
.304.500
= .ooo