Форум АСУТП

[+] оффтопик, извините, не удержался :)

Roman_33 писал(а): ↑14 окт 2021, 08:16 Я в АСУ ТП пришел с ЖД (машинист тепловоза/электровоза)

[+]

Ловите анекдот:
Два машиниста едут в кабине поезда, один с тоской смотрит в окно и говорит:
- Всё, Вась, пойду в путейцы работать.
- Нафига???
- А вот посмотри на них. Как ни проезжаем, они все время курят и больше ничего не делают. Работа мечты, че.
Ну, сказано-сделано, уволился он с работы, устроился в путейцы. Там ему выдали кувалду, и он ей машет. Час, второй, третий, четвёртый... На пятый он и говорит:
- Слышь, бригадир, а курить-то когда будем?
- А ща поезд поедет, мы все и покурим...

[+] шутка юмора

Михайло писал(а): ↑06 ноя 2021, 01:49 Ловите анекдот:

Andrey Fo писал(а): ↑13 окт 2021, 12:23 До этого и близко не сталкивался с программированием.

zuben писал(а): ↑06 ноя 2021, 00:54 Есть опыт программирования на VB, VBA.

Nicolayy писал(а): ↑06 ноя 2021, 14:36 Не нужны Вам никакие курсы. Открывайте pdf-ки сименовские по интересующему Вас контроллеру и читайте. Там всё просто и понятно написано.

VADR писал(а): ↑07 ноя 2021, 12:42 Такое решение не нужно нигде.

Roman_33 писал(а): ↑07 ноя 2021, 13:12 Есть такие люди (хипстеры-самокатчики),

[+] старый баян про HELLO WORLD

Эволюция программиста

1. Старший курс школы.
10 PRINT 'HELLO WORLD'
20 END

2. Младший курс института.
program Hello(input,output)
begin
writeln('Hello World')
end.

3. Старший курс института.
(defun hello
(print
(cons' Hello (list 'World))))

