24 lines
1.1 KiB
Plaintext
24 lines
1.1 KiB
Plaintext
|
<EFBFBD><EFBFBD>v e r s i o n = 2
|
|||
|
|
|
|||
|
|
: i f : < n o t > < e n v i r o n m e n t . d a y > = s u n d a y
|
|||
|
|
: t h e n
|
|||
|
|
@ T e x t . S h o w ( W e ' r e n o t o p e n t o d a y . )
|
|||
|
|
: e n d
|
|||
|
|
: e n d i f
|
|||
|
|
|
|||
|
|
: i f : < r e g i s t e r . r e g i s t e r e d ( b a r g a i n s h o p _ s u n d a y ) > = t r u e
|
|||
|
|
: t h e n
|
|||
|
|
@ T e x t . S h o w ( I o n l y s e l l i t e m s ~ o n c e a d a y . )
|
|||
|
|
: e n d
|
|||
|
|
: e n d i f
|
|||
|
|
|
|||
|
|
@ T e x t . S h o w ( W e l c o m e ! * I r u n t h e B a r g a i n ~ S h o p ! * I s e l l v a l u a b l e i t e m s ~ f o r l o w p r i c e s . * D o y o u w a n t t o b u y ~ s o m e t h i n g ? )
|
|||
|
|
@ O p t i o n s . s h o w ( Y e s , N o )
|
|||
|
|
: w h e n : Y e s
|
|||
|
|
@ R e g i s t e r . r e g i s t e r ( b a r g a i n s h o p _ s u n d a y )
|
|||
|
|
@ s c r e e n . t r a d e ( { 3 6 | 1 | 4 5 0 0 } { 1 1 0 | 1 | 6 5 0 } { 1 1 1 | 1 | 3 5 0 0 } { 1 3 1 | 1 | 9 0 0 } { 1 3 2 | 1 | 4 6 0 0 } , t r u e , f a l s e )
|
|||
|
|
: w h e n : N o
|
|||
|
|
@ T e x t . S h o w ( I s t h a t r i g h t ? ~ T h a t ' s a s h a m e ! )
|
|||
|
|
: e n d w h e n
|
|||
|
|
|
|||
|
|
: e n d
|