Делаю подкраску синтаксиса. Точнее компонент для Дельфи для подкраски любого синтаксиса. Паралельно разработаны шаблоны подсветок наиболее часто встречающихся форматов. Многие подсветки были мной взяты из програм других авторов или кодов для подсветки других синтаксисов. В настоящий момент список сделанных шаблонов составляет более 300 названий... однако есть и проблемы.

1) Во первых нужны маленькие примеры кода для многих шаблонов
2) Во вторых нужны расширения файлов которые используют этот синтаксис
3) Многие из этих языков вообще мне не знакомы, нужно минимально краткое описание языка, чтобы можно было его хотябы классифицировать что за зверь и к чему относится.

Итак, примеры кода и расширения файлов нужны для:
6502
6809
ABB Rapid command
Acknex WDL V3.9
acpi
Action Script
Actionscript-JS
ADEPT Command Language
ADSP21
ahdl
Alpha Script
Ampl
Amtrix
ANSYS Parametric Design
ansys
Apache Web Server
asn.1
aspect
Assembler (2106x)
Assembler (21xx)
assembler (6502)
Assembler (68 000)
Assembler (68HC908)
Assembler (75x)
Assembler (8051)
Assembler (86gnu)
Assembler (8xx)
Assembler (ARM)
Assembler (AVR)
Assembler (C167 v.7.0)
Assembler (C167)
Assembler (c515c)
Assembler (CALM)
Assembler (DSP 56k)
Assembler (F240)
Assembler (H8S)
Assembler (High Level)
Assembler (Masm)
Assembler (MicroChip PIC)
Assembler (MIPS)
Assembler (RDS-500)
Assembler (S&370)
Assembler (TEAK)
Assembler (V850)
Assembler (z80)
autoit
autoit261
autolev
autolisp
avenue
AWK
Baan 3&4-GL3
Baan C
Baan ERP 3&4-GL
Baan
Bash
BibTeX
Blitz Basic 3D
BM Scripts
Bourne & Korn Shell
Broad Vision JavaScript
Bullant
C (Neuron-MC3150,3120 chips)
C for C167
C#
C++ (Turbo)
C++ Header
CA Visual Objects
Carealizer 20
Cisco IOS Config
Clarion Plus
Clarion Template
Clear Basic
CLIPS
Cold Fusion (4.31)
Cold Fusion (4.5)
Config Files
Cron Scripts
CSound CSD
CSound Orchestra
CSound Score
Cue Sheets
C-Win API
Data Flex
DB4web
dbc
dcal
DiBoL
Digital Command Language
Direct X Mesh
Directives
DML
dtd
dxl
Eiffel
Empire SystemEdge
epld
EScript 088
EScript 092
Esprit Post
ESRI Avenue(DBa 2.1)
Euphoria
Express
fame
FlagShip&Clipper
Flash 5
Flash ActionScript
FLisp
Focus
Formida
FoxPro
Frame ElmScript
Galaxy
GDL Scripts
GED2HTML
gedcom
Hamster Scripts
Hart DDL
Haskell
Hugo
Ibis
IBM Bookmaster
IBM DirectTalk
IBM Net Data
Inform 6
InstallShield
Jakarta Velocity
Jamagic Script
Jasmin
Laser Scan User Language
ldap
LDIF for Netscape Directory
Lingo
Linker File V6.0
Linker File V7.0
Linker File
Lisp
Logic
Lotus Script
lpc
lua
Lumonics GCode
MakeFile
Map
MapBasic
MapServer
Mason
Mat Lab 5
Mat Lab 6
MathML
Max Script
Maya Embedded Language (MEL)
Maya Script
Me10 Macro
MessageBuilder 4edi
MicroStation Basic
Millg
Minc DSL
Miva
Modelica
Modula 2
Modula 3
Mof
Motive Maps
MRTG Config
Msg
Mud Master Script
Multi Base
Mumps
Nc
netCDF CDL 3.3
Notes Formula Language
ocaml
Oemsetup Script
Omnimark
Open ROAD 401
Open Road
opl
Palm Pilot Resource Script
Paradox
Pascal (Turbo)
Pascal
Passport
Patrol Scripting
Pearl
People Soft SQR
Pixel Shader 1.4
PL-1 (IBM)
PL-1 (VOS)
PL-i
plm
PostScript
PovRay
Power Basic
PowerBuilder 7.0
PowerTerm Scripts
Prolog Sisctus
Providex
qBasic
Quake2 Config
RealPix
RealText
Rebol
Rman Interface
Rman Shader
Ruby
S&S+
SACS IV
SAP ABAP-4
Sas
Scenix
Schema
Scheme
SDL-PR Files
SGML
Simulink
Small
Smil
Spin
SQL (Informix)
SQL (Ingres)
SQL (MS SQL 2000)
SQL (MS SQL 7)
SQL (MySQL)
SQL (SyBase)
SQL (Teradata)
SQR
Standard ML
Stata 7
System Policies
Tivoli TLL
UE MACRO
UG&APT Source
Unidata
Uniface V6
Uniface V7.1
Uniface V7.2
UNIX Shell Scripts
Verity Log File
Verity Style File
Verity Topic File
Vertex Shader 1.1
vhdl
Visual Dialog Script
Visual Objects
Visual PRO5 Basic
VoiceXML
vrml
vrml97
vtml
wap
WAPScript
wil
WinBatch
Windows NT Command
WinRexx
WML Script
WML
XSL stylesheet
Zillions of Games
zMUD Script


