Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Песочница > Телепаты

Автор: Olegan 7.10.2008, 10:28

Вот блин как возникают какие-нибудь траблы дык их днем с огнем не найдешь.

Куда не пойди так они все время в отпусках. Постоянно. smile

Ищешь их по всей сети, зовешь, а напарываешься на одну и ту же табличку...

Цитата

Телепаты в отпуске!

Да когда же они блин из отпусков то придут? smile

Хватит отдыхать. Пора работать! smile

Я требую досрочного прекращения отпуска телепатов и их немедленного выхода на работу!
Кто со мной? Прошу поднять руки (если руки заняты, можно поднять че-нить другое smile

Автор: vinter 7.10.2008, 10:29

я вышел из отпуска

Автор: Olegan 7.10.2008, 10:47

Цитата(vinter @ 7.10.2008, 10:29

)

я вышел из отпуска

О, ну хоть один нашелся! smile

Короче у мну такая проблема. Есть у мну одна штука, дык когда я ее подключаю, то она не работает.

Че с ней делать? smile

Автор: sTa1kEr 7.10.2008, 11:00

Цитата(Olegan @ 7.10.2008, 11:47

)

Че с ней делать?

Может покормить ее?

Автор: ТоляМБА 7.10.2008, 11:06

Цитата(Olegan @ 7.10.2008, 13:47

)

Есть у мну одна штука, дык когда я ее подключаю, то она не работает.

Нафиг-нафиг, срочна в отпуск!!!

Автор: Olegan 7.10.2008, 11:18

Цитата(ТоляМБА @ 7.10.2008, 11:06

)

Нафиг-нафиг, срочна в отпуск!!!

Нет, стоп. Куда? smile

Выход в Астрал за мой счет гарантирую. smile

Добавлено через 2 минуты и 14 секунд

Цитата(sTa1kEr @ 7.10.2008, 11:00

)

Может покормить ее?

Дык ничего не жрет, собака! smile

Автор: vinter 7.10.2008, 12:01

Цитата(Olegan @ 7.10.2008, 12:18

)

Дык ничего не жрет, собака!

так, все таки мы выяснили, что

Цитата(Olegan @ 7.10.2008, 11:47

)

Есть у мну одна штука

это собака.
Теперь про подключение: необходимо иметь еще одно устройство типа собака, а точнее, типа сука. Подключение происходит путем ввода штекера твоего устройства в разьем "суки".
Можно конечно подключить твой объект к подобному, но вообще то разъем твоего объекта предназначен для других целей.
Так же можно попробовать подключить объект в самого себя, но это черевато поломкой.
Незачто.
Пометь тему решенной.
В правом верхнем углу кнопочка такая есть.
Молодец.

Автор: Olegan 7.10.2008, 12:21

Цитата(vinter @ 7.10.2008, 12:01

)

это собака.

А вот и не собака smile

Автор: vinter 7.10.2008, 12:24

Olegan, ты пытаешься меня обмануть, мне лучше знать. Я телепат smile

Автор: mrbrooks 7.10.2008, 12:25

Olegan, выложи код.

Автор: ТоляМБА 7.10.2008, 12:28

http://dog-dogi.narod.ru/anatomy.htm

Автор: Данкинг 7.10.2008, 12:36

Цитата(Olegan @ 7.10.2008, 11:47

)

дык когда я ее подключаю, то она не работает

А ты её не подключай, тогда должна работать.

Автор: sTa1kEr 7.10.2008, 12:54

Запустите nosmoke.bat

Автор: mrbrooks 7.10.2008, 12:56

пока не выложат код телепатировать не буду

Автор: redona 7.10.2008, 13:08

Цитата(mrbrooks @ 7.10.2008, 12:56

)

пока не выложат код телепатировать не буду

кот есть, ТоляМБА сойдет?
Тока это выкладывай его сам, а то он упираццо будет...

Автор: Olegan 7.10.2008, 13:19

Цитата(vinter @ 7.10.2008, 12:24

)

Olegan, ты пытаешься меня обмануть, мне лучше знать. Я телепат

ПО в комплекте с собаками не поставляется. smile

Цитата(sTa1kEr @ 7.10.2008, 12:54

)

Запустите nosmoke.bat

Цитата(mrbrooks @ 7.10.2008, 12:56

)

пока не выложат код телепатировать не буду

Код


unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Buttons, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    BitBtn1: TBitBtn;
    Button4: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Данное устройство не подключается. Код ошибки  Runtime error 203 at 1C1B:14F6');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShowMessage('Данное устройство ненуждается в кормлении.');
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  ShowMessage('Данное устройство не может работать без подключения.');
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
  ShowMessage('Файл nosmoke.bat не найден.');
end;

end.

Вот исходник ПО из комплекта к штуке, но разработчик запретил его изменять.

Автор: vinter 7.10.2008, 13:33

Цитата(Olegan @ 7.10.2008, 14:19

)

Код ошибки Runtime error 203 at 1C1B:14F6'

ф http://nigma.ru/index.php?s=1C1B%3A14F6%27&t=web&gl=1&yh=1&ms=1&yn=1&rm=1&av=1&ap=1&nm=1&lang=all
сколько раз уже обсуждали.. Надо в факью добавить

Автор: mrbrooks 7.10.2008, 13:34

выложи на brainfuck'e - а то я не понимаю что ты написал.

Автор: Rickert 7.10.2008, 13:43

Надо спасать отечественных программистов от маразма smile

Автор: Marusja 7.10.2008, 14:04

Цитата(Rickert @ 7.10.2008, 13:43

)

Надо спасать отечественных программистов от маразма

Не, не надо, пусть маразмируют. Чем бы дитя не тешилось, лишь бы не плакало.

Автор: Olegan 7.10.2008, 14:24

Цитата(vinter @ 7.10.2008, 13:33

)

Надо в факью добавить

Куда-куда? smile

Автор: vinter 7.10.2008, 14:26

Цитата(Marusja @ 7.10.2008, 15:04

)

Чем бы дитя не тешилось, лишь бы не плакало.

"лишь бы не какало" думаю будет актуальнее

Цитата(Olegan @ 7.10.2008, 15:24

)

Куда-куда?

в факин материалс smile

Автор: Olegan 7.10.2008, 14:44

Ой,

ну блин, vinter, Ты же телепат, не я...
Давай заходи в Астрал и заставь работать эту штуку. smile

Автор: vinter 7.10.2008, 14:56

по моим данным все работает, а ты пытаешься меня обмануть. Если это продолжится придеться надавить на твой моск, после чего тебя будет тянуть на лягушек smile

Автор: smartov 7.10.2008, 15:11

Цитата(vinter @ 7.10.2008, 14:56

)

после чего тебя будет тянуть на лягушек

фак мой мозг!

Добавлено через 18 секунд
p.s. Это было НЕ руководство к действию! smile

Автор: Olegan 8.10.2008, 13:43

О, работает! smile

Штука работает, она заработала! smile

vinter, +1. smile

Автор: s0lman 8.10.2008, 15:26

smartov, убийцо smile

Добавлено через 6 минут и 50 секунд
smartov, убийцо smile

Автор: Olegan 8.10.2008, 16:54

У меня тут еще одна проблемка нарисовалась.
Короче система тормозит! smile

Автор: ТоляМБА 8.10.2008, 17:00

С ручника снимал?
На вечный цикл проверял?
А на бесконечную рекурсию?
А мышкой дёргал? (кста замечал что все от юзера до одмина при зависании дёргают мышкой smile

)

Автор: Marusja 8.10.2008, 17:03

Цитата(ТоляМБА @ 8.10.2008, 17:00

)

кста замечал что все от юзера до одмина при зависании дёргают мышкой

Это смотря у кого чего зависло, некоторые дергают правым глазом.

Автор: smartov 8.10.2008, 17:40

Цитата(Marusja @ 8.10.2008, 17:03

)

некоторые дергают правым глазом

Да ну?!

Автор: ТоляМБА 8.10.2008, 18:19

Не стал уш создавать тему АНТИтелепаты. smile

Поможем человеку, он ведь всё расписал?

http://forum.vingrad.ru/index.php?showtopic=231399&view=findpost&p=1662505

Код

Sub Поиск()
K = ActiveDocument.Words.Count
ReDim Словарь(1 To K) As V
i = 1
For Each WW In ActiveDocument.Words
    w = LCase(WW)
    If Len(w) > 1 Then
      For j = 1 To i
        If w = Словарь(j).Слово Then Словарь(j).Число = Словарь(j).Число + 1: Exit For
        If "" = Словарь(j).Слово Then Словарь(i).Слово = w: Словарь(i).Число = 1: i = i + 1: Exit For
       Next j
    End If
Next WW
For ПГ = K To 1 Step -1
If Словарь(ПГ).Число <> 0 Then Exit For
Next ПГ
ReDim Preserve Словарь(1 To ПГ)
For M = 1 To 10
Индекс = 1: Макс = Словарь(1).Число
For i = 2 To ПГ
If Словарь(i).Число > Макс Then Индекс = i: Макс = Словарь(i).Число
Next i
S = S & Словарь(Индекс).Слово & " " & Round(Словарь(Индекс).Число / K, 2) & vbCrLf
Словарь(Индекс).Число = 0
Next M
MsgBox S
End Sub

Автор: vinter 8.10.2008, 20:30

Olegan, всегда рад помочь. Теперь со спокойной душой ухожу в отпуск.

Автор: sTa1kEr 8.10.2008, 21:44

Цитата(ТоляМБА @ 8.10.2008, 18:00

)

кста замечал что все от юзера до одмина при зависании дёргают мышкой

Только виндузятники. Линуксоиды же начинают долбить по клавишам smile

Автор: krwlr 8.10.2008, 22:02

Цитата(sTa1kEr @ 8.10.2008, 21:44

)

Линуксоиды же

CTRL+ALT+F1?

Автор: sTa1kEr 8.10.2008, 22:56

krwlr, Alt + SysRq + B smile

Автор: JackYF 8.10.2008, 23:05

Цитата(sTa1kEr @ 8.10.2008, 21:56

)

Alt + SysRq + B

Ты знаешь о Linux!

---
Спасибо за обращение, с вас 50$ за использование услуг телепата.

Автор: Olegan 9.10.2008, 08:27

Цитата(ТоляМБА @ 8.10.2008, 17:00

)

С ручника снимал?
На вечный цикл проверял?
А на бесконечную рекурсию?

неа, это как? smile

Цитата(ТоляМБА @ 8.10.2008, 17:00

)

А мышкой дёргал?

А че такое мышь? smile

Цитата(Marusja @ 8.10.2008, 17:03

)

некоторые дергают правым глазом.

И что помогает? smile

Цитата(vinter @ 8.10.2008, 20:30

)

Olegan, всегда рад помочь. Теперь со спокойной душой ухожу в отпуск.

Ээээ, стоп куда? А как же моя системка? smile

Автор: krwlr 9.10.2008, 12:44

sTa1kEr, нам ребут не нужен, нас и так еб* smile

Цитата(JackYF @ 8.10.2008, 23:05

)

Ты знаешь о Linux!

ты знаешь что он знает о линукс...
так что ...

Цитата(JackYF @ 8.10.2008, 23:05

)

Спасибо за обращение, с вас 50$ за использование услуг телепата.

Автор: JackYF 9.10.2008, 14:10

Цитата(krwlr @ 9.10.2008, 11:44

)

ты знаешь что он знает о линукс...

ты знаешь о моём существовании!

Автор: krwlr 9.10.2008, 14:35

Цитата(JackYF @ 9.10.2008, 14:10

)

ты знаешь о моём существовании!

ты знаешь как задолбать людей!! smile

Автор: JackYF 9.10.2008, 17:43

А то. У меня такой реверсивный опыт smile

Автор: sTa1kEr 9.10.2008, 17:49

krwlr, JackYF, вы слишком много знаете, вас надо убить... ---> http://forum.vingrad.ru/forum/topic-231135.html <---

Автор: Akella 9.10.2008, 22:35

Цитата(Olegan @ 7.10.2008, 10:28

)

если руки заняты, можно поднять че-нить другое

усегда поднято

Добавлено через 1 минуту и 35 секунд

Цитата(Olegan @ 7.10.2008, 11:18

)

Дык ничего не жрет, собака!

а чем кормил? Собак нужно кормить вискасом smile

Автор: ТоляМБА 10.10.2008, 06:22

Цитата(Akella @ 10.10.2008, 01:35

)

кормить вискасом

Опять тему к ТоляМБЕ сводите?! smile

Автор: Olegan 10.10.2008, 08:09

Ну вот, телепаты опять в отпуске. smile

ЗАДОЛБАЛИ!!! smile

Автор: JackYF 10.10.2008, 14:07

Ответственно заявляю - я в отпуск ещё не ушёл smile

Автор: Olegan 10.10.2008, 16:22

Цитата(JackYF @ 10.10.2008, 14:07

)

Ответственно заявляю - я в отпуск ещё не ушёл

Дык как на счет моей системки, виснет блин. smile

Автор: vinter 10.10.2008, 19:28

Olegan, я на твоей проблемы поднял экспириенса и получил левел-ап, сходил в отпуск и теперь помогаю не менее чем 10 людям за раз, так что извиняй, я такими делами больше не занимаюсь.

Автор: Akella 11.10.2008, 00:32

А я вообще спасаю только от ста и больше человек. Тоже извини, не могу smile

Автор: ТоляМБА 11.10.2008, 12:18

Akella, придёт время и ты задумаешься над своими словами...

Автор: sTa1kEr 11.10.2008, 17:12

Цитата(Akella @ 11.10.2008, 01:32

)

А я вообще спасаю только от ста и больше человек.

То что надо! На меня бандиты напали, человек сто, не меньше! Спаси меня от них! smile

Автор: JackYF 12.10.2008, 10:47

Цитата(Olegan @ 10.10.2008, 15:22

)

Дык как на счет моей системки, виснет блин.

Хм, прозреваю, что системка глючит!

Автор: pycha 13.10.2008, 10:53

JackYF, неееа не нее напали бандиты

Добавлено через 24 секунды
человек 100 не меньше

Автор: Akella 16.10.2008, 23:30

http://forum.vingrad.ru/index.php?showtopic=232514&view=findpost&p=1670650
http://forum.vingrad.ru/forum/topic-232361.html

как с такими бороться? smile

Если есть телепаты... милости просим в раздел Firebird, там один пользователь очень требует телепатов smile

Автор: sTa1kEr 17.10.2008, 00:18

Цитата(Akella @ 17.10.2008, 00:30

)

Если есть телепаты... милости просим в раздел Firebird, там один пользователь очень требует телепатов

Все телепаты в отпуске. Зато есть бандиты. 200 человек (мои 100 и 100 pycha), можно попросить их выбить правду, тогда и телепаты не понадобятся smile

Автор: Akella 20.10.2008, 20:56

ну.... тоже вариант smile