diff options
Diffstat (limited to 'world/map/npc/functions/vault.txt')
| -rw-r--r-- | world/map/npc/functions/vault.txt | 76 |
1 files changed, 76 insertions, 0 deletions
diff --git a/world/map/npc/functions/vault.txt b/world/map/npc/functions/vault.txt index 25e6d263..ee30863c 100644 --- a/world/map/npc/functions/vault.txt +++ b/world/map/npc/functions/vault.txt @@ -6,6 +6,7 @@ function|script|VaultLogin { if (##VAULT < 1) goto L_Return; + // TODO: Or #VAULT ? Which of the two is set? callsub S_Exp; callsub S_Gold; @@ -39,6 +40,8 @@ S_Preset: set #X21, (#X21 & ~(BYTE_3_MASK)) | (##PRESET << BYTE_3_SHIFT); // Each preset is 5 levels (Preset 1 = Lv 5, Preset 10 = Lv 50, Max Preset 20 - hard limit is 127) + // TODO: Give more ammo, iron powder, sulphur powder, etc. instead of equips + // Give also some bug legs and maggot slime if applicable? /* Handle weapons */ if (##PRESET >= 1 && @last_preset < 1) getitem "SharpKnife",1; @@ -109,3 +112,76 @@ S_Preset: return; } + +// Remember: ##VAULT_EXP, ##VAULT_GOTO, ##VAULT_MLTO for Mirror Lake Protocol +// However, without kick(7), it is not really worth anything +// Remember: Quote symbols are illegal, simple or double, except for parameter +// To reset the database: +// cleararray $EXPORT_DATA$[0], "", 254; +// set $EXPORT_MAX_ID, 0; + +// Schemas: +//API_VAULT: "UID", ##VAULT, "GID", getcharid(3) +//API_SENDMAIL: "UID": ##VAULT, "MSG": "message", "TITLE": "subject line" +// +// Using the API_EXPORT hack for TMWA: +// +// set $@API_PROTOCOL, API_SENDMAIL; +// set $@API_DATA$, "'UID': 0, 'TITLE': 'About TMWA', 'MSG': 'I hate it!'"; +// callfunc "FlushAPI"; +// +// (The curly brace is added to DATA on its own) +function|script|FlushAPI +{ + // Function called improperly + // DATA cannot be null or the array order will crash + if ($@API_PROTO <= 0) goto L_Dumb; + if ($@API_DATA$ == "") goto L_Dumb; + + // Save it to mapreg + // The script will strip "##" + // and convert the part after to a JSON dict + set $EXPORT_DATA$[$EXPORT_MAX_ID], $@API_PROTO + "##" + $@API_DATA$; + set $@API_PROTO, ""; + set $@API_DATA$, ""; + + // Update TMWA tracker + set $EXPORT_MAX_ID, $EXPORT_MAX_ID + 1; + + // Keep in mind an array can only go up to 255 + // Trying to go past that, causes a SIGSEGV and map server dies + // So we periodically truncate the table when it's full + if ($EXPORT_MAX_ID > 240) goto L_Flush; + if ($EXPORT_MAX_ID == 120) goto L_Flush2; + return; + +L_Dumb: + debugmes "FlushAPI called without enough arguments"; + debugmes " - $@API_PROTO, API_* constant"; + debugmes " - $@API_DATA$, json dict without curly braces"; + return; + +L_Flush: + cleararray $EXPORT_DATA$[0], "", 220; + set $EXPORT_MAX_ID, 0; + return; + +L_Flush2: + cleararray $EXPORT_DATA$[220], "", 25; + return; +} + +function|script|VaultLogout +{ + if (##VAULT < 1) goto L_Return; + // TODO: Or #VAULT ? Which of the two is set? + set $@API_PROTOCOL, API_VAULT; + set $@API_DATA$, "'UID': "+##VAULT+", 'GID': "+getcharid(3); + callfunc "FlushAPI"; + + return; + +L_Return: + return; +} + |