Форум РИИ: Программирование - Форум РИИ

Перейти к содержимому

  • (5 Страниц)
  • +
  • 1
  • 2
  • 3
  • 4
  • 5
  • Вы не можете создать новую тему
  • Вы не можете ответить в тему

Программирование Для всех желающих поделиться опытом в программирование

#41 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 02 Август 2006 - 00:24

Просмотр сообщения_den_ (31.7.2006, 12:01):

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

чтобы О(1) получилось - практически! да ещё и с одним стеком! да ещё и чтобы без предварительных преобразований.

а сам понимаешь, что пишешь? нужно организовать вычисления изменчивой ирархической структуры, за одну константную последовательность действий? Утрируя можно сказать за один цыкл?

молодой человек, я конечно знаю, что теорий много, и что любые паралельные линии пересекаются и что в результате 2*2 можно получить 5, но чтобы так... это уже слишком.

сужу по строго ламерским понятиям, т. е. своим собственным! Если вы предоставите вариант, не в exe а в коде, тогда соглашусь с полным не пониманием основ программирования! (Уйду в монастырь!)


Напрасно ты используешь слова, смысл которых тебе не понятен. И математику плохо знаешь, иначе бы не удивлялся бы так.
Тебя устроит код на QuickBasic'е?
У меня нет времени переписывать на что-то более понятное.
Via ass to stars!!!
0

#42 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 03 Август 2006 - 23:42

Вот код:

Функция представляет собой логическое (булевое) выражение. Может включать 4 операции - AND, XOR, OR и NOT, а также скобки ()
Oper% - целая переменная каждый бит, которой соответствует значению переменной. Максимум допускается в выражении 32 переменные.

FUNCTION CalcFunc% (F$, Oper%)
F% = LEN(F$)
DO
Z% = Z% + 1
S$ = MID$(F$, Z%, 1)
IF Z% < F% THEN
S1$ = MID$(F$, Z% + 1, 1)
END IF
R% = ASC(S$)
SELECT CASE R%
CASE 65 TO 90 'ЋЇҐа ­¤ ў б⥪!
IF (Oper% AND 2 ^ (R% - 65)) <> 0 THEN
B$ = B$ + CHR$(1)
ELSE
B$ = B$ + CHR$(0)
END IF
GOSUB Analiz
CASE 41 ')
A$ = LEFT$(A$, LEN(A$) - 1)
GOSUB Analiz
CASE ELSE 'ЋЇҐа жЁо ў б⥪!
A$ = A$ + S$
END SELECT
LOOP WHILE Z% < F%
CalcFunc% = ASC(B$)
EXIT FUNCTION
Analiz:
IF LEN(A$) > 0 THEN
K$ = RIGHT$(A$, 1) '?§ў«ҐЄ Ґ¬ Ё§ б⥪  ®зҐаҐ¤­го ®ЇҐа жЁо.
SELECT CASE K$
CASE CHR$(1) 'ЋваЁж ­ЁҐ
MET:
S$ = RIGHT$(B$, 1) '?§ў«ҐЄ Ґ¬ ®¤Ё­ ®ЇҐа ­¤ Ё§ б⥪ .
R% = 2 + NOT (ASC(S$))
GOSUB PR1
IF RIGHT$(A$, 1) = "!" THEN GOTO MET
IF S1$ <> CHR$(2) THEN GOTO Analiz
CASE CHR$(2) '“¬­®¦Ґ­ЁҐ
GOSUB PR0
R% = A% AND B%
GOSUB PR1
GOTO Analiz
CASE CHR$(4) '‘«®¦Ґ­ЁҐ
IF S1$ <> CHR$(2) AND S1$ <> CHR$(3) THEN
GOSUB PR0
R% = A% OR B%
GOSUB PR1
END IF
CASE CHR$(3) 'XOR
IF S1$ <> CHR$(2) THEN
GOSUB PR0
R% = A% XOR B%
GOSUB PR1
GOTO Analiz
END IF
END SELECT
END IF
RETURN
PR0:
A% = ASC(RIGHT$(B$, 1)) '?§ў«ҐЄ Ґ¬ ЇҐаўл© ®ЇҐа ­¤ Ё§ б⥪ 
B$ = LEFT$(B$, LEN(B$) - 1) 'Ї®«­®бвмо.
B% = ASC(RIGHT$(B$, 1)) 'Џ®«гз Ґ¬ ўв®а®© ®ЇҐа ­¤.
RETURN
PR1:
MID$(B$, LEN(B$), 1) = CHR$(R%) 'ђҐ§г«мв в § ЇЁблў Ґ¬ ®Ўа в­® ў б⥪.
A$ = LEFT$(A$, LEN(A$) - 1) '“¤ «пҐ¬ ®ЇҐа жЁо.
RETURN
END FUNCTION
Via ass to stars!!!
0

