Количество строк

[Ramzes]

многие из обитателей форума пишут программы не на работе (т.е. не работают программистами) и пишут программы на заказ, для себя. Вопрос:
Какое количество строк (приблезительное, наибольшее) вы написали в одной программе, не на работе?

у меня мой последний проэкт (который сечас разрабатывается) на .Net (если не учитывать строки созданые редактором форм) уже насчитвает ~5 тыс. строк.

[RayShade]

Давно давно.

На 2м курсе инста мы с другом на Паскале писали РПГ

Моя часть кода, включавшая движок и редактор карт, была что то около, 32000 строчек.

[Хакер]

130 Кб кода, учитывая то что VB вставляет в файлы. (Но вставлял он в том проекте мало, ибо одна чёрныя форма без контролов + 25 модулей + модули класса)

[Ramzes]

Хакер
вопрос звучал не сколько кб, а сколько строк

[Хакер]

ОК, щас наприщу прогу считающую CRLF...

[GSerg]

Да, да, точно.
http://thedailywtf.com/forums/permalink ... aspx#65573

[RayShade]

Хакер

В поиск Тема обсуждалась уже кучу раз

Я для нее как то даже сделал очень классный код:

Код: Выделить всё

fso=createobject("scritping.filesystemobject")
st=fso.getfile("c:\1.txt").openastextstream(forreading).readall
numcrlf=(len(st)-len(replace(st,vbcrlf,"",1,-1,vbbinarycompare)))/2

[Хакер]

Подсчитал! Если честно, число меня чуть шокировало (если учитывать что завершённость программы гдето 15%)

Вот

Код: Выделить всё

bas: AI = 4257
bas: Audio = 57
cls: bones = 104
cls: cFile = 2
cls: clBadPlace = 98
cls: clCharacters = 103
cls: clGoodPlace = 86
cls: clsCONObjects = 62
cls: clsPolymorph = 18
cls: colFiles = 246
bas: Debug_outer = 196
bas: declarations = 487
bas: modDefinations = 175
bas: Environment = 74
cls: F_Custom_Param = 19
cls: F_Image = 244
cls: F_ProgressBar = 229
frm: frm = 150
frm: frmAddNewFile = 253
frm: frmAddNewGroup = 170
frm: frmAddNewPack = 117
frm: frmSoundEditor = 1219
cls: G_BadPlace = 39
cls: G_Bone = 322
cls: G_Character = 113
cls: G_GoodPlace = 37
cls: G_Joint = 82
cls: G_Player = 942
cls: G_Special_Parameters = 103
bas: Game = 3469
bas: ScenMusChanger = 319
bas: IEngine = 1222
bas: InputEngine = 763
cls: Joints = 88
bas: Level = 951
bas: MServise = 210
frm: SMInit = 329
bas: Scripts = 434
bas: g_TextureLoader = 149
cls: Vector3D = 4
bas: modPAK = 48
frm: frmMain = 240
cls: clsMod = 19
cls: colModules = 90
frm: DoLoopCycleAdd = 200
frm: ForEachCycleAdding = 217
frm: ForToNextCycleAdding = 298
frm: frmEditForm = 360
frm: frmScriptManager = 570
frm: ifThenElseAdding = 207
bas: modConsts = 3
frm: SelectCaseAdding = 188
frm: WhileWendCycleAdding = 245
frm: AC_Process = 289
frm: AddMdAnim = 425
frm: frmAnimManager = 347
bas: Module1 = 31
bas: GUIEd_Declarations = 83
frm: frmGUIEd_About = 96
frm: frmNavigator = 242
frm: frmPreview = 723
ctl: GUIM_Button = 711
ctl: GUIM_Image = 587
ctl: GUIM_ProgressBar = 604
ctl: GUIM_ScreenTimer = 150
bas: modGUIM_Main = 72
bas: modGUIM_TGA = 359
ctl: ObjectImitator = 115
frm: frmTextureMaster_Main = 871
frm: LevEd_AddTexOptions = 424
frm: LevEd_CamOptions = 357
frm: LevEd_TexturePreview = 98
cls: LevelObject = 375
bas: LevelWriter = 292
frm: LevEd_Main = 1246
frm: LevEd_ObjOptions = 255
frm: LevEd_RenderOpt = 160
bas: TexManager = 19
frm: LevEd_TexMgr = 496
cls: clsShader = 390
cls: cSHCol = 84
frm: ShaderEd_AddLayer = 160
frm: ShaderEd_AddShader = 123
frm: ShaderEd_DirectEditing = 69
frm: ShaderEd_Main = 1195
frm: ShaderEd_Rename = 164
cls: clsShaderLayer = 127


ЗЫ1, модули, типа Math я не считал ибо ни одного символа моего там нет.

ЗЫ2. Считались только строчки кода, а не Attribute....

[Ramzes]

Хакер
а теперь все это на калькуляторе прибавь, и скажи сумму

[Хакер]

32366

[Ramzes]

32366

а на .Net болучилось бы меньше

[Хакер]

А потом бы купил геймер диск, запустил, а ему

"You must install .NET framework!"

Он скажит: я английский в школе не учил, диск бракованый, Silver Light Studio - отстой.

Нет уж...

[BV]

Кому нечем подсчитать строки:

[Хакер]

Вспомнил тут я как 4 года назад писал на VB свою ОС...

Так вот там наверно побольше кода будет... (пойду мерить)