О следующих языках я не имею ни малейшего понятия. Если кто знает поделитись описанием из 2-3х слов чего это такое и к чему относится.
6502
6809
ABB Rapid command
Acknex WDL V3.9
acpi
Action Script
Actionscript-JS
ADEPT Command Language
ahdl
Alpha Script
Ampl
Amtrix
ANSYS Parametric Design
ansys
asn.1
aspect
autoit
autoit261
autolev
avenue
AWK
Baan 3&4-GL3
Baan C
Baan ERP 3&4-GL
Baan
Bash
BibTeX
BM Scripts
Bourne & Korn Shell
Bullant
Carealizer 20
Cisco IOS Config
Cold Fusion (4.31)
Cold Fusion (4.5)
Cron Scripts
CSound CSD
CSound Orchestra
CSound Score
Data Flex
DB4web
dbc
dcal
DiBoL
Digital Command Language
Direct X Mesh
Directives
DML
dxl
Eiffel
Empire SystemEdge
epld
EScript 088
EScript 092
Esprit Post
ESRI Avenue(DBa 2.1)
Euphoria
Express
fame
Focus
Formida
Frame ElmScript
Galaxy
GDL Scripts
GED2HTML
gedcom
Hamster Scripts
Hart DDL
Haskell
Hugo
Ibis
IBM Bookmaster
IBM DirectTalk
IBM Net Data
Inform 6
Jakarta Velocity
Jamagic Script
Jasmin
Laser Scan User Language
ldap
LDIF for Netscape Directory
Lingo
Linker File V6.0
Linker File V7.0
Linker File
Logic
lpc
lua
Lumonics GCode
MakeFile
Map
MapBasic
MapServer
Mason
Mat Lab 5
Mat Lab 6
MathML
Max Script
Maya Embedded Language (MEL)
Maya Script
Me10 Macro
MessageBuilder 4edi
MicroStation Basic
Millg
Minc DSL
Miva
Modelica
Mof
Motive Maps
MRTG Config
Msg
Mud Master Script
Multi Base
Mumps
Nc
netCDF CDL 3.3
Notes Formula Language
ocaml
Omnimark
Open ROAD 401
Open Road
opl
Palm Pilot Resource Script
Passport
Patrol Scripting
Pearl
People Soft SQR
Pixel Shader 1.4
PovRay
PowerTerm Scripts
Providex
Quake2 Config
RealPix
RealText
Rebol
Rman Interface
Rman Shader
S&S+
SACS IV
SAP ABAP-4
Sas
Scenix
Schema
Scheme
SDL-PR Files
Simulink
Small
Smil
Spin
SQR
Stata 7
System Policies
Tivoli TLL
UE MACRO
UG&APT Source
Unidata
Uniface V6
Uniface V7.1
Uniface V7.2
Verity Log File
Verity Style File
Verity Topic File
Vertex Shader 1.1
vhdl
Visual Dialog Script
Visual Objects
Visual PRO5 Basic
VoiceXML
vrml
vrml97
vtml
wap
WAPScript
wil
Zillions of Games
zMUD Script


