А кто это у нас тут висит? :

Сразу после этого, возле начала мира:

Обычная бочка? Я бы не был так уверен…

Эй, да это не просто сокровища!

Как же они там поместились?

Какие глаза у Спаркса!

А у Колдуньи-то!!

Здесь пол заглючило…

Она думает, что посох ещё при ней…

Жёлтое пятнышко – бедный «растворившийся» Спаркс!

Все текстуры перевернулись, лишь небо с нами!

А тут, наоборот, всё обесцветилось, только Спайро нарядный:

Часть первая, сперва – стандартные отображения. Потом мистер Урод, примерно 50% шанс увидеть его, если вводить число от фонаря. А внизу заметьте – золотой, но не светится:

Далее разноцветный. Многие стабильны (фиолетовый просто моргнул, у него нормальные глаза!) :

Любой объект, единственный на форме.
Событие СОЗДАНИЯ: (эквивалентно началу программы в других языках)

=============
show_message('Выберите WAD:');
file=get_open_filename("*","");
if file="" {show_message("Распаковка отменена!");game_end();exit}
if not file_exists(file) {show_message("Файл не существует!");game_end();exit}
filename=filename_change_ext(file,"");
wad=file_bin_open(file,0);
size=file_bin_size(wad)
if size<10 {show_message("Файл слишком мал!");game_restart();exit;}
b[1]=1;
b[2]=256;
b[3]=65536;
b[4]=16777216;
str_null="0000000000"
i=0;
addr=0;
volume=0;
draw_set_font(font0);
line=0;
text="Файл '"+filename+"'#Принят, размер в байтах: "+string(size)
screen_redraw(); sleep(3000);
part=0;
ar[2,2]=0;
status=0;
pusto=0
=============
Все остальные действия будут в событии шага (аналог бесконечного цикла тела программы других языков).
Событие ШАГА:

=============
if status=0
{
part+=1;
addr=0
for (n=1;n<5;n+=1){
addr+=file_bin_read_byte(wad)*b[n]}
volume=0
for (n=1;n<5;n+=1){
volume+=file_bin_read_byte(wad)*b[n]};

ar[part,1]=addr;
ar[part,2]=volume;
if volume=0 pusto+=1 else pusto=0
if (addr<=file_bin_position(wad))and(volume>0)
{show_message("Ошибка! Найдена ненулевая ссылка, указывающая на уже прошедшую область! ");game_end();exit}
text="Найдено вложенных файлов: "+string(part-pusto);
if file_bin_position(wad)+7>=ar[1,1] {part-=pusto;show_message("Поиск завершён. Найдено "+string(part)+ " суб-файлов!");status=1;exit;}
if addr+volume>size {show_message("Ошибка! Субфайл '"+string(part)+"' ссылается на область "+
string(addr)+"-"+string(addr+volume)+", что превосходит размер самого файла ("+string(size)+")!");game_end();exit;}
}
if status=1
{
text="Выбор назначения...";screen_redraw();sleep(1000);
nulls=string_length(string(part));
temp=string_copy(str_null,0,nulls-1)
show_message("Укажите папку для сохранения всех "+string(part)+
" файликов! Они будут извлечены как 'Файл_"+temp+"1,Файл_"+temp+"2' и.т.д.")
folder=get_directory_alt("Укажите выходную папку (на диске должно быть достаточно места!)","");
if folder="" {show_message("Отменено пользователем!");game_end();exit;}
if not directory_exists(folder) {show_message("Папка не существует!");exit;}
save=file_bin_open(folder+"\файл_",1);
file_bin_rewrite(save);
if not file_exists(folder+"\файл_") {show_message("Нет доступа!");exit;}
file_bin_close(save);
file_delete(folder+"\файл_");
status=2;fin=part;
part=0;exit
}
if status=2
{
part+=1;
if part>fin {show_message("Распаковка полностью завершена!");game_end();exit;}
name=folder+"\Файл_"+string_copy(str_null,0,nulls-string_length(string(part)))+string(part);
save=file_bin_open(name,1);
file_bin_rewrite(save)
addr=ar[part,1];
volume=ar[part,2];
file_bin_seek(wad,addr);
for(n=0;n<volume;n+=1){
file_bin_write_byte(save,file_bin_read_byte(wad))
}
file_bin_close(save);
text="Данные в#'"+name+"'#Извлечены!";
}
=============
Это по сути всё. Но есть ещё «интерфейс» в событии рисования (можно заложить в тело бесконечного цикла с выводом на форму в других языках).
Событие РИСОВАНИЯ:

=============
draw_text(x,y,text)
=============
И на всякий случай событие завершения программы, где я закрываю открытый файл (хотя он и так сам закроется, но всё же).
Событие GameEnd:

