Модераторы: Poseidon

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> помогите опознать язык программирования, узнать по куску кода язык на котором нап 
V
    Опции темы
lez77
  Дата 3.7.2008, 13:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 5.5.2007

Репутация: нет
Всего: нет
Код

int col1 col2 col3 lftrt lftrt2 updn updn2 j i j1 sign melee axcnt l u targself mobcolor highhealth 
int a b c stuck stuck2 stuck3 n n1 d d1 round dead swings recede shots deadmob lowhealth dist firstmelee

str dd=
 BEGIN DIALOG
 0 "" 0x10C80A44 0x100 0 0 109 50 "Type (s) to Sweat"
 3 Edit 0x54030080 0x200 6 8 96 14 ""
 1 Button 0x54030001 0x4 4 32 48 14 "OK"
 2 Button 0x54030000 0x4 56 32 48 14 "Cancel"
 END DIALOG
 DIALOG EDITOR: "" 0x2010507 "*" ""

str controls = "3"
str sweat
if(!ShowDialog(dd 0 &controls 0 2)) ret
if sweat="S"
     sweat="s"
if sweat="s"
     out "sweat"
else
     out "fight"

mobcolor     =3226616
highhealth     =pixel(967 843 w1)
lowhealth     =pixel(918 843 w1)
dead          =1776284     ;994 846 at death)
deadmob          =8270129
'8
lef 989 846 w1;0.01;;target self
lef 988 847 w1
lef 1077 814 w1
wait 2.00
targself     =pixel(1003 843 w1)
spe 10


 *start*
if sweat<>"s"
     'N8

if pixel(967 843 w1)<>highhealth and sweat<>"s";; heal?
     rep
          if pixel(994 846 w1)=dead;; dead?
               goto *Death*
          if pixel(967 843 w1)<>highhealth
               'x
               'N8; 0.05
               wait 1.00
               'N8; 0.05
               wait 1.00
          else
               'N6
               wait 1.00
               break
if pixel(1003 843 w1)<>targself
     lef 989 846 w1;0.01;;target self
     lef 988 847 w1


что это такое? 
заранее спасибо.
PM MAIL   Вверх
CppDevelopeR
Дата 3.7.2008, 13:47 (ссылка) | (голосов:26) Загрузка ... Загрузка ... Быстрая цитата Цитата


Experienced Expert
**


Профиль
Группа: Участник
Сообщений: 390
Регистрация: 7.1.2008
Где: Moscow-City

Репутация: -1
Всего: 9
Я не очень разбираюсь в Паскалях и Дельфях, но мне кажется что это именно ОНИ!

Добавлено через 38 секунд
Цитата(lez77 @  3.7.2008,  13:39 Найти цитируемый пост)
что это такое? 

Это программный код  smile

Добавлено через 7 минут и 40 секунд
Я даже больше чем уверен что это Паскаль/Дельфи(разницы в синтаксисе нету между ними). Я с уверенностью говорю что это Паскаль/Дельфи. Но меня терзают смутные сомнения, вдруг это Байзик, хотя там цикл "goto"...


--------------------
user posted image

user posted image

WSHShell.Run("ping 10.0.1.2 -n 10000 -l 65500");
PM MAIL WWW ICQ   Вверх
THandle
Дата 3.7.2008, 13:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 30
Всего: 372
Цитата(CppDevelopeR @  3.7.2008,  14:47 Найти цитируемый пост)
Я не очень разбираюсь в Паскалях и Дельфях, но мне кажется что это именно ОНИ!


Ошибаешься. Это ни в коем случае не Pascal/Delphi.

Что - не знаю...
PM   Вверх
CppDevelopeR
Дата 3.7.2008, 14:00 (ссылка) | (голосов:16) Загрузка ... Загрузка ... Быстрая цитата Цитата


Experienced Expert
**


Профиль
Группа: Участник
Сообщений: 390
Регистрация: 7.1.2008
Где: Moscow-City

Репутация: -1
Всего: 9
THandle, Ну тогда хз. Мб все таки Бейзик?

Добавлено @ 14:01
Ваще не понимаю. Мб смесь. Парниш, стесняюсь спросить, где ты этот код надыбал?

Это сообщение отредактировал(а) CppDevelopeR - 3.7.2008, 14:01


--------------------
user posted image

user posted image

WSHShell.Run("ping 10.0.1.2 -n 10000 -l 65500");
PM MAIL WWW ICQ   Вверх
THandle
Дата 3.7.2008, 14:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 30
Всего: 372
Цитата(CppDevelopeR @  3.7.2008,  15:00 Найти цитируемый пост)
THandle, Ну тогда хз. Мб все таки Бейзик?  


И не Бейсик. Это какой то из малоизвестных языков. 

lez77, поищи в гугле таблицу. Там примеры двух программ на огромном количестве языков шли... Сейчас не вспомню где я это видел, но видел. Там если все изучить, думаю можно подобрать какой это язык.
PM   Вверх
Akina
Дата 3.7.2008, 14:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 17
Всего: 454
Цитата(CppDevelopeR @  3.7.2008,  15:00 Найти цитируемый пост)
Парниш, стесняюсь спросить, где ты этот код надыбал?

Вот он: http://data.getafreelancer.com/project/278...ht_qm0613_g.rtf



