Ответить на тему  [ 1 сообщение ] 
 
Автор Сообщение
Администратор
Аватар пользователя

Зарегистрирован: 27 ноя 2011, 01:03
Сообщений: 211
Откуда: Москва
Сообщение test
<link rel="stylesheet" type="text/css" href="http://yandex.st/highlightjs/6.1/styles/vs.min.css" />
<script type="text/javascript" src="http://yandex.st/highlightjs/6.1/highlight.min.js"></script>
<script type="text/javascript">
// <![CDATA[
function expandCode(e) {
var c = e.parentNode.nextSibling.firstChild;
if (c.style.maxHeight == 'none') {
c.style.maxHeight = '200px';
e.innerHTML = '{L_EXPAND_VIEW}';
}
else {
c.style.maxHeight = 'none';
e.innerHTML = '{L_COLLAPSE_VIEW}';
}
}
function highlightInit() {
var boxes = document.getElementsByTagName('code');
for (i = 0; i < boxes.length; i++) {
if (boxes[i].innerHTML.indexOf('<span') < 0) {
hljs.highlightBlock(boxes[i], null, true);
}
if (boxes[i].scrollHeight > boxes[i].offsetHeight + 1) {
boxes[i].parentNode.previousSibling.innerHTML += ' &middot; <a href="#" onclick="expandCode(this); return false;">{L_EXPAND_VIEW}</a>';
}
}
}
onload_functions.push('highlightInit()');
// ]]>
</script>


/*
* Hello World in gas/NetBSD
* AT/T-Syntax
*
* Compile:
* gas hw.s
* ld -s -o hw a.out
*/

.data

msg:
.string "Hello World\n"

len:
.long . - msg


.text
.globl _start

_start:
push $len /* Laenge */
push $msg /* Adresse */
push $1 /* Stdout */
movl $0x4, %eax /* write */
call _syscall
addl $12, %esp /* Stack bereinigen */

push $0
movl $0x1, %eax /* exit */
call _syscall

_syscall:
int $0x80
ret



TList=Class(TObject)
Private
Some: String;
Public
Procedure Inside; // Suxx
End;{TList}

Procedure CopyFile(InFileName,var OutFileName:String);
Const
BufSize=4096; (* Huh? *)
Var
InFile,OutFile:TStream;
Buffer:Array[1..BufSize] Of Byte;
ReadBufSize:Integer;
Begin
InFile:=Nil;
OutFile:=Nil;
Try
InFile:=TFileStream.Create(InFileName,fmOpenRead);
OutFile:=TFileStream.Create(OutFileName,fmCreate);
Repeat
ReadBufSize:=InFile.Read(Buffer,BufSize);
OutFile.Write(Buffer,ReadBufSize);
Until ReadBufSize<>BufSize;
Log('File '''+InFileName+''' copied'#13#10);
Finally
InFile.Free;
OutFile.Free;
End;{Try}
End;{CopyFile}


http://mail11.ru

vdi.zip [549.05 KiB]
Скачиваний: 188
vdi.zip [549.05 KiB]
Скачиваний: 188
vdi.zip [549.05 KiB]
Скачиваний: 188




vdi.zip [549.05 KiB]
Скачиваний: 188


[icode]div.codebox pre[/icode]


















Название Скриншоты (@), описание (#) Год выпуска Жанр Автор bin, source, path on CF img Проверено в ОС Проверено на модели БК
Cybernoid @ @ @ # 1997 Стрелялка Иванов Н.В. bin MK-DOS БК11М



























Фамилия Имя Email Платеж Сайт
Иванов Петр ivanov@gmail.com $50.00 http://www.ivanov.ua
Петров Иван petrov@yandex.ru $50.00 http://www.petrov.com.ru
Сергеев Михаил sergeed@mail.ru $100.00 http://www.sergeev.ru
Михайлов Потап medvedev@rambler.ru $50.00 http://www.yandex.com


Вложения:
07 окт 2013, 22:45
Профиль
Показать сообщения за:  Сортировать по:  
Ответить на тему   [ 1 сообщение ] 

Кто сейчас на форуме

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000 - 2011 phpBB Group.
Design creat de Florea Cosmin Ionut | Translation by WebSok.Ru

закрыть

Советскому бытовому " БК-0011М" посвящается...


Вопреки всем скептикам и недоброжелателям, дело БК живет и развивается. Не за горами день, когда будет выпущен в свет "БК-0012 Pulsar" - расширенный FPGA-клон БК-0011М. Пока же на данном форуме Вы можете ознакомиться с репликами БК-0011М(-01), приставкой Booster-11, репликой контроллера SMK64 (а также его FPGA-клоном - SMK512), аппаратным эмулятором ПЗУ КР1801РЕ2Б, блоками расширения с процессорами ВМ2/ВМ3, и другими интересными материалами и работами.
Ведутся работы по отрисовке в 3D корпусов БК, МСТД, оригинальных клавиатуры, джойстика и мыши, но пока не удается найти их производство по приемлемой цене при малом тираже. Выполнено производство новодельных пленок для клавиатур БК-0011М.
Важным для возрождения БК и его сообщества является новый софт (игры и демо в особености), и они периодически появляются!
Удалось решить многие hard-задачи, но нет системных программистов, востребованных в проекте БК-0012, как минимум для тестирования. Требуется разработка полноценного Win32-компилятора Си в bin-файлы БК.
Релизован полноценный каталогизатор всего софта БК, с удобным интерфейсом. Осталось выполнить собственно большую задачу каталогизации.

Ждем ваших откликов, идей. Сообщайте о данном ресурсе всем, кто увлекался в прошлом БКшкой, присылайте их и свои e-mail для рассылки новостей из мира БК.

nimamov@mail.ru