 Графика, вращение куба вокруг оси |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| natka |
 7.03.2006 15:37
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 39 Пол: Женский Репутация:  0   |
Вряд ли кто - нибудь будет писать, но может раньше делали?
Нужна программа, которая изображает вращающийся в пространстве вокруг фиксированной оси каркас куба. Буду очень благодарна, если кто - нибудь поможет. |
   |
 
|
| Ozzя |
7.03.2006 16:16
Сообщение
#2
|
 Гуру Группа: Пользователи Сообщений: 1 220 Пол: Мужской Репутация: 16 |
|
|
|
|
| natka |
7.03.2006 16:22
Сообщение
#3
|
|
Новичок Группа: Пользователи Сообщений: 39 Пол: Женский Репутация: 0 |
Спасибо, но мне бы чего - нибудь по-проще.
|
|
|
|
| Malice |
7.03.2006 16:35
Сообщение
#4
|
 Профи Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: 20 |
|
|
|
|
| natka |
8.03.2006 15:01
Сообщение
#5
|
|
Новичок Группа: Пользователи Сообщений: 39 Пол: Женский Репутация: 0 |
Мне тут скинули ссылку. Большое спасибо, но в программе есть следующие строки
Код uses graph; const r=50; pll:byte=0; pg: byte=0; var i,j,k,l:integer; a1,a2,a3:extended; c:char; a:array [1..8,1..3] of integer; pl: array [1..4,1..6] of integer; ddd:longint; function kp:boolean; assembler; asm MOV AH,1 INT 16H MOV AL,0 JE @@2 @@1: MOV AL,1 @@2: end; Компляция останавливается с сообщением, что переменная АН неизвестна (и это самое начало). Что можно сделать? |
|
|
|
| klem4 |
8.03.2006 15:05
Сообщение
#6
|
 Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Это ассемблерная вставка .. А какой у тебя компилятор ? Если FPC, то скомпилировать это у тебя не получится. FPC с 16б асмом не очень дружит
 Сообщение отредактировано: klem4 - 8.03.2006 15:05 -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| volvo |
8.03.2006 15:09
Сообщение
#7
|
|
Гость |
Цитата Если FPC, то скомпилировать это у тебя не получится  FPC 2.0.0 компилирует этот код "на ура"... |
|
|
|
| natka |
8.03.2006 15:25
Сообщение
#8
|
|
Новичок Группа: Пользователи Сообщений: 39 Пол: Женский Репутация: 0 |
У меня как раз FPC 2.2, что с ним можно сделать?
|
|
|
|
| volvo |
8.03.2006 15:30
Сообщение
#9
|
|
Гость |
Полностью программу присоедини (в аттаче)... Тот кусок, что ты привела у меня откомпилировался. Может быть, дело в другом куске кода... Надо смотреть...
А, так ты о программе Malice? Нет, ее просто так не откомпилируешь на FPC... Port уже не поддерживается ... |
|
|
|
| natka |
8.03.2006 15:37
Сообщение
#10
|
|
Новичок Группа: Пользователи Сообщений: 39 Пол: Женский Репутация: 0 |
Ай, не охото мучиться, перешла на Borland Pascal, там заработало, Malice еще раньше прокомментировал, что сделать, чтобы компиллировалось.
Большое всем спасибо! |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 19.06.2025 6:28 |