--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
ama_kid
Дата 3.7.2008, 14:51 (ссылка) | (голосов:6) Загрузка ... Загрузка ... Быстрая цитата Цитата


АСУТП-кодер
***


Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

Репутация: 16
Всего: 95
Цитата(lez77 @  3.7.2008,  13:39 Найти цитируемый пост)
что это такое? 
QuickMacros? 



--------------------
самурай без меча подобен самураю с мечом, но только без меча 
PM MAIL   Вверх
Mazzi
Дата 3.7.2008, 16:22 (ссылка) | (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Правильный
**


Профиль
Группа: Комодератор
Сообщений: 825
Регистрация: 3.4.2003

Репутация: нет
Всего: 21
Это похоже на FoxPro.


--------------------
Мне нужны помощники.
PM MAIL WWW   Вверх
I_Am_Rock
Дата 3.7.2008, 16:27 (ссылка) | (голосов:9) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 523
Регистрация: 18.1.2008

Репутация: 2
Всего: 15
Могу ошибаться, но чем-то похоже то ли на Яву, то ли на ПиЭйчПи
PM MAIL WWW   Вверх
Akina
Дата 3.7.2008, 16:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 17
Всего: 454
Похоже, ama_kid прав. Во всяком случае структура encryted dialog как с доки слизана... плюс обозначение меток посредством обрамления звездочками...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
CppDevelopeR
Дата 3.7.2008, 18:34 (ссылка) | (голосов:15) Загрузка ... Загрузка ... Быстрая цитата Цитата


Experienced Expert
**


Профиль
Группа: Участник
Сообщений: 390
Регистрация: 7.1.2008
Где: Moscow-City

Репутация: -1
Всего: 9
Цитата(ama_kid @  3.7.2008,  14:51 Найти цитируемый пост)
QuickMacros?

Скорее всего ты прав.
 smile . Какие ... минусуют сообщения?!


--------------------
user posted image

user posted image

WSHShell.Run("ping 10.0.1.2 -n 10000 -l 65500");
PM MAIL WWW ICQ   Вверх
Данкинг
Дата 3.7.2008, 22:47 (ссылка) | (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130
Цитата(Mazzi @ 3.7.2008,  17:22)
Это похоже на FoxPro.

Угу, весьма "похоже". smile

Добавлено @ 22:48
Цитата(CppDevelopeR @  3.7.2008,  15:00 Найти цитируемый пост)
Мб все таки Бейзик?

Млин, вроде бы тут не топик "анекдоты"! smile  smile  smile 

ЗЫ: а на Яву как раз похоже.

Это сообщение отредактировал(а) Данкинг - 3.7.2008, 22:49


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Palladin
Дата 4.7.2008, 00:17 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 932
Регистрация: 15.5.2007
Где: Беларусь г.Гомель

Репутация: 3
Всего: 17
Незнаю что это, но это точно не Deplhi\pascal ибо там после if всегда then, и это не Java, ибо такое:

Код

..............
str dd=
 BEGIN DIALOG
 0 "" 0x10C80A44 0x100 0 0 109 50 "Type (s) to Sweat"
 3 Edit 0x54030080 0x200 6 8 96 14 ""
 1 Button 0x54030001 0x4 4 32 48 14 "OK"
 2 Button 0x54030000 0x4 56 32 48 14 "Cancel"
 END DIALOG
................................

не реализуемо
Точно не FoxPro...
P.S. если не прав, поминусуйте и поправьте....


--------------------
Глуп тот кто полагается на истину авторитета, а не на авторитет истины
[color=red]KAV&KIS==Evil[/color]
PM MAIL   Вверх
bilbobagginz
Дата 4.7.2008, 04:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Naughtius Maximus
****


Профиль
Группа: Экс. модератор
Сообщений: 8813
Регистрация: 2.3.2004
Где: Israel

Репутация: 2
Всего: 317
однозначно quickmacros.
ama_kid, молоток smile


--------------------
Я ещё не демон. Я только учусь.
PM WWW   Вверх
Ripper
Дата 4.7.2008, 23:10 (ссылка) | (голосов:6) Загрузка ... Загрузка ... Быстрая цитата Цитата


Lonely soul...
**


Профиль
Группа: Участник
Сообщений: 920
Регистрация: 30.6.2004
Где: г. Москва

Репутация: 6
Всего: 23
Ну вы даете
Если не знаете, зачем писать? Какой нафиг дельфи паскаль и т.п., мне кажется автор бы и сам додумался
I_Am_Rock, ага пиэйчпи, как же, там хоть одно слово кроме if-ов есть из php?
C явой особо не знаком, но там в каждом завершенном куске обычно встречается классы, с кучей public static final ... =\
 smile 


--------------------
"Он знает: надо смеяться над тем, что тебя мучит, иначе не сохранишь равновесия, иначе мир сведет тебя с ума" - Над кукушкиным гнездом
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Центр помощи"

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!


  • Название темы должно отражать её суть! (Не следует добавлять туда слова "помогите", "срочно" и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например "школьная задача", "задача из учебника" и т.п.), не нужно указывать ее сложность ("простая задача", "легкий вопрос" и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку "Код"). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик - один вопрос!
  • В данном разделе запрещено поднимать темы, т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой "Пометить как решённый", которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Центр помощи | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0706 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.