Финансы без пpоблем: Пеpеговоpный Пункт II (http://hdru.com/cgi-bin/pp2/YaBB.cgi)
>> Общий pаздел >> Windows x-64, запуск нашей локальной версии.
(Message started by: Boris, Kiev. на 12.04.21 в 08:52:31)

Заголовок: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 12.04.21 в 08:52:31
Свершилось!

https://www.opennet.ru/opennews/art.shtml?num=50303

Пользуйтесь, оно работает прилично!

Вольготно меня вернули к жизни, уж было психанул втянуть дерево в клиента.

Странно, что это ещё релиз 12.03.2019 19:06
Похоже нас уже по пальцам можно посчитать.
Повоюем ещё!
Всех адептов ФБП с днём космонавтики!

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем mine-R на 12.04.21 в 18:00:55

on 04/12/21 в 08:52:31, Boris, Kiev. wrote:
Свершилось!

https://www.opennet.ru/opennews/art.shtml?num=50303

Пользуйтесь, оно работает прилично!

Вольготно меня вернули к жизни, уж было психанул втянуть дерево в клиента.

Странно, что это ещё релиз 12.03.2019 19:06
Похоже нас уже по пальцам можно посчитать.
Повоюем ещё!
Всех адептов ФБП с днём космонавтики!


Спасибо!  :)
Полет нормальный! С Днем Космонавтики всех!

На всякий случай (чтобы кому-нибудь чуть легче запустить было) :

otvdm.exe finw.exe C:\FINBAZA\2021\TEST

Это единственная строка BAT или CMD файла. То что красным - поменять на путь к собственной базе знаний.  Нужно переписать в директорию с otvdm.exe файлы finw.exe, finw.hlp ( и в идеале finw.cod  :) только как его получить под х64 что-то неясно ). И создать CMD файл с вышеуказанной строкой. Вместо сплэш-скрина, спустя какое-то время появляется квадратная дырка. Окошко finw движется а дырка неподвижная.

Что касается  меня, то я всё же попривык к локальной x64. Она и последние функции (например такие как [unicfile] ) понимает и если вдруг на большой базе запустить, то не "подстрижет" все f3p под один размер и не запортит базу. Но согласен, привычка - вторая натура  :)  Если чисто для конструирования дерева - то хороший вариант. Спасибо что поделились.

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 12.04.21 в 21:20:05

on 04/12/21 в 18:00:55, mine-R wrote:
Спасибо!  :)
Полет нормальный! С Днем Космонавтики всех!

На всякий случай (чтобы кому-нибудь чуть легче запустить было) :

otvdm.exe finw.exe C:\FINBAZA\2021\TEST

Это единственная строка BAT или CMD файла. То что красным - поменять на путь к собственной базе знаний.  Нужно переписать в директорию с otvdm.exe файлы finw.exe, finw.hlp ( и в идеале finw.cod  :) только как его получить под х64 что-то неясно ). И создать CMD файл с вышеуказанной строкой. Вместо сплэш-скрина, спустя какое-то время появляется квадратная дырка. Окошко finw движется а дырка неподвижная.


Попробуйте:
otvdmw.exe
Работает исключительно с нашим finw.exe! Без дырок и тормозов. Гладко и чинно.
Ещё, если приличная машина с высокой графикой, то в "совместимость" этого же модуля галочку поставьте "отключить масштабирование..." и будет счастье, даже разницы не заметите. Не забудьте, с двигателем  файла справки сделать тоже самое.

Для работы в проводнике пропишите в регистрационном файле сразу реальный путь, а не тот, что парень дал как образец.
Или после, зайдите в regedit и там подправьте.
Тогда просто клацайте finw.exe в нужном каталоге или делайте ярлыки, как обычно.


Quote:
Что касается  меня, то я всё же попривык к локальной x64. Она и последние функции (например такие как [unicfile] ) понимает и если вдруг на большой базе запустить, то не "подстрижет" все f3p под один размер и не запортит базу. Но согласен, привычка - вторая натура  :)  Если чисто для конструирования дерева - то хороший вариант. Спасибо что поделились.

Виндовый локал, уже наверное, с 1998 года исключительно для настройки использую.
Можно уже забыть про виртуальные машины.) и(или) расстаться с Windows х32 по сети или через флешку.
Вообщем последний наш "геморрой" преодолён. Конечно, была детективная история обретения этой ссылки.)  ;D ::)

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем mine-R на 12.04.21 в 21:51:19

Quote:
. . .
Конечно, была детективная история обретения этой ссылки.)  ;D ::)


Ну я так и предположил, что через сегодняшний релиз "Автобилда" (https://github.com/leecher1337/ntvdmx64/releases) (из комментариев по Вашей первой ссылке ) вышли на новость 2019 года  ;D

Вот его я кстати еще не опробовал.. Запустит ли он ultraH-II x32 под 64-битной системой.

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 12.04.21 в 22:38:03

on 04/12/21 в 21:51:19, mine-R wrote:
Ну я так и предположил, что через сегодняшний релиз "Автобилда" (https://github.com/leecher1337/ntvdmx64/releases) (из комментариев по Вашей первой ссылке ) вышли на новость 2019 года  ;D

Действительно, смешно связали.
Всё гораздо прозаичнее, но без ста грамм будет скучно...
w - попробовали?


Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем mine-R на 12.04.21 в 23:29:31

on 04/12/21 в 22:38:03, Boris, Kiev. wrote:
. . .
w - попробовали?


Кстати да. И подержал запущенной подольше, около часа. Ни дырки ни сплэша "О программе" действительно не появилось.  :)

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 21.04.21 в 08:01:31
Ещё одна полезненькая особенность вскрылась!

Под х64 FINW.EXE можно запустить параллельно, т.е. очень удобно открыть две базы и быстренько переходя от окна к окну подтянуть нужное дерево.

"нет худа без добра и добра без худа".)