Буду признателен всем кто сможет помочь ходябы с одним из перечисленных языков!

Small - небольшой язык по возможностям типа бейсика. Может быть даже бейсику уступает в чем-то. Ключевая особенность - операторы все на русском языке.

Пример кода - кинуть не могу, т.к. с этим языком я очень давно сталкивался и уже о нем почти ничего не помню. Среда разработки была под ДОС конечно же(по функциям типа QBASIC).

Спасибо

VRML если я правильно понял Virtual Reality Modeling Language, насколько я знаю сейчас не очень популярен почему то.. Расширение *.vrml
Quake2 Config - язык написания конфигурационных файлов в Quake 2 что ли...
Bash - язык консоли в UNIX, сам не сталкивался но очень много слышал к примеру глянь здесь
Direct X Mesh - это? расширение *.X

Это сообщение отредактировал(а) chipset - 1.9.2004, 07:26

ocaml объектно-ориентированный функциональный язык. вырос из ML. насколько я понял, создатели сделали упор на эффективность откомпилированного кода. http://www.ocaml.org/

Haskell чистый функциональный язык. "чистота", как я понял, касается функций с побочным эффектом. их нету. расширение файлов - .hs . живёт на http://www.haskell.org/
Добавлено @ 07:09
scheme функциональный язык, взявший синтаксис у LISP, но получившийся относительно небольшим и простым для изучения. есть море интерпретаторов. один из них - http://www.drscheme.org/ (может и не лучший из них)

ActionScript JavaScript-подобный язык, встроенный в небезизвестный Macromedia Flesh. печально известен тем, что по нему нет ни одной толковой бумажной книжки, зато во flash есть прекрасные встроенные хэлпа. если подгружается извне, то файлы имеют расширение .as . хорошие примеры лежат на http://www.actionscript.com/

Bourne & Korn Shell
командные интерпретаторы *nix расширение "sh" (или любое другое... или вообще без расширения...)
AWK
вообще не язык. комнда *nix, предназначена если не ошибаюсь для выполнения поиска/замены текста... но со своими командами... типа скрипта... сложная вещь, так ее и не понял...
Quake2 Config
прикол. IMHO, видно из название что это...
Nc
Была такая софтяна под DOS

