Форум программистов, компьютерный форум, киберфорум
Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 09.06.2011
Сообщений: 64

Что у меня не получилось? Я пишу игру на blitz basic3d

19.10.2011, 00:50. Показов 1061. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
Graphics3D 640, 480
SetBuffer BackBuffer()
 
Global player
Dim aMap(20,20)
Dim aCube(20,20)
 
player=CreateSphere()
PositionEntity player,6, 0.1, 3
TurnEntity player,0,0,0
 
cam=CreateCamera(player)
light=CreateLight(1)
 
mapSize% = 20
filein = ReadFile("level1.map")
mapLines = 1
 
While Not Eof(filein)
   mapStr$ = ReadLine$( filein )
   For i=1 To MapSize 
       aMap(mapLines,i) = Int( Mid(mapStr,i,1 ))
   Next
   mapLines = mapLines + 1
Wend
CloseFile(filein)
 
 
tex = LoadTexture ("tex1.jpg")
 
For j=1 To mapSize
    For i=1 To mapSize
          If aMap(j,i) = 1
             aCube(j,i)=CreateCube()
             EntityTexture aCube(j,i), tex
             PositionEntity aCube(j,i), i*2, 0, j*2
          EndIf
    Next
Next
 
While Not KeyDown( 1 )
   RenderWorld
   Flip
Wend
End
Заранее спасибки и спокойный ночи!!!
 Комментарий модератора 
С нападками поосторожней... Правила форума перечитайте.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.10.2011, 00:50
Ответы с готовыми решениями:

Я хочу создать игру на Blitz Basic3d. Помогите...
# hunger has steady decay hunger = hunger - 0.8 * seconds if (hunger > 100) hunger = 100 endif if (hunger < 0) hunger = 0 endif ...

Народ, выручайте. хочу собрать пекарню за 50 кусков. Вот что у меня получилось
выручите советом по сборке. Бюджет 750$(51000+- 1000). Думаю собрать СЖО с али, знаю, что это гемор, но хочется попробовать ( это выйдет...

Как у меня получилось подключиться к WiFi?
Объясните мне, пожалуйста, ситуацию. Дома я на своем ноутбуке устанавливала Win7. Хотела настроить соединение с интернетом через модем...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
19.10.2011, 00:50
Помогаю со студенческими работами здесь

пишу игру:D
Ребят,какую можно написать простую консольную игрушку? а то вообще в голову ничего не лезет!

Пишу игру
Хотел бы найти людей, которые поддержали бы идею создания физической игры жанра sandbox Суть игры заключается в физических и химических...

У меня видео 8600 GT 256MB.Когда захожу в игры у меня появляются полосы чёрные,лучи из текстур то черные то серые!и если свернуть игру а потом востано
Парни помогите!У меня видео 8600 GT 256MB.Когда захожу в игры у меня появляются полосы чёрные,лучи из текстур то черные то серые!и если...

Пишу текстовую игру на Си
У меня такой вопрос. Как рисовать анимацию и не прохлопать нажатия клавиш? Есть ли Сях какие-то аналоги таймеров и прерываний? Заранее...

Пишу свою игру
Здравствуйте! Помогите, плз. Делаю(тренируюсь, просто для себя) игру. На данный момент застрял на таком этапе. Есть игровое поле,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru