19.06.2018 / 12:26 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Цитата NoFail: 1961uvg, Там именно все изображения двигаются, мне же надо из нескольких изображений на экране получить одно изображение, что бы двигать ОДНО изображениеGr.bitmap.create objbmp, width, height Gr.bitmap.drawinto.start objbmp 	! Наполняй здесь свою карту Gr.bitmap.drawinto.end
   | 
  19.06.2018 / 12:51 |  | 
NoFail    Пользователь  
   Сейчас: Offline 
 Имя: Александр Регистрация: 14.06.2018
   | Тоесть наполнять карту через gr.bitmap.draw?
   | 
  19.06.2018 / 20:51 |  | 
MicroX    Пользователь  
   Сейчас: Offline 
 Имя: MicroX Регистрация: 06.05.2018
   | Есть два вопроса. 1. Как прочитать файл целиком, и записать его в другой файл ? 2. Как сделать ввод с консоли ?
   | 
  19.06.2018 / 22:58 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Моя супруга однажды увлеклась игрой -- анаграммой, где из слова нужно составлять другие слова. И нравилось ей зарабатывать в этом деле по три звезды за слово. Только вот не всегда получалось, даже с моей помощью, вот и задумал я тогда создать этакого помощника.  	При первом запуске программа создает, словарь в памяти телефона в папке "anagram helper" записанный в листинге. И при последующих запусках обращается к нему.  Из-за того, что словарь в листинге записан в одну строку, его затруднительно открывать в редакторе, НО загрузка в память происходит быстрее на несколько порядков, чем с разделениями строк через "~". После создания словаря, его можно свободно редактировать и добавлять свои слова. Словарь был скачан с [url=] http://blog.kislenko.net/show.php?id=1678[/url] спасибо автору. Вобщем встречайте! P.S  MicroX найдешь в нем для себя ответы. 
 Прикрепленные файлы:   Screenshot_2018(…).png (47.29 кб.) Скачано 90 раз    Screenshot_2018(…).png (36.41 кб.) Скачано 86 раз    Screenshot_2018(…).png (22.07 кб.) Скачано 96 раз    Anagram Helper.bas (1487.5 кб.) Скачано 6507 раз   | 
  20.06.2018 / 01:49 |  | 
Linevic    Пользователь  
   Сейчас: Offline 
 Имя: Reestr2Waper Регистрация: 12.06.2014
   | Наверняка я всем успел надоесть своей неправильно работающей функцией, но сегодня я разобрался, что к чему. Всё дело в переносе строки. Команды между if <условие> then  и еndif должны начинаться каждая с новой строки. А я их в одну строку писал. Вот вам исправленная функция. Пример использования - в том же файле.
   Изменено Linevic (20.06 / 01:51) (всего 2 раза)
 Прикрепленные файлы:   ongoing_notify_(…).bas   (0.79 кб.) Скачано 646 раз   | 
  20.06.2018 / 08:49 |  | 
1961uvg    Пользователь  
   Сейчас: Offline 
 Имя: Victor Откуда: Минск Регистрация: 28.07.2015
   | bOing   Я просто в шоке - как человек набрал такой словарь ! На смартфоне при просмотре листинга такие тормоза , что можно заснуть.
   | 
  20.06.2018 / 12:08 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Цитата Linevic: Всё дело в переносе строки. Команды между if <условие> then  и еndif должны начинатьсяЭто описано в мануале... Читаем!
   | 
  20.06.2018 / 12:11 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Цитата 1961uvg: как человек набрал такой словарь !Перейди по ссылке в том посте. Автор подробно описал процесс
   | 
  20.06.2018 / 12:20 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Цитата 1961uvg: На смартфоне при просмотре листинга такие тормоза , что можно заснуть.Весь словарь находится в ОДНОЙ СТРОКЕ листинга, отсюда быстрая загрузка листинга и медленный просмотр в редакторе. 67000 строк для бейсика --- было серьезным испытанием      | 
  20.06.2018 / 12:57 |  | 
b0ing    Пользователь  
   Сейчас: Offline 
 Имя: Макс Регистрация: 24.08.2016
   | Цитата Linevic: Наверняка я всем успел надоесть своей неправильно работающей функцией, но сегодня я разобрался, что к чему. Всё дело в переносе строки. Команды между if <условие> then  и еndif должны начинатьсяПозволил себе исправить... Вибрация указывает на срабатывание таймера. Теперь миллисекунды соответствуют реальным миллисекундам, а t0=предудыщему срабатыванию. Открыть спойлер Закрыть спойлер ! рекомендуется указывать от 500 до  
! 1000, чтобы обновление   
! уведомления не  
! тормозило.  
   
fn.def ongoing_notify(t0, title$, subtitle$, text$, update_interval)  
    if !t0 then t0=time()  
    t=time()  
    if t-t0=update_interval then  
        array.load v[], 0, 50  
        vibrate v[], -1  
        notify title$, subtitle$, text$, loop  
        t0=t  
    endif  
    fn.rtn t0  
fn.end  
   
DO  
    n = ongoing_notify(n, "Заголовок", "Подзаголовок", "Текст", 1000)  
    t=t+1  
    print t  
UNTIL 0  
   Изменено b0ing (20.06 / 12:59) (всего 1 раз) |