RFO BASIC
Долго искал и таки нашел.
Единственный на данный момент адекватный вариант создания игр и приложений на андроиде. Коротко о возможностях : графика с мультитачем использовать HTML и JavaScript для создания gui (можно динамически) операции с файлами, звук и музыка, доступ ко всем функциям ос, в том числе системные shell комманды Имеется немало встроенных примеров по основным моментам Дополнительные примеры можно нарыть там http://rfobasic.freeforums.org/share...ograms-f6.html текущая версия 1.75 http://laughton.com/basic/versions/v01.75/Basic.zip справка тут http://laughton.com/basic/help/De_Re_BASIC%21.htm http://laughton.com/basic/help/De_Re_BASIC%21.pdf http://www.rfobasic.com/ |
Ответ: RFO BASIC
Вложений: 1
написал простенький покер (без калькуляции результата) c html gui
http://s019.radikal.ru/i627/1310/71/654f78306f22.png архив распаковать в mnt/local/rfo-basic/ открываем в программе файл spoker1.bas (из папки source) и жмем run |
Ответ: RFO BASIC
Цитата:
Цитата:
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Прогать на мобилке? Но зачем?
|
Ответ: RFO BASIC
Цитата:
К тому же сейчас есть множество арм устройств на андроиде типа твбокса(как минидесктоп получается) например типа такого |
Ответ: RFO BASIC
У меня, в свою очередь, обычно третий вопрос: зачем вообще андройд? Делать все более мощное железо, чтобы крутилось все в тормозной виртуальной машине. Костыль на костыле.:)
|
Ответ: RFO BASIC
А как же AIDE ? Я конечно понимаю что бэйсик и все дела,но AIDE более полноценная "среда" для разработки на самом языке java ,и компилирует в счет :)
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Здесь пишут программу и отвечают на вопросы - http://annimon.com/forum/id396951
Здесь документация - http://annimon.com/forum/id83244-150 - http://rfobasic.com/ - учебник на русском языке, открывается на английском и через 5 секунд спрашивает " перевести ? " отвечаем - перевести ( Google Chrome ). Или http://4pda.ru/forum/index.php?showtopic=319131&st=20 - тут руководство и учебник на русском. |
Ответ: RFO BASIC
Здесь программы на RFO-Basic : http://laughton.com/basic/programs/games/
|
Ответ: RFO BASIC
Лол,а почему basic? Есть же SL4A и питон.
|
Ответ: RFO BASIC
По тому что SL4A и Питон на смартфоне не доделаны.
А вообще кому и что нравиться! Я попробывал RFO-Basic ( Basic! ), и мне жутко понравилось! Это новый язык и к сожалению распространен в не русско язычных странах. А также пока отсутствует литература. Но посмотрев примеры и попробывал его - мне понравился. Есть возможность работать в текстовом или графическом экранах. Текстовый для быстрых расчетов, а графический для графики и текста. Также отличная скорость работы. Возможность конвертировать в арк. Но главное он использует все возможные устройства и сенсоры смартфона и т.д.. |
Ответ: RFO BASIC
Вот еще ссылка http://rfobasic.freeforums.org/share...ograms-f6.html
|
Ответ: RFO BASIC
Код:
x=-256 %начальная координата по горизонтали(у меня она равна ширине картинки в пикселах) |
Ответ: RFO BASIC
Пример:
REM Start of BASIC! Program gr.open 255,255,255,255 gr.color 255,25,0,255,0 gr.rect rct1,50,40,60,15 gr.render for i=50 to 100 step 1 gr.modify rct1, "left", i gr.modify rct1, "right", (i+10) gr.render pause 1 next pause 1 gr.close END |
Ответ: RFO BASIC
Пример:
REM Start of BASIC! Program gr.open 255,255,255,255 gr.color 255,250,0,255,0 gr.orientation 1 gr.text.draw txt1, 1, 60, "My current 'x' position is 1" for i=1 to 100 step 1 gr.modify txt1, "x", i gr.modify txt1, "text", "My current 'x' position is " + str$(i) gr.render pause 1 next pause 1000 gr.close END |
Ответ: RFO BASIC
ПРИМЕР :
score = 0 speed = 4.0 gr.open 255, 255, 255, 255 gr.orientation 1 gr.color 255, 30, 30, 30, 1 % play area gr.rect area, 0, 300, 0, 300 % play area gr.color 255, 255, 0, 0, 1 gr.circle ball, round(rnd() * 300), 0, 10 gr.color 255, 0, 0, 255, 1 gr.rect player, 150, 280, 200, 300 gr.text.draw scoreboard, 0, 350, "Score: " + str$(score) gr.render do do gr.touch touched, x, y until touched gr.get.position ball, x1, y1 gr.get.position player, x2, y2 if x < (x2 + 15) let direction = -10 elseif x > (x2 + 35) let direction = 10 else let direction = 0 endif gr.modify ball, "y", y1 + round(speed) gr.modify player, "left", x2 + direction gr.modify player, "right", x2 + 50 + direction gr.render if gr_collision(ball, player) score = score + 1 speed = speed + 0.2 gosub positionBall endif if y1 > 300 score = score - 1 gosub positionBall endif gr.render pause 5 until 1 = 2 positionBall: gr.modify scoreboard, "text", "Score: " + str$(score) gr.modify ball, "y", 0 gr.modify ball, "x", round(rnd() * 300) return OnBackKey: popup "Score: " + str$(score),0,0,1 end |
Ответ: RFO BASIC
Rem Blink
Rem Built with RFO Basic! Rem June 2015 Rem Version 1.00 Rem By Roy di_height = 1230 % set to my Device di_width = 800 gr.open gr.set.AntiAlias 1 gr.orientation 1 pause 1000 gr.screen screenWidth,screenHeight scale_x=screenWidth/di_width scale_y=screenHeight/di_height gr.scale scale_x,scale_y gr.render gr.set.stroke 1 gr.text.size 80 xx = 800 : xxx = - 30 dim wink[15] gosub SetColours gosub BlinkEyeLeft gosub BlinkEyeRight gosub BlinkText gosub Blink end Blink: do for x = 2 to 10 pause 100 if x = 6 then pause 200 !Eye Left if x = 2 then gr.modify wink[2], "paint", black if x = 3 then gr.modify wink[3], "paint", black if x = 4 then gr.modify wink[4], "paint", black if x = 5 then gr.modify wink[5], "paint", black if x = 6 then gr.modify wink[5], "paint", magenta if x = 7 then gr.modify wink[4], "paint", white if x = 8 then gr.modify wink[3], "paint", white if x = 9 then gr.modify wink[2], "paint", white !Eye Right if x = 2 then gr.modify wink[7], "paint", black if x = 3 then gr.modify wink[8], "paint", black if x = 4 then gr.modify wink[9], "paint", black if x = 5 then gr.modify wink[10], "paint", black if x = 6 then gr.modify wink[10], "paint", magenta if x = 7 then gr.modify wink[9], "paint", white if x = 8 then gr.modify wink[8], "paint", white if x = 9 then gr.modify wink[7], "paint", white gosub ChangeTextColour gr.render next until 0 return BlinkEyeLeft: Gr.oval wink[1], 200, 200, 400, 400 gr.modify wink[1], "paint", black Gr.oval wink[2], 200,220, 400, 380 gr.modify wink[2], "paint", white Gr.oval wink[3], 200,240, 400, 360 gr.modify wink[3], "paint", white Gr.oval wink[4], 200, 260, 400, 340 gr.modify wink[4], "paint", white Gr.oval wink[5], 250, 280, 350, 320 gr.modify wink[5], "paint", magenta gr.render return BlinkEyeRight: Gr.oval wink[6], 400, 200, 600, 400 gr.modify wink[6], "paint", black Gr.oval wink[7], 400,220, 600, 380 gr.modify wink[7], "paint", white Gr.oval wink[8], 400,240, 600, 360 gr.modify wink[8], "paint", white Gr.oval wink[9], 400, 260, 600, 340 gr.modify wink[9], "paint", white Gr.oval wink[10], 450, 280, 550, 320 gr.modify wink[10], "paint", magenta gr.render return BlinkText: t$ = "Blinking Eyes" t2$ = "Demo using gr.paint.get <colour> and gr.modify <pointer>, 'paint', <colour>" gr.text.width w , t$ tab = di_width/2 : tab = tab - (w / 2) gr.text.bold 1 gr.text.draw wink[11],tab, 100, t$ gr.modify wink[11], "paint", red gr.text.draw wink[12],xx, 600, t2$ gr.modify wink[12], "paint", red return SetColours: gr.color 255,0,0,0,1 % black gr.paint.get black gr.color 255,255,0,0,1 % Red gr.paint.get red gr.color 255,0,255,0,1 % green gr.paint.get green gr.color 255,0,0,255,1 % blue gr.paint.get blue gr.color 255,255,255,0,1 % yellow gr.paint.get yellow gr.color 255,0,255,255,1 % cyan gr.paint.get cyan gr.color 255,255,0,255,1 % magenta gr.paint.get magenta gr.color 255,255,255,255,1 % white gr.paint.get white return ChangeTextColour: if x = 2 then gr.modify wink[11], "paint", red if x = 3 then gr.modify wink[11], "paint", green if x = 4 then gr.modify wink[11], "paint", blue if x = 5 then gr.modify wink[11], "paint", yellow if x = 6 then gr.modify wink[11], "paint", cyan if x = 7 then gr.modify wink[11], "paint", magenta if x = 8 then gr.modify wink[11], "paint", white xx += xxx : gr.modify wink[12], "x", xx if xx < - 2500 then xxx = abs(xxx) if xx > 800 then xxx = - xxx gr.render return |
Ответ: RFO BASIC
INPUT "Введите N",N$
GR.OPEN 0, 0, 0, 0 GR.ORIENTATION 2 s=len(N$) GR.SCREEN w,h x=0 y=0 a=1 c=1 r=0 g=0 b=255 u=0 ! Draw a Black text alignment line ! Set the text color to Red with fill = false ! Set the text size to 1/25th screen height GR.TEXT.SIZE w/20 ! Set the text align to Left = 1 GR.TEXT.ALIGN 1 x=1 y=2 skeip: GR.CLS GR.COLOR 255,255, 0, 0, 255 GR.RECT Paddle, w/2, h/2, w/2+40, h/2+40 m=RND()*3+1 GR.COLOR 255,r, g, b, 255 GR.TEXT.DRAW M, 30, 30,str$(s) GR.TEXT.DRAW P, x, y, N$ x=x+a y=y+c IF x>w-s a=-m r=255 g=0 b=0 ENDIF IF x<5 a=m b=255 g=0 r=0 ENDIF IF y>h-5 c=-m g=255 b=0 r=0 ENDIF IF y<12 c=m r=255 b=255 g=0 ENDIF GR.RENDER GOTO skeip DO UNTIL 1 |
Ответ: RFO BASIC
RFO-Basic v.1.88 на сайте разработчика !
|
Ответ: RFO BASIC
Или здесь https://github.com/RFO-BASIC/Basic
|
Ответ: RFO BASIC
В RFO-Basic пишется программа, отлаживается и если все нормально, то сбрасывается
на ПК и в Eclipse собирается в apk . Смотреть готовые программы на RFO-Basic и они же собраные в apk здесь: http://laughton.com/basic/programs/games/ |
Ответ: RFO BASIC
Существует программа QuickAPK ( сайт mougino.free.fr ), которая позволяет без установки Eclipse собирать готовый APK из BAS, остается его только передать на устройство, напр. через WiFi File Transfer.
Приглашаю в группу, посвященную RFO/FreeBasic http://vk.com/65watgames |
Ответ: RFO BASIC
EWO
Пригласи еще людей с http://annimon.com/forum/id396951 и http://4pda.ru/forum/index.php?showt...#entry41732116 |
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Какой кошмарный язык - чем он вам так понравился? Я бы сказал что это больше обёртка над каким-то ассемблером, чем бейсик...
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Кирпи4
Оно страшно смотриться из-за коментариев. А так Basic как Basic. Да и команд новых много ( всего я насчитал 524 ). |
Ответ: RFO BASIC
Функции, читаемый синтаксис, оригинальные бейсик-кейворды типа SELECT - ничего этого у нас нет! Язык с минимальным порогом вхождения - пиши на мне и засирай себе мозги!
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Я как раз и говорю, что за счет того, что bas интерпретируется джава-программой, зашитой в АПК, которая в свою очередь интерп. Дальвиком, скорость по идее должна быть ниже чем "исполнение" собственно программы, изначально писанной на java.
Другое дело, что для того, чтобы что-то на джаве написать, требуется установка пары гигов андроид студио + нудное длительное изучения джавского ООП. И программа красотой не отличается. Здесь это получается сразу и относительно легко, для программиста. Я не спорю ни с кем, просто излагаю мысль. |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
Цитата:
Цитата:
|
Ответ: RFO BASIC
Gector
Я с тобою не согласен. Да другие языки в чем то хороши. Ну и этот хорош тем, что не надо стрелять из пушки по воробьям. Надо чтото быстро сделать и получить результат, лучше варианта нет. И вообще каждый выбирает свой путь. И спорить - убеждать что rfo-basic плохой как то по детски. Типо мое ведерко и лопатка круче чем твоя. |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
Делать игру на java или юнити в данном случае несоизмеримо профессиональнее, чем писать ее на бейсике. В перспективе это большой плюс. |
Ответ: RFO BASIC
Я уже написал , что каждому свое!
Языков программирования великое множество , и человек выбирает то, что ему нужно! И он в свой выбор верит. Вопрос : зачем приходить на сайт с rfo-basicom и пытаться кого-то обратить в другую веру? Тут на сайте похоже всего 3 человека , включая тебя. Лучше бы написал что нибудь полезное по rfo-basic. |
Ответ: RFO BASIC
Цитата:
Воспользуйся кнопкой «Новые сообщения». Ты не первый кто думает что на форуме никого нет. |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
|
Ответ: RFO BASIC
Дейкстру зря упомянули. Ниочем. Что-то гавкнул упырь в 1975, и это пытаются примазать к 2015.
Мессадж услышан. Пусть эмоции будут мне мотивацией. Спасибо. |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
1. Это интерпретатор на Дальвик. 2. Интерпретатор кривого диалекта бейсика. 3. Сохранять apk нельзя. 4. IDE никакой. Подсветки кода нет. Код-комплишена нет. При этом уже давно есть полноценная java и c++. И это еще не говоря о том, что прогать на телефоне не очень удобно в принципе. |
Ответ: RFO BASIC
АПК собирать можно.
IDE - блокнот на ПК. а мужики то и не в курсе :) скорость и отсутствие? аппаратного 3д - два минуса. |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
Цитата:
|
Ответ: RFO BASIC
Программу можно писать на ПК, можно писать в Basic редакторе на планшете, также существует утилита, которая позволяет, имея BAS файл на ПК, тут же собрать из него АПК и пульнуть по Wifi в планшет, на котором уже наблюдать его работу; это если не устраивает редактирование BAS на самом планшете.
Java неадекватна уже наличием ООП, м? На сим разговор дальнейшего смысла не имеет, каждому свое (свой инструмент, свое применеие, своя религия). |
Ответ: RFO BASIC
Цитата:
Цитата:
Цитата:
|
Ответ: RFO BASIC
Gector
Я не могу понять что ты здесь делаешь? Не нравиться rfo-basic, не заходи! |
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
|
Ответ: RFO BASIC
REM Start of BASIC! Program
REM Цветные шарики со звуком и без GR.OPEN 255,200,200,200 GR.ORIENTATION 0 GR.SCREEN w,h start: gr.cls cx=20 cy=h/2 loop: r=255*((sgn(rnd()-0.5)+1)) g=255*((sgn(rnd()-0.5)+1)) b=255*((sgn(rnd()-0.5)+1)) GR.COLOR 255,r,g,b,1 dx=(rnd()-0.3)*30 dy=(rnd()-0.5)*40 cx=cx+dx cy=cy+dy ! tone 3300-cy*10,186 % если убрать "!" будет звук ! 186 минимум миллисекунд данного устройства GR.CIRCLE nc,cx,cy,8 if cy<0 then goto start if cy>h then goto start if cx>w then goto start GR.RENDER goto loop |
Ответ: RFO BASIC
В программе выше для каждого устройства свои миллисекунды!
Они определяются : запускаем набранную программу командой RUN и она если находит не соответствие выдает ОШИБКУ в которой указывает нужные миллисекунды. |
Ответ: RFO BASIC
Описание команд и синтаксиса графики Basic-RFO !
Скачивать здесь : http://annimon.com/forum/id396951-180 |
Ответ: RFO BASIC
Разбор программы Цветные шарики :
смотреть здесь http://4pda.ru/forum/index.php?showtopic=319131&st=20 или http://annimon.com/forum/id396951-180 |
Ответ: RFO BASIC
Есть хороший форум Игроделов - http://gcup.ru/forum/64-0-1
Рекомендую! |
Ответ: RFO BASIC
Предлагаю удалить или закрыть тред.
Причина - ненужность, флуд со стороны автора, реклама. Ну и для профилактики забанить автора, заодно и ewo. Ну или в реактор опустить, но не в теме ведра. |
Ответ: RFO BASIC
Предложение из серии "я не в теме, но какашку подкину"?
|
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Странно что такую жирную тему игнорят на геймдеве.
http://www.gamedev.ru/community/andr...rum/?id=181694 Обычно такие трешовые темы выливаются в 100500 страниц срача и сливаются во флейм. |
Ответ: RFO BASIC
Цитата:
|
Ответ: RFO BASIC
Если тема кому то не нужна, то идите туда куда Вам нужно.
|
Ответ: RFO BASIC
:rolleyes:https://github.com/RFO-BASIC/Basic
Последнее обновление 13 дней назад. Оо и инструкций реально 502 |
Ответ: RFO BASIC
Цитата:
А если серьёзно, то помимо вброса ТС`а в данной тепе есть и последователи. Может парни и будут что-то делать на этой штуке. Что плохого то? |
Ответ: RFO BASIC
Reglon
Вообще не инструкций. А команд 512. И обновляется где-то раз в месяц. А главное использует все устройства смартфона и работает на любой размер экрана. При необходимости компилируется в apk. Понятный язык и много возможностей. Этим он и привлек меня. А то до этого я на Pascal GUI колбасился. Да же сравнивать не хочу. Короче Supper ! |
Ответ: RFO BASIC
Я не знаю приводить ли мне примеры примитивной графики для понятия
синтаксиса RFO-Basic ? |
Часовой пояс GMT +4, время: 15:43. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot