source: Daodan/MSVC/Daodan_Utility.c@ 578

#include <windows.h>
#include <stdlib.h>
#include <stdarg.h>
//#include <stdint.h>
#include "oni_stdio.h"

#include "Daodan_Utility.h"
#include "BFW_Utility.h"
#include "Oni.h"

const double fps = 60.0;

void __cdecl DDrStartupMessage(const char* fmt, ...)
{

        char* buffer;
        va_list ap;
        va_start(ap, fmt);

        buffer = malloc(vsnprintf(NULL, 0, fmt, ap) + 1);
        
        vsprintf(buffer, fmt, ap);
        va_end(ap);

        if (!ONgFileStartup)
                if (!(ONgFileStartup = oni_fopen("startup.txt", "w")))
                        return;

        oni_fprintf(ONgFileStartup, "%s\n", buffer);
        free(buffer);
        
        oni_fflush(ONgFileStartup);
        return;
}

/*
int64_t ONICALL DDrMachineTime_Sixtieths()
{
        static int64_t LastTime, Time;
        int64_t Current;

        Current = LastTime + GetTickCount();

        if (Current > Time)
        {
                LastTime += 1;
                Current += 1;
        }

        Time = Current;

        return (Time * 3) / 50;
}
*/

int64_t ONICALL DDrMachineTime_Sixtieths()
{
        static uint32_t startticks = 0;
        double ticks = 0;
        
        if (startticks)
                ticks = GetTickCount() - startticks;
        else
                startticks = GetTickCount();
        
        return (int64_t)(ticks / 1000.0 * fps);
}

int64_t ONICALL DDrMachineTime_High()
{
//      LARGE_INTEGER PerfCount;
//      
//      if (!QueryPerformanceCounter(&PerfCount))
//              PerfCount.QuadPart = GetTickCount();
//      
//      return PerfCount.QuadPart;
        return GetTickCount();
}

double ONICALL DDrMachineTime_High_Frequency()
{
//      LARGE_INTEGER Frequency;
//
//      if (!QueryPerformanceFrequency(&Frequency))
                return 1000.0;
        
//      return Frequency.QuadPart;
}
        
void ONICALL DDrWeapon2Message(int* weapon, void* output_ptr) 
{
        char buffer[128] = {0};
        char* weapon_string = (char*)(*(weapon + 1)+0x5C);
        int16_t ammo = *(int16_t *)((int)weapon + 0x56);
        int16_t maxammo = *(int16_t *)(*(weapon + 1)+0xC0);
        float ratio = (float)ammo / (float)maxammo;
        
        char ammocolor;
        if              (ratio >= .9)   ammocolor = 'g';
        else if (ratio >= .5)   ammocolor = 'y';
        else if (ratio >= .2)   ammocolor = 'o';
        else                                    ammocolor = 'r';

        DDrMake_Weapon_Message( weapon_string, buffer); //gets the name of the weapon and formats it...probably doesn't need to be in seperate func.
        sprintf(SSrMessage_Find("autoprompt_weapon"), "%s |[%c.%i/%i]|", buffer, ammocolor, ammo, maxammo); //copies the new string to ONGS
        ONiGameState_FindAutoPromptMessage("weapon", output_ptr);       //does what the code i replaced does. Basically tells the game to show the msg.
}


void ONICALL DDrMake_Weapon_Message(char* weapon_string, char* output_ptr) 
{
        char* weapon_msg = NULL;        //The normal "You have recieved X" message.
        char weapon_name[64] = {'\0'};  //The stripped weapon name
        //TODO, someday: dynamically detect different keybindings.
        char default_msg[] = "Press [c.Q] to pick up weapon.";  //default return
        
        //Find the recieved message string
        weapon_msg = SSrMessage_Find(weapon_string);
        //this probably could be reorganized
        if(weapon_msg) {        //SSrMsgblah returns NULL if it can't find the message key
                memcpy(weapon_name, weapon_msg, (strstr(weapon_msg," received.") - weapon_msg )); //strips uneeded characters
                sprintf(output_ptr, "Press [c.Q] to pick up %s", weapon_name);
        }
        else {
                memcpy(output_ptr, default_msg, sizeof(default_msg));
        }
        
}

typedef struct
{
        uint16_t x;
        uint16_t y;

} IMtPoint2D;
IMtPoint2D Point = {256, 250};
extern void* TSrTest;
extern void* TSrScores;
unsigned int lastPasteTime;

//TODO: Fix what happens when you hold down paste
//Check if console is open
void DDrPasteHack()
{
        COtTextArea* cons = *(COtTextArea**)0x00571B74;
        char* clipboardText = 0;
        if(GetAsyncKeyState(0x56) && GetAsyncKeyState(VK_CONTROL) )
        {
                if(cons && cons->text_entries && cons->num_text_entries)
                {
                        //why abs()? so we dont have to reset the timer after a level load.
                        if( abs(ONgGameState->GameTime - lastPasteTime) > 60) {
                                //DDrConsole_Print(cons->text_entries[0].text);
                                if(OpenClipboard(ONgPlatformData.Window))
                                {
                                        unsigned short charsUsed = strlen(cons->text_entries[0].text);
                                        //get rid of the v character
                                        if(charsUsed) charsUsed--;
                                        clipboardText = GetClipboardData(CF_TEXT);
                                        if(clipboardText && strlen(clipboardText) + charsUsed < 502)
                                        {
                                                strcpy_s( cons->text_entries[0].text + charsUsed, 502 - charsUsed - 1, clipboardText);
                                                lastPasteTime = ONgGameState->GameTime;
                                        }
                                        CloseClipboard();
                                }

                        }
                        else
                        {
                                //need to hook whatever controls however often you can repeat characters...i guess.
                                //cons->text_entries[0].text[strlen(cons->text_entries[0].text) - 1] = 0;
                        }
                }
        }
}

void* ScoreboardInstance = 0;
void FLrRun_Scores()
{

        if(!ScoreboardInstance){
                void* TSFFTahoma;
                TMrInstance_GetDataPtr( 'TSFF', "Tahoma", &TSFFTahoma);
                TSrContext_New( TSFFTahoma, 7, 1, 1,  0, &ScoreboardInstance);
        }
        if(ScoreboardInstance){
                int white = 0x00FFFFFF;
                IMtPoint2D DrawLocation = {20, 20};
                TSrContext_SetShade(ScoreboardInstance, white);
                TSrContext_DrawText(ScoreboardInstance, "Scores and crap", 255, 0, &DrawLocation);      
        }
}

void ONICALL DDrText_Hook()
{

        if(TSrTest)
        {
                TSrContext_DrawText(TSrTest, "FINALLY THIS BLOODY TEXT THING WORKS\n Gotta call it at the right point...", 128, 0, &Point);     

        }
        FLrRun_Scores();
        DDrPasteHack();
        
        COrConsole_StatusLine_Display();

}