Добавлено @ 07:48
MakeFile
Си-шная (и не только) шняга. Помогает собирать большие проекты без пересборки всего... кто не в курсе
Добавлено @ 07:52
Pearl
"Графический язык". Сам не видел. А почему Perl`а нет ?!

Это сообщение отредактировал(а) GrayCardinal - 1.9.2004, 07:59

Makefile (обычно без расширения) :

Код

VERSION=1.3 CPPFLAGS=-Wall OBJECTS=memory.o \  smtp_send_to.o \  parser.o \  conf.o \  stime.o \  gc_dns.o \  cache.o \  log_log.o \  ppp_init.o   all: main.o ${OBJECTS} head.h g++ main.o ${OBJECTS} -ladns -o ./gc-mailer-${VERSION} objcopy --strip-debug ./gc-mailer-${VERSION} clean: rm -f *.o *~ gc-mailer-${VERSION} %.o: %.cpp head.h g++ ${CPPFLAGS} -c -o $*.o $*.cpp

Добавлено @ 08:11
кстати, Bourne shell и BASH суть одно и то-же.
код bash (начало) (хотя там команд до фига и больше, тут только пара - тройка) (Korn Shell. ИМХО, почти ничем не отличается) :

Код

#!/bin/bash rm -f ./configure.h touch ./configure.h echo "Перекодировать в локальную кодировку ? Recode to local charset ?" read otvet if test "x$otvet" == "xy"; then recode koi8-r.. ./* ./configure exit fi WITH_GUI=no echo "Компилировать с графическим интерфейсом пользователя ?" read otvet if test "x$otvet" == "xy"; then echo "#define DEFINE_USEGUI" >./configure.h WITH_GUI=yes fi

Добавлено @ 08:12
надеюсь помог.

АutoLISP - это модификация языка программирования LISP, встроенная в пакет AutoCAD-а. AutoLISP содержит некоторое число заранее определенных функций. Kаждая функция вызывается как список, первым элементом которого является имя функции (набранное на верхнем или нижнем регистре), а остальными - аргументы этой функции (если они есть). Фактически это Lisp плюс дополнительно ряд специфических команд созданные специально для графических возможностей AutoCAD-а. Основное предназначение: Расширение возможностей AutoCad-а.
Микропросессор Z80 - широко использовался в игровых приставках для Синклера(Спектрум), создавался как улучшенный вариант 8080. Описывать самому лень, т.ч даю ссылки: Описалово
Я гляжу у тебя многое из списка, это так называемое пережиток прошлого, которые если используются сейчас, то в основном в микропроцессорах. Вот здесь почитай - там много чего найдеш.

Удачи.

Это сообщение отредактировал(а) Girder - 1.9.2004, 10:31

Примеры многих языков можно найти тут

Это сообщение отредактировал(а) Дрон - 1.9.2004, 10:44

Возможно в чем-то повторю то, что уже писалось выше:

Action Script - язык, использующийся для написания скриптов в Macromedia Flash

AWK - командный язык *NIXов

Cold Fusion - среда веб-разработок. сам язык - С-базированный

DML (Data Macro Language) - это язык описания данных в виде макрокоманд для их удобного использования (описания, обработки в цикле, поиска, сортировки, преобразования, вывода). http://dml.nm.ru/doc.html

EScript - возможно имеется ввиду ECMAScript - тогда это база для JavaScript

Mason - это мощное средство построения веб-сайтов, основаное на языке программирования Perl. С помощью Mason вы можете встраивать код на Perl прямо в HTML, и строить сайт из разделяемых, повторно используемых компонентов. http://mason.stsland.ru/

Max Script - язык, использующийся для написания скриптов в графическом редакторе 3D Studio MAX

Scheme - один из диалект LISP'а.

VoiceXML - предназначен для создания аудиоинтерфейсов - синтеза и распознавания речи, опознания сигналов тонального ввода с клавиатуры телефона, записи аудио и телефонии. http://www.voicexml.org/

vrml - Virtual Reality Modeling Language - язык моделирования виртуальной реальности. http://vrml.main.ru/

lua Интерпретируемый язык сценариев (скрипт короч ), используется в играх (ну может и еще где, но в играх точно). По виду похож на смесь Pascal и С. Расширение *.lua, но вообще какое разработчикам игры в голову придет такое и поставят. Достаточно широко распространен в наши времена. (Homeworld 2, Блитцкриг, Silent storm)

Добавлено @ 12:17
Немножко кода на Transact SQL (SQL SERVER 2000)
(из Books On-line)

Код

--Работа с переменными SET DATEFORMAT ydm GO DECLARE @datevar datetime SET @datevar = '98/31/12' SELECT @datevar GO --Комментарии /* Using this query to view   information about units shipped   and units ordered  */ SELECT   { [Measures].[Units Shipped], [Measures].[Units Ordered] } ON COLUMNS, // The next command specifies nonempty members only   NON EMPTY [Store].[Store Name].Members ON ROWS FROM Warehouse   -- Pulled from the Warehouse cube --Запросик USE pubs SELECT au_fname, au_lname, phone AS Telephone FROM authors WHERE state = 'CA' and au_lname <> 'McBadden' ORDER BY au_lname ASC, au_fname ASC

Это сообщение отредактировал(а) Конструктор - 1.9.2004, 12:20

Apache Web Server - наверное имеется в виду конфигурация Апача (файл httpd.conf). Реализован в виде тегов в стиле XML. Единственное отличие - комментарии в стиле шела и Перла

Код

# MaxRequestsPerChild: maximum number of requests a server process serves <IfModule prefork.c> StartServers         5 MinSpareServers      5 MaxSpareServers     10 MaxClients         150 MaxRequestsPerChild  0 </IfModule>

ColdFusion - скриптовый язык для написания ВЭБ-приложений. Ориентирован на электронную коммерцию. Разработан компанией Alair и впоследствии перекуплен Macromedia. Используются теги в духе XML. Файлы имеют расширение .cf

Код

<cfset variable = "Hello World"> <cfoutput>#variable#</cfoutput>

Cron Scripts - наверно имеется в виду запуск заданий по расписанию в Unix используя crontab. Синтаксис простой - в левой части время запуска, в правой задания. коментарии в стиле шела

Код

0 * * * * /usr/local/tasks/test */20 * * * * /usr/local/tasks/mytest

Direct X Mesh - 3D-объекты в формате DirectX. Подробности думаю есть в MSDN

ESRI Avenue(DBa 2.1) - скриптовый язык для GIS системы ArcInfo. Подробности на www.esri.com

MapBasic - скриптовый язык для разработки приложений для GIS системы MapInfo. Синтаксис бейсикоподобный. Подробности на www.mapinfo.com. Файлы с расширением .mb

Код

Declare Sub Main Sub Main dim fname, tname as string, targetvar1, targetvar2, targetvar3 as Float fname="USA.TAB" ' hard-coding value of string for this example -- could be anything tname="USA" Open Table fname as tname Interactive ' method #1 Select * from tname into TempTable Fetch First From TempTable Do While Not EOT(TempTable) targetvar1=TempTable.POP_1980 * log(TempTable.POP_1990) targetvar2=sin(TempTable.POP_1980) targetvar3=targetvar1-targetvar2 Print "targetvar3 = " & targetvar3 Fetch Next from TempTable Loop End Sub

Max Script - скриптовый язык для разработки приложений в среде 3D Studio Max. Синтаксис C++ подобный.

Maya Script - скриптовый язык для разработки приложений в 3D редакторе Maya.

MicroStation Basic - скриптовый язык для разработки приложений в CAD системе Microstation.
VB-подобный синтаксис. Разработан компнией Bentley (www.bentley.com)

Miva - скриптовый язык для написания ВЭБ-приложений. Ориентирован на электронную коммерцию. Разработан компанией Miva Corp (www.miva.com). Бейсикоподобный синтаксис с использованием тегов в духе XML. Файлы имеют расширение .mv.

Код

<MvCOMMENT> Global Variable Settings </MvCOMMENT> <## Administrator's E-Mail (YOU) ##> <LET god = "[email protected]"> <## Nothing like an ego boost, right? =) ##> <## URL where the script is located ##> <LET htsurl = "{documenturl}">

MRTG Config - конфиг файл для системы учета траффика MRTG. Подробности http://people.ee.ethz.ch/~oetiker/webtools/mrtg/

Огромное спасибо всем откликнувшимся!

Цитата(GrayCardinal @ 31.8.2004, 22:45)

"Графический язык". Сам не видел. А почему Perl`а нет ?!