=============
file_bin_close(wad)
=============
Вот теперь точно всё, скажу только, что используется ресурс ШРИФТ «font0» (у меня это Arial 12 пт) и форма (комната) «room0» с нашим объектом «object0» в точке 0,0 (размер формы – 600*64, цвет фона – белый, скорость – 60 шагов в секунду)

Program CONCATENATOR;
label finish;
const name = 'CONCATENATOR.TXT';
var ar: array [1..256] of byte;
var f_in: file of byte;
var f_out: file of byte;
var f_text: text;
var st_in: string;
var st_out: string;
var st_buffer: string;
var ok: boolean;
var i: integer;
var stop: integer;
var buffer: integer;
begin
st_buffer:='256';
Assign(f_text,name);
Reset(f_text);
Readln(f_text,st_in);
Readln(f_text,st_out);
if not SeekEof(f_text) then Readln(f_text,st_buffer);
Close(f_text);
Assign(f_in,st_in);
Assign(f_out,st_out);
Reset(f_in);
Reset(f_out);
Seek(f_out,FileSize(f_out));
ok:=true;
Val(st_buffer,buffer,stop);
stop:=0;
while ok do begin
for i:=1 to buffer do begin
if Eof(f_in) then begin ok:=false; stop:=i; break; end;
Read(f_in,ar[i]);
end;
for i:=1 to buffer do begin
if i=stop then goto finish;
Write(f_out,ar[i])
end;
end;
finish:
Close(f_in);
Close(f_out);
end.

