labast/scripts/std/unix/ВАРЁНЫЙНОСОК.lb

17 lines
223 B
Plaintext
Raw Normal View History

2024-02-05 12:13:44 +00:00
; Labashki standard library
; Written by Labashki developer - aeris
2024-02-05 15:13:32 +00:00
maxsize
args 1 ; Насколько сварить носок
sub
2024-02-05 12:13:44 +00:00
@ 1
2024-02-05 15:13:32 +00:00
jnz 2
quit
2024-02-05 12:13:44 +00:00
@ 2
2024-02-05 15:13:32 +00:00
#expr -
push -1
_unix_random
swap
jmp 1