[smiir]

Fiz uma base aqui rapidinho, veja agora faзa o resto, qualquer coisa peзa ajuda.

pawn Код:

#include <  A_SAMP  >
#include <   ZCMD   >
#include <   DOF2   >
#include <  SSCANF2 >

#define maxCasas  (10) // Mбximo de Casas


public OnFilterScriptInit() {
    return true;
}

public OnFilterScriptInit() {
    DOF2::Exit();
    return true;
}

COMMAND:criarcasa(playerid, params[]) {
    new intCasa, valorCasa, Float:Position[4], Arquivo[64];
    if(sscanf(params, "ii", intCasa, valorCasa))
        return SendClientMessage(playerid, -1, "[ USE ]: /criarcasa [Interior ID] [Valor]");
    GetPlayerPos(playerid, Position[0], Position[1], Position[2]);
    GetPlayerFacingAngle(playerid, Position[3]);
    for(new x = 0; x < maxCasas; x++) {
        format(Arquivo, 64, "Casas/%i.ini", x);
        if(!DOF2::FileExists(Arquivo)) {
            DOF2::CreateFile(Arquivo);
            DOF2::SetFloat(Arquivo, "Cord X", Position[0]);
            DOF2::SetFloat(Arquivo, "Cord Y", Position[1]);
            DOF2::SetFloat(Arquivo, "Cord Z", Position[2]);
            DOF2::SetFloat(Arquivo, "Cord A", Position[3]);
            DOF2::SetInt(Arquivo, "Int ID", intCasa);
            DOF2::SetInt(Arquivo, "Valor", valorCasa);
            DOF2::SetString(Arquivo, "Dono", "Ninguem");
            DOF2::SaveFile();
            break;
        }
    }
    return true;
}