P.S. Если кто не помнит, то под х32 было сообщение типа "Уже присутствую в памяти", при попытке второго старта FINW.EXE.

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Svetlana на 21.04.21 в 15:17:51
Прямо второе дыхание открылось у "ФБП для windows"   :)

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Svetlana на 22.04.21 в 17:21:26
По совету Бориса скопировала архив к нам на сайт:

http://hdru.com/copy/otvdm-v0.7.0.zip

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 23.04.21 в 18:56:35

on 04/22/21 в 17:21:26, Svetlana wrote:
По совету Бориса скопировала архив к нам на сайт:

http://hdru.com/copy/otvdm-v0.7.0.zip


Идеально было бы эту вещь подвязать к инсталляции FINW.EXE, т.к. сегодня настоящее засилье х64 и без этого чуда многие будут "плеваться".
Как водится инсталляцию нужно предлагать в двух вариантах х32 и х64

Если кто спромогнётся сделать, то выкладывайте. Желательно для 10, 7 и XP, конечно(такие варианты у нас ещё есть.)

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем aaa на 18.04.23 в 10:03:58

on 04/12/21 в 08:52:31, Boris, Kiev. wrote:
Свершилось!

https://www.opennet.ru/opennews/art.shtml?num=50303


Всех адептов ФБП с днём космонавтики!


Поздравляю адептов с днем космонавтики но 2023 года и пусть прошедшим.

маленький подарок - программка для тех кто учится программировать на языке ФБП, из 1998 года.


* решето Эратосфена (простые числа)
   Простые числа от 1 до N. "Решето" Эратосфена (sieve - это решето).
Алгоритм приведен в Wood T.C. <<CACM>>,1961, No.3, "Библиотека алгори-
тмов 1б-50б, М.И.Агеев др., М. "Сов.радио", 1975, Алгоритм 35б.
В нем необходимо вычисление квадратного корня, программа для  которого
приведена также отдельно в файле square.rpt

t0=[tm]
t=1                     сотни
nn=[ir 'Nmax= ',1,0]    граница
goto start
*                       Подпрограмма квадратного корня s=&#8730;pp
:square
m=[get %,pq+'sq']       предыдущий корень
! m<0.001
m=pp/2                  первое приближение
!
:nextm
l=pp/m
! (l-m)*(l-m)>0.0000000000001
m=(l+m)/2
goto nextm
!
s=m                     квадратный корень
return
:start
pn=1                    индекс элемента таблицы простых чисел
ps=[intsn pn]           символьный
z=[set %,ps,1]          первое простое число
pn=2
ps=[intsn pn]
z=[set %,ps,2]          второе простое число
pn=3
ps=[intsn pn]
pq=[intsn pn-1]
z=[set %,ps,3]          третье простое число
pp=3                    первый кандидат в таблицу
:nextpp
pp=pp+2
tp=[tr pp/1000]
! tp>t
z=[hz 5000+t*10,10]
t=t+1
!
! pp>nn                 превзошли nn, макс.N =pn
goto printtab
!
call square             s=&#8730;pp
k=2                     номер делителя 2,3...
:nextk
de=[get %,[intsn k]    величина делителя (1),(2)....
! de<s+0.0001           делитель не больше &#8730;nn
goto test
!
pn=pn+1
ps=[intsn pn]
z=[set %,ps,pp]         новое простое число
z=[set %,ps+'sq',s]     его корень (будет использоваться как первое приближение
*                       следующего корня)
goto nextpp             на определение следующего
!
:test                   проверка делимости
! [tr pp/de]*de=pp      делится нацело на p(k), pp - составное
goto nextpp
!
k=k+1
goto nextk
:printtab
t1=[tm]
 
  ^^^t0        -        ^^^t1
 
     N   ^^^^^^nn        шаг
 
r=0
ms=0
i=1
:nexti
pi=[get %,[intsn i]
rp=pi-r
r=pi
! rp>ms
ms=rp
!
  ^^^^i ^^^^^^^pi     ^^^^^rp
i=i+1
! i<pn+0.00001
goto nexti
!
 
  Максимальный шаг    ^^^^^ms
 
stop



Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Boris, Kiev. на 19.04.23 в 09:28:54

on 04/18/23 в 10:03:58, aaa wrote:
Поздравляю адептов с днем космонавтики но 2023 года и пусть прошедшим.

маленький подарок - программка для тех кто учится программировать на языке ФБП, из 1998 года.


Магия простых чисел до сих пор не обрела формулу. Не так ли?
Интересно, какая учётная или другая задача вас сподвигла к этому посту.

Заголовок: Re: Windows x-64, запуск нашей локальной версии.
Прислано пользователем Vladimir на 27.04.23 в 01:18:48
[quote author=aaa
маленький подарок - программка для тех кто учится программировать на языке ФБП, из 1998 года.]

Нормуль работает запустил на миллион вот получил максимальное простое число

  78499    999983           шаг 4




Powered by YaBB 1 Gold - SP 1.3.2!
Forum software copyright й 2000-2004 Yet another Bulletin Board