17 lines
230 B
Plaintext
17 lines
230 B
Plaintext
; Copyright (C) 2024 Aer Iz
|
|
; Licensed under WTFPL <http://www.wtfpl.net>
|
|
|
|
maxsize
|
|
args 1 ; Насколько сварить носок
|
|
sub
|
|
|
|
@ 1
|
|
kjnz 2
|
|
quit
|
|
|
|
@ 2
|
|
#expr -
|
|
push -1
|
|
_unix_random
|
|
swap
|
|
jmp 1 |