Web3 Loyalty: Крипто-баллы и NFT-Статусы

;; Логика начисления токенов (FunC/TON)
() recv_internal(int msg_value, cell in_msg_full, slice in_msg_body) impure {
    ;; 1. Проверяем, что запрос от валидного кассира
    slice sender_address = parse_sender_address(in_msg_full);
    throw_unless(403, equal_slices(sender_address, admin_oracle()));

    ;; 2. Читаем ID клиента и сумму покупки
    slice customer_address = in_msg_body~load_msg_addr();
    int purchase_amount = in_msg_body~load_coins();

    ;; 3. Лояльность 5% кэшбека в токенах бренда
    int tokens_to_mint = muldiv(purchase_amount, 5, 100);

    ;; 4. Чеканим (mint) токены прямо на кошелек клиента
    mint_tokens(customer_address, tokens_to_mint);
    
    ;; 5. Если накоплено > 10,000 отправляем Gold NFT
    if (check_balance(customer_address) > 10000000) {
        issue_vip_nft(customer_address, 2); ;; Level 2
    }
}