4. Молодой специалист.
#include
void main(void)
{
char *message[] = {'Hello ','World'};
int i;
for(i = 0; i < 2; ++i)
printf('%s', message);
printf('
');
}

5. Опытный профессионал.
#include
class string
{ private:
int size;
char *ptr;
public:
string() : size(0), ptr(new char('*')) {}
string(const string &s) : size(s.size)
{
ptr = new char[size + 1];
strcpy(ptr, s.ptr);
}
~string()
{
delete [] ptr;
}
friend ostream &operator << (ostream &, const string &);
string &operator = (const char *);
};
ostream &operator << (ostream &stream, const tring &s)
{
return(stream << s.ptr);
}
string &string::operator = (const char *chrs)
{
if(this != &chr)
{
delete [] ptr;
size = strlen(chrs);
ptr = new char[size + 1];
strcpy(ptr, chr);
}
return(*this);
}
int main()
{
string str;
str = 'Hello World';
cout << str << endl;
return(0);
}

6. Системный администратор.
#include
main()
{ char *tmp;
int i=0;
/*Хапнем побольше*/
tmp = (char *)malloc(1024*sizeof(char));
while (tmp='Hello World'[i++]);
/*Блин, лажанулся*/
i = (int)tmp[8];
tmp[8] = tmp[9];
tmp[9] = (char)i;
printf('%s
',tmp);
}

7. Hачинающий хакер.
#!/usr/local/bin/perl
$msg='Hello, World.
';
if ($#ARGV >= 0)
{
while(defined($arg=shift(@ARGV)))
{
$outfilename = $arg;
open(FILE, '>' . $outfile name) || die 'Can't close $arg:$!
';
}
} else {
print($msg);
}
1;

8. Понаторевший хакер.
#include
#define S 'Hello, World
'
main()
{exit(printf(S)==strlen(S)?0:1);}

9. Закаленный ххакер.
% cc -o a.out
~/src/misc/hw/hw.c
% a.out

10. Хакер-гуру.
% cat
Hello, World.
^D

11. Младший менеджер.
10 PRINT 'HELLO WORLD'
20 END

12. Менеджер среднего уровня.
% mail -s 'Hello, World.'
bob@b12
Боб, не могли бы Вы написать для меня программу 'Hello, World.'?
Она понадобится мне завтра.
^D

13. Старший менеджер.
% zmail jim
Мне нужна программа 'Hello, World.', и немедленно!

14. Президент компании.
% letter
letter: Command not found.
% mail
To: ^X ^F ^C
% help mail
help: Command not found.
% Черт!
!: Event unrecognized.
% logout

[+] в лесу родилась ёлочка в 1С

Процедура Лес()
Ёлочка = СоздатьОбъект("Ёлка");
Пока Ёлочка.Жива()=1 Цикл
Ёлочка.Возраст=Ёлочка.Возраст+1;
Если (ТекущееВремяГода()="Зима") или (ТекущееВремяГода()="Лето") Тогда
Ёлочка.Стройность = 1;
Ёлочка.Цвет = глПолучитьЦвет("Зеленый");
КонецЕсли;

Метель = СоздатьОбъект("Метель");
Метель.ОткрытьФайл("D:\Music\NSYNC - Bye Bye Bye.mp3");
Система.Уснуть(1000);
Метель.Воспроизвести();

Мороз = СоздатьОбъект("Мороз");
Мороз.Укутать(Ёлочка);
Если Ёлочка.Замерзла()=1 Тогда
Ёлочка.Жива(0);
Возврат;
КонецЕсли;

Заяц = СоздатьОбъект("Заяц");
Заяц.Трусливый = 1;
Заяц.Цвет = глПолучитьЦвет("Серый");
ЛК = Ёлочка.ЛеваяКоордината;
ВК = Ёлочка.ВерхняяКоордината;
Пока 1=1 Цикл
Заяц.ЛеваяКоордината = ЛК;
ЛК=ЛК+1;
Заяц.НижняяКоордината = ВК + Окр(abs(sin(ЛК*pi/180)*10));
КонецЦикла;

КомандаСистемы("wolf3d.exe /evil");

СкопироватьВБуфер(Ёлочка);
Праздник = СоздатьОбъект("Праздник");
ВставитьИзБуфера(Ёлочка, Праздник);
Ёлочка.ЗагрузитьСкинИзФайла("нарядная.jpg");
Дети = СоздатьОбъект("Дети");
Для й=1 По Ёлочка.Радость.РазмерСписка() Цикл
Дети.Настроение=Дети.Настроение+Ёлочка.Радость.ПолучитьЗначение(й);
КонецЦикла;
КонецЦикла;
КонецПроцедуры //Лес()

Jackson писал(а): ↑07 ноя 2021, 22:08 Эволюция программиста

VADR писал(а): ↑06 ноя 2021, 14:49 В этом всём зачем-то сделан цикл с косвенной адресацией для опроса входов

keysansa писал(а): ↑07 ноя 2021, 22:47 Комментарии отсутствуют на протяжении всего развития..

/*Хапнем побольше*/
tmp = (char *)malloc(1024*sizeof(char));
while (tmp='Hello World'[i++]);
/*Блин, лажанулся*/

stesl писал(а): ↑08 ноя 2021, 14:55 Так удобней ) Это я делал )))

VADR писал(а): ↑08 ноя 2021, 15:55 один NORM_X и один SCALE_X

VADR писал(а): ↑09 ноя 2021, 08:23 Три минуты поиска в TIA Portal. Всё это лежит в "Basic Instructions"

VADR писал(а): ↑07 ноя 2021, 12:42

Nicolayy писал(а): ↑06 ноя 2021, 14:36 Не нужны Вам никакие курсы. Открывайте pdf-ки сименовские по интересующему Вас контроллеру и читайте

Ой, не-не

Nicolayy писал(а): ↑09 ноя 2021, 12:37 Стоп-стоп. Секундочку! А как же:

VADR писал(а): ↑09 ноя 2021, 08:23 Три минуты поиска в TIA Portal. Всё это лежит в "Basic Instructions". Исходные данные для поиска - предположение "где-то что-то такое точно должно быть" :)

Nicolayy писал(а): ↑08 ноя 2021, 08:47 Jackson, директива #include с неправильным синтаксисом в этих забавных примерах превратила неплохую шутку в невежество.

stesl писал(а): ↑08 ноя 2021, 14:55 Сисадмин знает, что такое эксплуатация )