Потому что я знаю что это такое и примеры у меня есть...

WAP - это даже не язык. Это Wireless Application Protocol - что-то вроде заголовков TCP/IP. Просто набор байтов и битов в пакете - всякая лужбная информация, типа идентификатора транзакции, вида команды и прочая. Примеров тут вообщем-то не получается.

AWK - это все же язык, язык потокового текстового процессора AWK (вещь очень удобная)
операторов всего чуть больше десятка

пример кода

Код

awk '{print $3}' $filename # Выводит содержимое 3-го поля из файла $filename на устройство stdout. awk '{print $1 $5 $6}' $filename # Выводит содержимое 1-го, 5-го и 6-го полей из файла $filename.

Simulink-прикладной пакет в составе MatLab для математического программирования и дискретной математики
WAP- вот тут меня терзают сомнения, если это про мобильные странички, то WAP-это WirelessApplicationProtocol, но это не язык, язык для WAP называется WML(WirelessMarkupLanguage) очень похож на HTML. Фрагменты кода разбиты на карты
,количество вводимых типов ограничено. Чтоб плотнее рассмотреть синтаксис заходим в Delphi 7:
Файл->Новый->Другое->WebDocuments->WML Document

видим это:

Код

<?xml version="1.0"?> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml12.dtd"> <wml>  <card>  </card> </wml>