#43 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 07 Август 2006 - 09:47

Опять знакомые все лица!!!
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#44 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 07 Август 2006 - 23:54

Просмотр сообщенияAlex A. Dolgow (7.8.2006, 9:47):

Опять знакомые все лица!!!


Ну а кого ещё тут увидишь?
Via ass to stars!!!
0

#45 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 08 Август 2006 - 08:57

Просмотр сообщенияАлхимик (7.8.2006, 17:54):

Ну а кого ещё тут увидишь?


Я вот смотрю - а шизод то умный чел! Молоток...
Ты мне вот скажи - у тебя есть какой-нить путний упаковщик программ?
А то эти бешеные проекты скомпиленные под винду стока весят - аж за судьбу страшно?
Вот мне нужен какой-нить виндовый упаковщик программ!
(желательно с документацией)

Просмотр сообщения_den_ (17.7.2006, 16:45):

Как можно использовать в Delphi Каз яз? Вместо букв пишет "?"!


Всё забываю тебе сказать - что к Дельфям пока каз. язык не прикручивается!
По крайней мере по 7 включительно.
Попробуй 2005 - может там получится.
Или купи последний и лецензионнный драйвер каз.яз. (именно с лицензией).
Тогда получится - но вопросики исчезнут тока после компиляции и то уже в готовом экзешнике.
А так сам Дельфи таких шрифтов (НЕ ОЧ. СТАНДАРТНЫХ) не понимает и не поймёт.
Боюсь в Борланде и не знают про такую страну Казахстан!!!
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#46 Пользователь офлайн   _den_ Иконка

  • Пользователь
  • PipPip
  • Группа: Пользователи
  • Сообщений: 31
  • Регистрация: 23 Декабрь 05

Отправлено 08 Август 2006 - 13:57

Тяжело код написан, посмотрю дома, а пока напиши, тоже самое, но для знаков +, -, *, / у операций нет приоритета, а надо был сделать... обещал!
0

#47 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 08 Август 2006 - 23:38

Просмотр сообщения_den_ (8.8.2006, 13:57):

Тяжело код написан, посмотрю дома, а пока напиши, тоже самое, но для знаков +, -, *, / у операций нет приоритета, а надо был сделать... обещал!


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

К стати общая теория соответствующая разбору формул назывется - "Конечные автоматы".

Суть разбора выражения любой сложности (например, какой-нибудь прграммы на С++) заключается в том, что каждая операция переводит автомат в одно из состояний (которых естественно конечное число).
Via ass to stars!!!
0

#48 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 09 Август 2006 - 08:55