Если программа на паскале будет выглядеть так:
=============
begin
write(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
end.
=============
То после запуска возникнет странная ошибка. Если же приписать ещё парочку единичек через запятые, то после запуска весь PascalABC просто слетает, и исчезает вся сделанная работа, даже сохранить изменения нельзя!
А функция Game-Maker «file_text_read_real» оказывается неправильно работает! Если записать в файл число, то эта функция должна прочитать его. Но если число равно нулю (не больше и не меньше), то функция просто пропускает его и читает следующее! То есть, последовательность напрочь сбивается! Именно поэтому, в Текст-О-Вытаскавателе, вместо байта «0» я указал, что нужно вводить «256»! Вот код GML, демонстрирующий ошибку (в событие создания любого существующего объекта):
=============
{n=-1;
for (i=-2;i<3;i+=1)
{n+=1;array1[n]=i}
tmp=file_text_open_write(temp_directory+"\tmp.tmp");
for (i=0;i<=n;i+=1)
{file_text_write_real(tmp,array1[i])}
file_text_close(tmp);
tmp=file_text_open_read(temp_directory+"\tmp.tmp");
for (i=0;i<=n;i+=1)
{array2[i]=file_text_read_real(tmp)}
file_text_close(tmp);
for (i=0;i<=n;i+=1)
{show_message(string(array1[i])+"#"+string(array2[i]))}
game_end()}
=============
Результат работы ДОЛЖЕН быть следующий:
-2. . . . .-1. . . . .0. . . . .1. . . . .2
-2. . . . .-1. . . . .0. . . . .1. . . . .2
Вместо этого, он такой:
-2. . . . .-1. . . . .0. . . . .1. . . . .2
-2. . . . .-1. . . . .1. . . . .2. . . . .0
Сдвиг нижней строки налицо.

Это примерно в начале, под водой. Пузырь Спаркса квадратный:
http://i.piccy.info/i5/53/27/1722753/Pic01.jpg
Вылез из воды:
http://i.piccy.info/i5/60/27/1722760/Pic02.jpg
Носороги с прозрачным пузом метают бочки:
http://i.piccy.info/i5/70/27/1722770/Pic03.jpg
На скалах вместо камней нарисованы яйца:
http://i.piccy.info/i5/02/28/1722802/Pic04.jpg
Чётко видно, что торцевые текстуры уступов дублируются:
http://i.piccy.info/i5/24/28/1722824/Pic05.jpg
Уже зашёл к Шейле и разговариваю с котиками:
http://i.piccy.info/i5/35/28/1722835/Pic06.jpg
Обод острова похож на поезд с вагонами:
http://i.piccy.info/i5/40/28/1722840/Pic07.jpg
Вот потайная пещера. Обратите внимание на текстуры в круге:
http://i.piccy.info/i5/89/28/1722889/Pic08.jpg
Они «улучшились», когда я подошёл ближе:
http://i.piccy.info/i5/92/28/1722892/Pic09.jpg
Борьба с метеллакулой в другой мини-игре. Носорог «по традиции» прозрачен:
http://i.piccy.info/i5/74/28/1722874/Pic10.jpg
Обратный портал:
http://i.piccy.info/i5/01/29/1722901/Pic11.jpg

Общий вид:
http://i.piccy.info/i5/17/29/1722917/Pic13.jpg
Возле портала Бентли:
http://i.piccy.info/i5/60/29/1722960/Pic14.jpg
Пещера Фабрики Фейерверков:
http://i.piccy.info/i5/57/29/1722957/Pic15.jpg
У ракеты со снежным человеком:
http://i.piccy.info/i5/39/29/1722939/Pic16.jpg
На вертолёте:
http://i.piccy.info/i5/09/29/1722909/Pic12.jpg

Обязательно скачайте эту фотографию, 800Кб:
http://klimaleksus.narod2.ru/Files/How_make_your_mic.jpg
Клеточная бумага для масштаба, стандартная 5мм. На проводе (3) есть плата (1) с микрофоном (19). Это гарнитура для телефона, обратный разъём (10) я отрезал и расплёл провода (11), в увеличении (13). Взглянув на плату в приближении (18), можно увидеть следующие обозначения: «L» – левый канал, «R» – правый канал, «COM» – общий контакт, «M» – плюс от микрофона, «OT» – кнопка, «G» – земля, отрицательный полюс. На самом микрофоне (19) есть надпись «MIC», а дорожки от него идут к «G» и «M». Провода присоединяются так: «L» – зелёный, «R» – красный (оторван), «COM» – желто-красный, «OT» и «M» (спаяны) – синий, «G» – жёлтый. Нас интересуют только синий и жёлтый провода, остальные три можно либо отрезать, либо обмотать вокруг шнура (потому что во-первых они красивые, а во вторых, они могли бы пригодиться, если у гарнитуры не были бы оторваны наушники). На конце провода (2) нужно оголить все провода и зачисть те, которые идут от микрофона. Для этого каждый проводок следует «запалить» зажигалкой, а потом «пошкрябать» шкуркой или поводить по нему ножом. Жилки должны распушиться. На рисунке (12) жёлтый провод только сгорел, а синий ещё и зачищен и распушён, это лучше видно в приближении (15). Для подключения микрофона к компьютеру понадобится разъём «пистолетик» (4). Если он уже с проводами, то их нужно зачистить вышеописанным способом (так как жадные китайцы любят делать эти выводы из одножильных проводов, работать с которыми гораздо сложнее, я рекомендую все-таки припаивать необходимые медные проводники, хотя можно и повозиться с заводскими). Иначе, припаять три провода как на рисунке (14). Три контакта: общий (нижний), средний и кончик (ромбический). Плюс микрофона нужно подать на кончик, а минус – на два других сразу. Открытая скрутка (9) присоединяет их к длинному «двухпроводному» шнуру (6) который я сам заплёл. На втором шнуре (7) висит другой микрофон (5) от аналогичной гарнитуры. Он точно также подключён, как и должен быть (1), то есть двумя проводами. В месте скрутки (8) можно увеличивать длину провода. На увеличенном рисунке (16) можно разглядеть дырочку, в которой микрофон (17), и в которую нужно будет говорить. Настройки микрофона заключается в следующем. Подключите микрофон к линейному входу и откройте «Звукозапись». Команда «Правка>Свойства аудио>Громкость микрофона». Там будет кучка регуляторов, надо поставить галочку на первый, запустить запись и изо всех сил дунуть в микрофон. Если зелёная полоска продолжает показывать «УМЕР» (шутка!), то переключите галочку на другой регулятор и повторите процедуру. Когда «пульс» появится, закройте свойства и попробуйте сказать что-нибудь. Потом прослушайте – явное трещание не должно быть слышно. Но в любом случает, запомните «размах» зелёной полосы. Теперь разорвите открытую скрутка (9) и соедините провода по-другому и дуньте в микрофон. Отметьте ещё раз амплитуду волны. Перепробуйте все комбинации, пока не найдёте такой вариант подключения, при котором эта полоса максимально зашкаливает. Обычно, так подключения лучшее и без помех; микрофон можно «заматывать» липкой лентой. Запись делается так. Подготовьте пятиминутный файл (чтобы не быть ограниченным во времени) и загрузите его в звукозапись. (Больше времени – «вставьте» сколько потребуется). Потом включайте запись и декламируйте! По завершению остановите, кликните «Правка>Удалить после текущей позиции». Потом «Эффекты>Увеличить громкость» нажмите пять-десять раз подряд! И сохраните результат в файл по умолчанию «моно, 22 КГц, 16 бит». А ещё лучше, сконвертировать его в mp3, чтобы занимал меньше места. Свой LAME я закачаю чуть позже.

Названия уровней (в отличие от предыдущих двух игр) устроены в стиле «Какое-то Что-то» или «Что-то Чьё-то». Сказочные описательные названия, без повторений, но полны синонимов. Перевести нужно не хуже:

НАЗВАНИЕ – [шутливая транскрипция в прикол] – Перевод – «Результат» – {Разница}.
Основные уровни:
– Sunrise Spring Home – [санраз спринг хом] – Дом утренней весны (или долины). – «Дом Утренней Долины» – {0}
– Sunny Villa – [Сани Вилла ! ] – Солнечная деревушка. Длинно? Деревня света? – «Яркое Село» – {+1}
– Cloud Spires – [клауд спаирс] – Заоблачные вершины? Почему бы не намного проще – «Высокие Горы» – {0}
– Molten Crater – [молтен кратер] – Расплавленный кратер. Делаем легче – «Жаркий Вулкан» – {0}
– Seashell Shore – [сишел шор] – Ракушечный берег, или проще – «Берег Ракушек» – {+1}
– Mushroom Speedway – [мушрум спидвей] – «Грибная Трасса» – {+3}
– Sheila’s Alp – [Шейла с Альп !! ] – «Альпы Шейлы» – {+1}
– Buzz’s Dungeon – [Баз Сдан Джор ! ] – «Темница Базза» – {+1}
– Midday Garden Home – [мидай гарден хом] – Дом полуденного сада… Не помещается, делаем – «Дом Дневного Сада» – {+1}
– Icy Peak – [айси пик] – Ледяное остриё? Честно говоря, в 8 букв это засунуть… Самый сложный вариант! Надо либо начинить со слова Лёд, либо со слова Пик. Мне пришло в голову только – «Ледовик» – {+1}
– Enchanted Towers – [инчантед таверс] – Заколдованные башни. Чуть короче – «Магические Башни» – {0}
– Spooky Swamp – [споки свомп] – Шепчущее или говорящее болото… Тут я оставил пока два варианта – «Тихое Болото», «Опасная топь» – {0}
– Bamboo Terrace – [Бамбу Те Раз ! ] – Бамбуковая терраса. Упрощённо – «Улица Бамбука» – {+1}
– Country Speedway – [кантри спидвей] – «Городская Трасса» – {0}
– Sgt. Byrd’s Base – [Срж. Бёрд с Баз ! ] – «База Серж. Бёрда» – {0}
– Spike’s Arena – [Спайк с Арены ! ] – «Арена Спайка» – {+1}
– Evening Lake Home – [ивининг лейк хом] – Дом вечернего озера, Разница (-2). Поэтому во множественном числе – «Дом Вечерних Озёр» – {0}
– Frozen Altars – [фрозен олтерс] – Замёрзшие алтари? Честно, не совсем понимаю… Будет – «Зимние Алтари» – {0}
– Lost Fleet – [лост флит] – Потерянный флот… На втором месте по длине (и по трудности!). На уме только – «Битый Флот» – {0}
– Fireworks Factory – [феирвекс фектори] – Фабрика Фейерверков! Никак не могу правильно уместить… Получилось – «Фабрика Хлопушек» – {+1}
– Charmed Ridge – [чармед ридж] – Волшебный хребет. Изменим (согласно с содержанием уровня) – «Пики Чародеев» – {0}
– Honey Speedway – [хани спидвей] – «Медовая Трасса» – {0}
– Bentley’s Outpost – [бентли с аутпост] – Аванпост Бентли? Что это… Уж лучше – «Сторожка Бентли» – {+2}
– Scorch’s Pit – [Скорч Спит !!] – «Яма Скорча» – {+2}
– Midnight Mountain Home – [миднайт маунтин хом] – Дом полуночной горы. Но горы мы уже упоминали в третьем уровне… – «Дом Полуночного Хребта» – {0}
– Crystal Islands – [кристал айлендс] – Кристальные острова? Длинно, не влезает… Но если так – «Алмазная Земля» – {+1}
– Desert Ruins – [дезерт руинс] – Пустынные руины, или – «Пустыня Руин» – {0}
– Haunted Tomb – [хантед тум] – Частопосещаемая могила!? Ужас… – «Старый склеп» или «Древний Гроб» – {0}
– Dino Mines – [Дино Мины ! ] – Шахты Дино. Но лучше наоборот и через дефис – «Дино-Шахты» – {0}
– Harbor Speedway – [хабо спидвей] – «Морская трасса» – {+1}
– Agent 9’s Lab – [Агент – Девять Лап !! ] – «Лаб. Агента 9» – {0}
– Sorceress’ Lair – [сор-сер-слер ! ] – Логово Ведьмы. А подлиннее – «Ведьмено Логово» – {0}
Миры Спаркса:
– Crawdad Farm – «Ферма Червей» – {0} ??
– Spider Town – «Город Пауков» – {0}
– Starfish Reef – «Риф Кораллов» – {+1}
– Bugbot Factory – «Завод Робожука» – {0}
Бонусные миры:
– Super Bonus Round – «Раунд Супер Бонус» – {0}

Кто-то продолжает настаивать, что не все названия переводимы? Если так, оспаривайте только то, что взято в кавычки «»!