# F7, etapa 2: compra na loja do Evolution Z (Shop_Init/compra, menu_v_d.c:276-291,1111-1123): item listado e vendido
# com nível de estoque até loja.nivel, saldo suficiente, não possuído; a compra liga posse e debita. Estado: dinheiro
# pelo setter do jogo (Save_AddMoney); 500.000 ainda não foi conferido contra os preços do nível 0 do manifesto.
# O preço exato (manifesto da etapa 1) não é conferido, só o débito; o item é o primeiro da lista de compra.
marco loja_estoque
evento comprar o primeiro item da lista da loja e sair do Evolution Z (DcSave_Start grava)
exige dinheiro = 0
exige loja.nivel = 0
exige item[0] = 0
chama Save_AddMoney 500000
depois dinheiro <= 499999        # alguma compra debitou (nenhuma outra saída de dinheiro nesse fluxo)
depois item[0] tem 1              # o primeiro da lista de compra no New Game (medido na x86)