Алё, товарищи, так что - ни у кого нет упаковщика ЕХЕ файлов???
:(
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#49 Пользователь офлайн   _den_ Иконка

  • Пользователь
  • PipPip
  • Группа: Пользователи
  • Сообщений: 31
  • Регистрация: 23 Декабрь 05

Отправлено 09 Август 2006 - 15:57

А я что против был конечных автоматов?

Укажи приоритеты, какая из булевых операций имеет приоритет? (например умножение нужно выполнить в первую очередь) где у тебя такое же?

И кто тебя так учил код писать? Использование функций, goto переходов, и встроенных функций? (все это перемешать)
0

#50 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 13 Август 2006 - 00:01

Просмотр сообщения_den_ (9.8.2006, 15:57):

А я что против был конечных автоматов?

Укажи приоритеты, какая из булевых операций имеет приоритет? (например умножение нужно выполнить в первую очередь) где у тебя такое же?

И кто тебя так учил код писать? Использование функций, goto переходов, и встроенных функций? (все это перемешать)


Ну так это язык такой. Там без goto длиннее было бы кажеться. Хотя я уже не помню.
А приоритеты определяет сама внутренняя структура автомата, т.е. программа.

Просмотр сообщенияAlex A. Dolgow (9.8.2006, 8:55):

Алё, товарищи, так что - ни у кого нет упаковщика ЕХЕ файлов???
:(


Не поверишь. В MS Visual Studio 2005 есть для Framework'ских прог. Устроит?
Via ass to stars!!!
0

#51 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 14 Август 2006 - 09:01

Просмотр сообщенияАлхимик (12.8.2006, 18:01):

Не поверишь. В MS Visual Studio 2005 есть для Framework''ских прог. Устроит?


Неа! У меня домашний комп не переварит MSVS 2005! Что нить другое надо!
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#52 Пользователь офлайн   Baltazar Иконка

  • Пользователь
  • PipPip
  • Перейти к галерее
  • Группа: Пользователи
  • Сообщений: 36
  • Регистрация: 18 Октябрь 05

Отправлено 14 Август 2006 - 13:51

Просмотр сообщенияAlex A. Dolgow (14.8.2006, 9:01):

Неа! У меня домашний комп не переварит MSVS 2005! Что нить другое надо!

Есть прога ASP Pack. крутой упаковщик exe-файлов. она много не хавает. сжимает файлы конкретно. :thumbup:
Если человек утверждает, что он знает всё - этот человек ничего не знает. (Тибетская мудрость)
0

#53 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 14 Август 2006 - 23:18

Просмотр сообщенияBaltazar (14.8.2006, 13:51):

Есть прога ASP Pack. крутой упаковщик exe-файлов. она много не хавает. сжимает файлы конкретно. :thumbup:


Какой размер?
Via ass to stars!!!
0

#54 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 15 Август 2006 - 09:00

Отправляй мне на мыло!
Буду благодарен? Тока сразу скажи -какие встроенные глюки она имеет?
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#55 Пользователь офлайн   Baltazar Иконка

  • Пользователь
  • PipPip
  • Перейти к галерее
  • Группа: Пользователи
  • Сообщений: 36
  • Регистрация: 18 Октябрь 05

Отправлено 15 Август 2006 - 12:32

Просмотр сообщенияAlex A. Dolgow (15.8.2006, 9:00):

Отправляй мне на мыло!
Буду благодарен? Тока сразу скажи -какие встроенные глюки она имеет?


В том то и дело что не имеет. Её часто используют для того, чтобы устанавливать вирусы на комп. её антивирь не видит. принесу и скину тебе на мыло. :thumbup: :dance3:
Если человек утверждает, что он знает всё - этот человек ничего не знает. (Тибетская мудрость)
0

#56 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 15 Август 2006 - 23:35

А зачем тебе вообще упаковщик то нужен? Неужели такие проги раздутые пошли уже?!
Via ass to stars!!!
0

#57 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 16 Август 2006 - 08:52

Просмотр сообщенияАлхимик (15.8.2006, 17:35):

А зачем тебе вообще упаковщик то нужен? Неужели такие проги раздутые пошли уже?!


Угу - меня пугают екзешники размером больше 4 МБ!
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#58 Пользователь офлайн   Baltazar Иконка

  • Пользователь
  • PipPip
  • Перейти к галерее
  • Группа: Пользователи
  • Сообщений: 36
  • Регистрация: 18 Октябрь 05

Отправлено 16 Август 2006 - 15:50

Просмотр сообщенияAlex A. Dolgow (16.8.2006, 8:52):

Угу - меня пугают екзешники размером больше 4 МБ!


Так ты займись оптимизацией своего кода. поменьше используй сторонних компонентов.
Попробуй написать часть кода на asm. Мне блин тебя в этом не учить.
:declare:
Если человек утверждает, что он знает всё - этот человек ничего не знает. (Тибетская мудрость)
0

#59 Пользователь офлайн   Alex A. Dolgow Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 514
  • Регистрация: 10 Сентябрь 05

Отправлено 17 Август 2006 - 09:10

Ты, блин, не выпендривайся!
Код у меня относительно оптимален! Просто прога очень большая!
К тому же тащит много библиотек и компонентов!
(такой размер - это в данном случае приколы компилятора под Винду!)
Поэтому если ты сам напишешь более-менее серьёзную прогу и уложишься в 1 МБ, я те руку пожму!
А пока не пантуйся!
Лучше обжималку вышли!
http://crazy-planets.narod.ru :cайт мото-клуба "Crazy Planets"
Изображение
0

#60 Пользователь офлайн   Алхимик Иконка

  • Завсегдатай
  • PipPipPip
  • Группа: Пользователи
  • Сообщений: 383
  • Регистрация: 13 Июнь 06

Отправлено 17 Август 2006 - 23:59

Просмотр сообщенияAlex A. Dolgow (17.8.2006, 9:10):

Ты, блин, не выпендривайся!
Код у меня относительно оптимален! Просто прога очень большая!
К тому же тащит много библиотек и компонентов!
(такой размер - это в данном случае приколы компилятора под Винду!)
Поэтому если ты сам напишешь более-менее серьёзную прогу и уложишься в 1 МБ, я те руку пожму!
А пока не пантуйся!
Лучше обжималку вышли!


Смени компилятор. Моя прога тоже нехилая. Ничего зато не тащит и занимает (пока) вместе с со всеми DLL'ками 900 с копейками кбайт. Новое выжел студио оказывается не такое уж и хреновое (но очень бедное компонентами, готового очень мало).
Via ass to stars!!!
0

  • (5 Страниц)
  • +
  • 1
  • 2
  • 3
  • 4
  • 5
  • Вы не можете создать новую тему
  • Вы не можете ответить в тему

1 человек читают эту тему
0 пользователей, 1 гостей, 0 скрытых пользователей