Школоло / Говнокод #234 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
  38. 38
  39. 39
  40. 40
  41. 41
  42. 42
  43. 43
  44. 44
  45. 45
  46. 46
  47. 47
  48. 48
  49. 49
  50. 50
  51. 51
  52. 52
  53. 53
  54. 54
  55. 55
  56. 56
  57. 57
  58. 58
  59. 59
  60. 60
  61. 61
  62. 62
  63. 63
  64. 64
  65. 65
for J1:=0 to Length(wArTypCoil[JJ])-1 do begin
      with wArTypCoil[JJ][J1] do begin
       with cTyp_coil do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm5:=II;StrN:=2230;mEd:=true;Lev:=2;end;P5;ArP5[IJ5]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="e4d9a487b09d94">[email protected]</a>_coil;inc(IJ5);inc(II);
       with cD_in do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm1:=II; StrN:=2231;mEd:=true;NPos:=1;Lev:=2;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="437e032007">[email protected]</a>_in;inc(IJ1);inc(II);
       with cTyp_pr do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm6:=II;NTypChs1:=1;StrN:=2232;mEd:=true;Lev:=2;end;P6;ArP6[IJ6]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d4e994b780ada4">[email protected]</a>_Pr;inc(IJ6);inc(II);
       with cRad_str do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm5:=II; StrN:=2233;mEd:=true;Lev:=2;end;P5;ArP5[IJ5]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="fec3be9dac9f9a">[email protected]</a>_str;inc(IJ5);inc(II);
       with cPW_coil_rad do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm2:=II; StrN:=2235;mEd:=true;Lev:=2;end;P2;ArP2[IJ2]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="2914694a797e">[email protected]</a>_coil_rad;inc(IJ2);inc(II);
       with cPW_coil_os do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm2:=II; StrN:=2248;mEd:=true;Lev:=2;end;P2;ArP2[IJ2]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="e1dca182b1b6">[email protected]</a>_coil_os;inc(IJ2);inc(II);
       with cRat_cur do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm1:=II; StrN:=2236;mEd:=true;NPos:=2;Lev:=2;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="a994e9cafbc8dd">[email protected]</a>_cur;inc(IJ1);inc(II);
       with cTrn_coil do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm1:=II; StrN:=2237;mEd:=true;NPos:=3;Lev:=2;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4875082b1c3a26">[email protected]</a>_coil;inc(IJ1);inc(II);
       with cRad_dim do begin NRow:=J1+1;NTab:=II_Tabl+4; Itm1:=II; StrN:=2271;mEd:=true;NPos:=3;Lev:=2;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d7ea97b485b6b3">[email protected]</a>_dim;inc(IJ1);inc(II);
       //...
      end;
     end;
     with wArNconcentr[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm2:=II; StrN:=2279;mEd:=false;Lev:=1;end;P2;ArP2[IJ2]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4479043305360a272b2a27212a3036">[email protected]</a>[JJ];inc(IJ2);inc(II);
     with wArM_c[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm3:=II; StrN:=2316;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d9e499ae98ab94">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArNumZoneOtvod_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2317;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d3ee93a492a19da6be89bcbdb69ca7a5bcb7">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArNumZoneVdod_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2318;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="615c211620132f140c3b0e0f0437050e05">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArNxod_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2319;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="e2dfa295a390ac9a8d86">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArNcur_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2320;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="605d201721122e031512">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArParam_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2321;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="8eb3cef9cffcdeeffcefe3">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
 //    with wArSw_c[JJ] do begin NTab:=II_Tabl+1; Itm3:=II; StrN:=2322;mEd:=true;NPos:=1;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="87bac7f0c6f5d4f0">[email protected]</a>_c[JJ];inc(IJ3);inc(II);
     with wArNumKolc_top_c[JJ] do begin NRow:=1;NTab:=II_Tabl+1; ; Itm3:=II; StrN:=2328;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="fbc6bb8cba89b58e96b0949798">[email protected]</a>_top_c[JJ];inc(IJ3);inc(II);
     with wArNumKolc_bot_c[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm3:=II; StrN:=2329;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d4e994a395a69aa1b99fbbb8b7">[email protected]</a>_bot_c[JJ];inc(IJ3);inc(II);
     with wArNreek_ar[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm3:=II; StrN:=2313;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="1825586f596a566a7d7d73">[email protected]</a>_ar[JJ];inc(IJ3);inc(II);
     with wArGshreik_ar[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm3:=II; StrN:=2314;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="f6cbb681b784b1859e84939f9d">[email protected]</a>_ar[JJ];inc(IJ3);inc(II);
     with wArGtreik_ar[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm3:=II; StrN:=2315;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4875083f093a0f3c3a2d2123">[email protected]</a>_ar[JJ];inc(IJ3);inc(II);
     with wArShreik_ar[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm3:=II; StrN:=2404;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="6b562b1c2a193803190e0200">[email protected]</a>_ar[JJ];inc(IJ3);inc(II);
     with wArNpr[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm2:=II; StrN:=2369;mEd:=true;Lev:=1;end;P2;ArP2[IJ2]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4875083f093a06383a">[email protected]</a>[JJ];inc(IJ2);inc(II);
     with wArShpr[JJ] do begin NRow:=1;NTab:=II_Tabl+3; Itm1:=II; StrN:=2245;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="320f72457340615a4240">[email protected]</a>[JJ];inc(IJ1);inc(II);

     with wArRadZaz_w[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm3:=II; StrN:=2323;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="7449340335062615102e150e">[email protected]</a>_w[JJ];inc(IJ3);inc(II);
     with wArStr_os_w[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm1:=II; StrN:=2324;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="e2dfa295a390b19690">[email protected]</a>_os_w[JJ];inc(IJ1);inc(II);
     with wArPrizn_radop_w[JJ] do begin NRow:=1;NTab:=II_Tabl+1; Itm4:=II;NTypChs:=0;StrN:=2325;mEd:=true;Lev:=1;end;P4;ArP4[IJ4]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="734e3304320123011a091d">[email protected]</a>_radop_w[JJ];inc(IJ4);inc(II);

     with wArAxStr[JJ].awAxialStr do begin NRow:=1;NTab:=II_Tabl+5; Itm5:=II; StrN:=2243;mEd:=true;Lev:=1;end;P5;ArP5[IJ5]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="340974437546754c674046">[email protected]</a>[JJ].awAxialStr;inc(IJ5);inc(II);
     with wArYokeRast_bot_w[JJ] do begin NRow:=1;NTab:=II_Tabl+2; Itm1:=II; StrN:=2265;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="95a8d5e2d4e7ccfafef0c7f4e6e1">[email protected]</a>_bot_w[JJ];inc(IJ1);inc(II);
     with wArElectrH_w[JJ] do begin NRow:=1;NTab:=II_Tabl+2; Itm1:=II; StrN:=2266;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="9aa7daeddbe8dff6fff9eee8d2">[email protected]</a>_w[JJ];inc(IJ1);inc(II);
     with wArElectr_centre[JJ] do begin NRow:=1;NTab:=II_Tabl+2; Itm1:=II; StrN:=2395;mEd:=false;NPos:=1;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="1825586f596a5d747d7b6c6a">[email protected]</a>_centre[JJ];inc(IJ1);inc(II);
     with wArKanBottom[JJ] do begin NRow:=1;NTab:=II_Tabl+2; Itm3:=II; StrN:=2341;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="d8e598af99aa93b9b69ab7acacb7b5">[email protected]</a>[JJ];inc(IJ3);inc(II);
     with wArKanTop[JJ] do begin NRow:=1;NTab:=II_Tabl+2; Itm3:=II; StrN:=2342;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="6e532e192f1c250f003a011e">[email protected]</a>[JJ];inc(IJ3);inc(II);

     with wArComIsZone[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm1:=II; StrN:=2339;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="162b5661576455797b5f654c797873">[email protected]</a>[JJ];inc(IJ1);inc(II);
     with wArMprIsZone[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm1:=II; StrN:=2340;mEd:=true;NPos:=2;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="013c417640734c717348725b6e6f64">[email protected]</a>[JJ];inc(IJ1);inc(II);
     with wArKus_pr[JJ] do begin NRow:=1;NTab:=II_Tabl+7; Itm1:=II; StrN:=2249;mEd:=true;NPos:=3;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4f720f380e3d043a3c">[email protected]</a>_pr[JJ];inc(IJ1);inc(II);
     with wArKus_bm_is[JJ] do begin NRow:=1;NTab:=II_Tabl+7; Itm1:=II; StrN:=2250;mEd:=true;NPos:=3;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="c0fd80b781b28bb5b3">[email protected]</a>_bm_is[JJ];inc(IJ1);inc(II);
     with wArKus_ob_is[JJ] do begin NRow:=1;NTab:=II_Tabl+7; Itm1:=II; StrN:=2251;mEd:=true;NPos:=3;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4a770a3d0b38013f39">[email protected]</a>_ob_is[JJ];inc(IJ1);inc(II);
     with wArKus_mpr_is[JJ] do begin NRow:=1;NTab:=II_Tabl+7; Itm1:=II; StrN:=2252;mEd:=true;NPos:=3;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="261b665167546d5355">[email protected]</a>_mpr_is[JJ];inc(IJ1);inc(II);
 //    with wArKus_msl_is[JJ] do begin NRow:=1;NTab:=II_Tabl+7; Itm1:=II; StrN:=2253;mEd:=true;NPos:=3;Lev:=1;end;P1;ArP1[IJ1]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="0439447345764f7177">[email protected]</a>_msl_is[JJ];inc(IJ1);inc(II);
     with wArTypIsol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm6:=II;NTypChs1:=2;StrN:=2254;mEd:=true;Lev:=1;end;P6;ArP6[IJ6]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="231e63546251775a536a504c4f">[email protected]</a>[JJ];inc(IJ6);inc(II);

     with wArEndIsol_bot[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2258;mEd:=true;NPos:=1;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="f9c4b98eb88bbc979db08a9695">[email protected]</a>_bot[JJ];inc(IJ3);inc(II);
     with wArEndIsol_top[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2259;mEd:=true;NPos:=1;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="655825122417200b012c160a09">[email protected]</a>_top[JJ];inc(IJ3);inc(II);
     with wArTypMat_end_top_w[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm6:=II;NTypChs1:=3;StrN:=2326;mEd:=true;Lev:=1;end;P6;ArP6[IJ6]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="053845724477517c75486471">[email protected]</a>_end_top_w[JJ];inc(IJ6);inc(II);
     with wArTypMat_end_bot_w[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm6:=II;NTypChs1:=3;StrN:=2327;mEd:=true;Lev:=1;end;P6;ArP6[IJ6]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="5964192e182b0d202914382d">[email protected]</a>_end_bot_w[JJ];inc(IJ6);inc(II);
     with wArNst_top_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2332;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="f3ceb384b281bd8087">[email protected]</a>_top_isol[JJ];inc(IJ3);inc(II);
     with wArNst_bot_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2333;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="8cb1ccfbcdfec2fff8">[email protected]</a>_bot_isol[JJ];inc(IJ3);inc(II);
     with wArSh_top_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2334;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="546914231526073c">[email protected]</a>_top_isol[JJ];inc(IJ3);inc(II);
     with wArSh_bot_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2335;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="c8f588bf89ba9ba0">[email protected]</a>_bot_isol[JJ];inc(IJ3);inc(II);
     with wArRad_top_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2336;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="a499e4d3e5d6f6c5c0">[email protected]</a>_top_isol[JJ];inc(IJ3);inc(II);
     with wArRad_bot_isol[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2337;mEd:=true;NPos:=2;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="4b760b3c0a39192a2f">[email protected]</a>_bot_isol[JJ];inc(IJ3);inc(II);

 //    with wArPriznZakr[JJ] do begin NRow:=1;NTab:=II_Tabl+6; Itm3:=II; StrN:=2338;mEd:=true;NPos:=0;Lev:=1;end;P3;ArP3[IJ3]:<a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="102d506751624062796a7e4a717b62">[email protected]</a>[JJ];inc(IJ3);inc(II);
     //....
    end;

Просто говно. Кусок одного из вложенных циклов

Запостил: guest guest, (Updated )

Комментарии (33) RSS

  • anmiles:
    какой пейзаж.... матрицаааа.... ааа... 🙂
    Ответить
  • Vatson01:
    o_0
    первый раз попал на сайт...
    я в шоке, неужели такое бывает...
    Ответить
  • гость:
    Жесть.
    Что за воспаленный мозг мог родить такое?
    Ответить
  • ROFL:
    мдя ... пляяяяя..... он сам понимает что написал?
    Ответить
  • Xanes:
    Ппц, такое впечатление что я сижу не дома за компом и читаю быдло код, а на лекции по программухе в универе:)
    Ответить
  • Армитаж:
    Надо же, там ещё закомментированы неправильные строчки.
    Ответить
  • Сан Саныч:
    Такое ощущение, что руки у автора растут даже не из жопы, а откуда-то глубже, может, из кишечника...
    Ответить
  • Наблюдатель:
    Дайте глянуть весь исходник)
    Уж больно интересный.
    Ответить
  • 2 Наблюдатель

    Думаю, остальной исходник в таком же духе написан.
    Ответить
  • Наверняка обыкновенный обфускатор поработал. Это и есть его работа - превращать код в гавно.
    Смешно читать каменты.
    Ответить
  • Мой мозг испугался и вывалился из головы....
    это не просто говно, ЭТО МЕГА ГОВНО!
    и хватило же у этого пня терпения чтоб всё это сотворить...
    я буду повторять это вечно:
    while true do
    Say('МЕГА ГОВНО!!!');
    Ответить
  • тут же можно просто вложить операторы with!!!
    Ответить
  • Жутко плачевно ((((. Но я кажется знаю в чем дело.

    Автор этой мути не программер. Это какой-нибудь аспирант или КТН в технической, но не IT-шной специальности, которому понадобилось в своей научной работе выполнить расчеты каких-нибудь охеренно навороченных динамических систем. Как-то даже и язык не поворачивается обкладывать его изощренными убивающими эпитетами, большой вины его в этом безобразии нет.

    Автора жалко, какую гигантскую работу ему пришлось проделать за отсутствием навыков в программировании. А еще все это отладить!, а потом юзать!, сопровождать!, дополнительным функционалом обвешивать!

    В свое время ему преподавали в институте на первом курсе Турбо-Паскаль и было это где-нибудь в далеком 90-95 году. Потом, где-то уже году в 2000-м он перешел на более современную и очень популярную технологию Дельфи, и это было большим прорывом, казалось даже чуть-ли не подвигом.

    Все вместе это ПИЗДЕЦ!!!

    Нет, это даже не просто ПИЗДЕЦ. Это ПОЛНЕЙШИЙ ТОТАЛЬНЫЙ ВСЕОБЪЕМЛЮЩИЙ ВСЕЛЕНСКИЙ ПИЗДЕЦ!!!!!
    И так ведь пишет громадное число научных сотрудников во всех технических специальностях на необъятных просторах нашей необъятной страны ((((((.

    Хочется плакать.

    А код, конечно же, полное говнище.
    Ответить
    • поддерживаю. всё просто и понятно, я физик и тут идёт простейший расчёт.
      Ответить
      • красава! усидчивый. если еще кодестайл добавить, то конфетка б вышла!
        Ответить
  • вот, тарасег, какое говно позволяют писать дельфовые with
    Ответить
  • это пичально....
    Чем нужно накуриться чтоб такое сотворит? Автор хотябы знает какая тутпеременная, что обознаечет..?
    Ответить
  • имхо это физика (если правильно понял что среди переменных попадаются токи, индуктивности и изоляция). Если так - то говна не вижу, просто расшифровка где-нибудь в РПЗ
    Ответить
  • Хуясе, скалы из копролита o_O
    Вот что ctrl+c ctrl+v животворящие делают.
    Ответить
    • Чего только не наплетёт веретено...

      Тут в качестве препроцессора вполне сгодился бы "PHP":
      <?php foreach($data as $item) { ?>
      with <?=$item['botname']?>[JJ] do begin NRow:=<?=$item['nrow']?>;NTab:=II_Tabl+<?=$item['ntab_offset']?>; Itm<?=$item['index']?>:=II; StrN:=<?=$item['strn']?>;mEd:=<?=$item['med']?>;NPos:=<?=$item['npos']?>;Lev:=<?=$item['lev']?>;end;P<?=$item['index']?>;ArP<?=$item['index']?>[IJ<?=$item['index']?>]:=@<?=$item['botname']?>[JJ];inc(IJ<?=$item['index']?>);inc(II);
      <?php } ?>
      Ответить

Добавить комментарий

Из-за тебя ушел bormand, guest!

    А не использовать ли нам bbcode?


    8