-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathCLINES.BTM
92 lines (87 loc) · 3.61 KB
/
CLINES.BTM
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
setlocal
set total=0
set sizetotal=0
echo ----------------------------------------------------------------
echo SOURCE FILE SIZE REPORT FOR %_DATE , %_TIME
echo.
echos PROBOARD.EXE...
cd \cpp\pb\proboard
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp *.asm) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos PROCFG.EXE.....
cd \cpp\pb\procfg
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos PBUTIL.EXE.....
cd \cpp\pb\pbutil
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos PBLIB.LIB......
cd \cpp\pb\lib
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos CONVERT.EXE....
cd \cpp\pb\convert
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos TSLIB.LIB......
cd \cpp\lib\tslib
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp *.asm) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echos TSWIN.LIB......
cd \cpp\lib\tswin
set subtotal=0
set sizesubtotal=0
for %a in (*.cpp *.hpp *.asm) do (
set subtotal=%@eval[%subtotal+%@lines[%a]+1]
set sizesubtotal=%@eval[%sizesubtotal+%@filesize[%a,b]]
)
echo %@substr[ ,0,%@eval[6-%@len[%subtotal]]] %subtotal (%@substr[ ,0,%@eval[4-%@len[%@int[%@eval[%sizesubtotal/1024]]]]]%@int[%@eval[%sizesubtotal/1024]]k)
set total=%@eval[%total+%subtotal]
set sizetotal=%@eval[%sizetotal+%sizesubtotal]
echo.
echo TOTAL LINES..... %total
echo TOTAL SIZE...... %@int[%@eval[%sizetotal/1024]] Kb
endlocal