Покажите мне магосов ассемблера.
29.06.2018, 20:11
Эти существа где-то на ином плане реальности, ищи там.
Просто посмотри на японцев.
Джаз пятидесятых (да и довоенный). Ранний рок-н-ролл. Гениальные объебосы классик-рока семидесятых.
Да и гранж тот же не так уж и плох, как и пих-пох отфильтрованный.
Цимес восьмидесятых в том, что весь отстой потихоньку отфильтровался, осталось только качество. Сейчас то же самое с евродэнсом девяностых происходит.
Да и гранж тот же не так уж и плох, как и пих-пох отфильтрованный.
Цимес восьмидесятых в том, что весь отстой потихоньку отфильтровался, осталось только качество. Сейчас то же самое с евродэнсом девяностых происходит.
Ну дык йопт, тлетворное влияние Фрэнка Фразетты, Дрю Струзана и Вальехо.
В семидесятых-восьмидесятых даже трамвайный контролер обязан был выглядеть как Химэн.
В семидесятых-восьмидесятых даже трамвайный контролер обязан был выглядеть как Химэн.
И все-таки, давайте поговорим про Форт. Ахуенный же язык
https://ru.wikipedia.org/wiki/%D0%A4%D0%BE%D1%80%D1%82_(%D1%8F%D0%B7%D1%8B%D0%BA_%D0%BF%D1%80%D0%BE%D0%B3%D1%80%D0%B0%D0%BC%D0%BC%D0%B8%D1%80%D0%BE%D0%B2%D0%B0%D0%BD%D0%B8%D1%8F)#%D0%9F%D1%80%D0%B8%D0%BC%D0%B5%D1%80%D1%8B_%D0%BF%D1%80%D0%BE%D0%B3%D1%80%D0%B0%D0%BC%D0%BC
https://ru.wikipedia.org/wiki/%D0%A4%D0%BE%D1%80%D1%82_(%D1%8F%D0%B7%D1%8B%D0%BA_%D0%BF%D1%80%D0%BE%D0%B3%D1%80%D0%B0%D0%BC%D0%BC%D0%B8%D1%80%D0%BE%D0%B2%D0%B0%D0%BD%D0%B8%D1%8F)#%D0%9F%D1%80%D0%B8%D0%BC%D0%B5%D1%80%D1%8B_%D0%BF%D1%80%D0%BE%D0%B3%D1%80%D0%B0%D0%BC%D0%BC
На моём дескотопе и на рабочей станции ты можешь скриптовать поведение начального загрузчика, который ядро ОС грузит, на форте:
include /boot/support.4th
include /boot/color.4th
include /boot/delay.4th
include /boot/check-password.4th
only forth definitions
: bootmsg ( -- )
loader_color? dup ( -- bool bool )
if 7 fg 4 bg then
." Booting..."
if me then
cr
;
include /boot/support.4th
include /boot/color.4th
include /boot/delay.4th
include /boot/check-password.4th
only forth definitions
: bootmsg ( -- )
loader_color? dup ( -- bool bool )
if 7 fg 4 bg then
." Booting..."
if me then
cr
;
only forth also support-functions also builtins definitions
\ pci-device-count pci-id
\
\ Counts the number of instances of pci-id in the system and reports
\ it to the user.
: pci-device-count
0= if ( interpreted ) get_arguments then
0= if ." Need an argument" cr abort then
\ First argument is 0 when we're interprated. See support.4th
\ for get_arguments reading the rest of the line and parsing it
\ stack: argN lenN ... arg1 len1 N
hex ?number decimal
0= if ." Bad pci-id given (must be legal hex value)" cr abort then
dup pcibios-device-count ." Found " . ." instances of " hex . decimal cr
;
also forth definitions also builtins
builtin: pci-device-count
\ pci-device-count pci-id
\
\ Counts the number of instances of pci-id in the system and reports
\ it to the user.
: pci-device-count
0= if ( interpreted ) get_arguments then
0= if ." Need an argument" cr abort then
\ First argument is 0 when we're interprated. See support.4th
\ for get_arguments reading the rest of the line and parsing it
\ stack: argN lenN ... arg1 len1 N
hex ?number decimal
0= if ." Bad pci-id given (must be legal hex value)" cr abort then
dup pcibios-device-count ." Found " . ." instances of " hex . decimal cr
;
also forth definitions also builtins
builtin: pci-device-count
Я помню когда мы с посонами в нашей бурной молодости разрабатывали l2j (эмулятор сервера Lineage 2), мейнтейнер форка втащил интерпретатор Forth и стал писать на нём логику. С тех пор у меня PTSD. Язык хорош для того чтобы дома на петпрожектах поугарать, но не тащите это, пожалуйста, в продакшен.
Похоже на обложку нового сингла от Manowar
Чтобы написать коммент, необходимо залогиниться