Карты могут нумероваться, например

Код

<card1> <input type="text", value="Моя WAP-страничка"  name="qwe"/> </card1>

Вводимые типы могут иметь следующие атрибуты

Код

acceskey class emptyok format id maxlength name size tabindex title type value xml:lang

Спасибо!

Малюсенький кусочек кода на LUA. Кстати вот где он живет http://www.lua.org

Код

function ToWin()    if ( GetNUnitsInScriptGroup(100) <= 0) then        Win(0);        Suicide();    end; end; function TobeDefeated()    if ( GetNUnitsInArea(1, "Base") > 1) then        Loose();        Suicide();    end; end; function Init()    RunScript( "ToWin", 3000);    RunScript( "TobeDefeated", 3000); end;

Могу еще вылить куски кода на Prolog,Common LISP и возможно PILOT/2, но в них я не могу даже переменную от функции отличить

Решил дополнить свой предыдущий пост:

пример кода на AutoLisp под AutoCad:

Код

;Процедура рисующая осевую линию. (defun C:Os_Line(/ PiL1 PiL2 PiH PixN Posm Pcmd)  (setq Posm (getvar "osmode") Pcmd (getvar "cmdecho"))  (setvar "cmdecho" 0)  (setq PiH (getreal "\nУвеличение осевой линии, на сторону <3>: ") PiH (if (null PiH) 3 PiH))  (while PiH    (setq PiL1 (getpoint "\nПервая точка: "))    (if (null PiL1) (setq PiH nil)      (progn (setq Pil2 nil) (While (null PiL2)   (setq PiL2 (getpoint PiL1 "\nВторая точка: "))   (cond ((null PiL2) (setq PiH nil PiL2 t))  ((apply '=(mapcar '= PiL1 PiL2))   (progn     (setq PiL2 Nil)     (write-line "\nТочка совпадает с первой!")))  (t (progn       (setq PixN (distance PiL1 PiL2)      PixN (list (*(/(-(car PiL1)(car PiL2))PixN)PiH)          (*(/(-(cadr PiL1)(cadr PiL2))PixN)PiH)          (*(/(-(caddr PiL1)(caddr PiL2))PixN)PiH))      PiL1 (mapcar '+ PiL1 PixN)      PiL2 (mapcar '- PiL2 PixN))       (command "osnap" "non")       (command "Line" PiL1 PiL2 "")       (setvar "osmode" Posm))))))))  (setvar "cmdecho" Pcmd)  (princ)) ;*Error* (defun *error* (Pmsg)  (setvar "osmode" Posm)  (setvar "cmdecho" Pcmd)  (princ "error: ")  (princ Pmsg)  (princ))

Спасибо огромное

Vit, так нужно вот это "Prolog,Common LISP и возможно PILOT/2"?
Просто мне из книги (бумажной) перепечатывать

Нет, перепечатывать не надо... Спасибо...

Конструктор
otskanirui

Немного о языке Euphoria:
http://www.rapideuphoria.com/

Сам не писал на нем, просто когда-то слышал. Кратко его характеризуют как

Цитата

Euphoria  is a simple, flexible, and easy-to-learn programming language. It lets you quickly and easily develop programs for DOS, Windows, Linux and FreeBSD.

Упсь, сорри, забыл зарегистрироваться

Глянь ка сюда.
Если я правильно понял, там много языков можно наскрепсти...

CA Visual Objects - бывший Clipper. Язык для обработки баз данных. Очень хорошо себя рекомендует в плохих сетях

VRML

Цитата(chipset @ 1.9.2004, 06:34 )

VRML если я правильно понял Virtual Reality Modeling Language, насколько я знаю сейчас не очень популярен почему то.. Расширение *.vrml

и *.wrl
Пример кода:

Код

Separator {         Cube {             width   2             height  2             depth   2         }              Sphere {             radius  1         }         Cone {             parts           ALL             bottomRadius    1             height          2         }              Cylinder {             parts   ALL             radius  1             height  2         }     }

Lingo
Используется в Macromedia Director.
Пример кода:

Код

on Tickler  if rollOver("Belly") then  sound playFile ("Laugh")  end

MathML
Язык разметки математических формул
Описание стандарта W3C: http://www.w3.org/Math/

Modelica
SMIL
А Pixel Shader это вроде аппаратная фигня для поддержки пиксельных и вершинных шейдеров.

Цитата(Vit @ 1.9.2004, 04:15 )

расширения файлов нужны для

гуглим filext.com по имени языка.

Цитата(setq @ 1.9.2004, 12:19 )

ActionScript JavaScript-подобный язык, встроенный в небезизвестный Macromedia Flesh. печально известен тем, что по нему нет ни одной толковой бумажной книжки, зато во flash есть прекрасные встроенные хэлпа. если подгружается извне, то файлы имеют расширение .as . хорошие примеры лежат на http://www.actionscript.com/

эм. Я-бы не торопился.
ActionScript 3 больше похож на Java, чем на JavaScript.

Цитата(setq @ 1.9.2004, 12:19 )

Macromedia Flesh

не Flesh, а Flash

А вообще грамотнее - Flash Platform ( http://labs.macromedia.com/flashplatform/ ) , ибо ActionScript используется и во Flex-е, которы в свою очередь предназначен для разработки RIA ( http://labs.macromedia.com/flexproductline/ )

И не Macromedia, а теперь уже Adobe

Про примеры кода и подобное:
ActionScript 2:
http://livedocs.macromedia.com/flash/8/mai...art4_ASLR2.html

ActionScript 3:
http://livedocs.macromedia.com/labs/1/flex...gref/index.html
там-же можно посомтреть и mxml, используемый во Flex.

расширения файлов:
ActionScript packages (или классы в as2):

Код

.as

mxml:

Код

.mxml

краткое описание.
ActionScript 3:
http://labs.macromedia.com/technologies/actionscript3/

Думаю, что это должно пригодится:
Программа "Hello, world" на 282 языках программирования

Eiffel - полностью объектно-ориентированный язык. Довольно часто упонимается в литературе по ООП с положительной стороны. 
По ссылке указана соответствующая статья в Вики. 

А вот еще одна статья, Джона Дворака в PC Magazine Язык Eiffel и наступление на Java.

Vit, 
Я просто.... как бы это сказать. Удивился от грандиозности задачи. Ну просто УДИВИЛСЯ. 

Даже любопытство разобрало.
Держи: ANSYS Parametric Design Language

Я напишу про ABAP 


это язык ERP системы SAP/R3

вот кусок кода просто метод класса... 


method peg_pipe_cluster .

  assert  it_peg[]      is not initial
     and  it_tkti_key[] is not initial .

  field-symbols
      : <p>  type ztost_peg
      , <q>  type ztost_peg
      , <v>  type ztost_peg
      .

  data: ti   type oij_el_ticket_i
      , th   type oij_el_ticket_h
      , tkti type roijtkti_key
      , pkey type roijtkti_key
      , ptyp type oij_pegtype
      , tpeg type ztost_peg_t
      , upeg type ztost_peg_t
      , vpeg type ztost_peg_t

      , quan type ztost_peg-peg_quan
      .

  tpeg[] = it_peg[].

  quan = 0.

  do.

    if quan_limit > 0.    " Ограничение количества

      assert quan <= quan_limit.

      if quan = quan_limit.
        exit.
      endif.

    endif.

    read table tpeg  index 1  assigning <p>.
    if sy-subrc ne 0.
      exit.
    endif.

    pkey = make_tkti_key( <p> ).

    " fetch next ticket
    if ti-menge le 0.

      read table it_tkti_key into tkti index 1.
      if sy-subrc ne 0.
        exit.
      endif.

      th = get_ticket_header( tkti_key = tkti ).
      ti = get_ticket_item( tkti_key = tkti ).
      if ti-menge le 0.
        exit.
      endif.

    endif.

    if th-ticket_type eq ticket_type_bs_loss
    or th-ticket_type eq ticket_type_bs_loss_extra
    or th-ticket_type eq ticket_type_bs_overstock.  " in case
      ptyp = pegtype_business.
    else.
      ptyp = pegtype_default.
    endif.

    append initial line  to rt_peg  assigning <q>.

    <q> = peg_bulk(
            pegid         = <p>-pegid
            tkti_key      = tkti
            tkti_key_from = pkey
            pegtype       = ptyp
          ).

    if ti-menge >= <p>-peg_quan.

      <q>-peg_quan = <p>-peg_quan.

    else.

      <q>-peg_quan = ti-menge.

    endif.

    " ## fix quan to limit

    if quan_limit > 0.

      add <q>-peg_quan to quan.

      if quan > quan_limit.
        subtract <q>-peg_quan from quan.
        <q>-peg_quan = quan_limit - quan.
        quan = quan_limit.
      endif.

    endif.

    if ti-menge >= <p>-peg_quan.

      <q> = peg_insert( <q> ).

    else.

      refresh upeg.
      select *
        into table upeg
        from ztost_peg
        where pegid eq <p>-pegid
      .
      assert sy-subrc eq 0.  " want existing group

      " split
      peg_part_ex(
        exporting
          part_tkti   = pkey
          part_quan   = <q>-peg_quan "ti-menge
        changing
          ct_peg      = upeg
          ct_peg_part = vpeg
      ).
      assert vpeg[] is not initial.

      " extra -> old group
      " reduce and prepare for next step
      peg_update( it_peg = upeg ).

      read table upeg assigning <p> with key
        ticket_key     = <p>-ticket_key
        ticket_item    = <p>-ticket_item
        ticket_version = <p>-ticket_version
        ticket_purpose = <p>-ticket_purpose .

      assert sy-subrc eq 0.
      insert <p> into tpeg index 2.  " next step for extra

      " part q into new group

      peg_next_pegid( changing ct_peg = vpeg ).
      loop at vpeg  assigning <v>.
        <v> = peg_insert( <v> ).

        <q>-pegid = <v>-pegid.

*       if  <v>-ticket_key     eq <p>-ticket_key
*       and <v>-ticket_item    eq <p>-ticket_item
*       and <v>-ticket_version eq <p>-ticket_version
*       and <v>-ticket_purpose eq <p>-ticket_purpose.  " next step for extra
*         insert <v> into tpeg index 2.
*       endif.

      endloop.

      " insert q  into new group
      <q> = peg_insert( <q> ).

    endif.

    subtract <q>-peg_quan from ti-menge.

    delete tpeg index 1.

  enddo.

endmethod.

Это сообщение отредактировал(а) ElectricalStorm - 25.4.2007, 18:53

а чем вас не устраивает база подкраски языков уже существующих редакторов: emacs, vim  ?

Добавлено через 8 минут и 23 секунды
VHDL: http://en.wikipedia.org/wiki/VHDL
файлы оканчиваются на .hdl или .vhdl

язык построения систем оборудования на основе FPGA/PLD и т.д. - это т.н. "программируемое железо", программируемая электронная логика. 
на нем реализуют системы оборудования - звуковые карты, фильтры, в принципе все, если стоит цель быстрой разработки.

есть 2 основных диалекта VHDL - диалект Altera и диалект Xilinx ( самые крупные производитеи чипов FPGA/PLD )

это язык не совсем "программирования".

примеры на википедии, если нужно больше инфы - PM меня.

Ну и что там с проектом? Очень хочется посмотреть на монстра, который столько языков подсвечивает.

Cheloveck, http://forum.vingrad.ru/forum/SynUniHighlighter.html