mirror of
https://github.com/sfall-team/int2ssl.git
synced 2026-07-27 16:52:42 -07:00
22 lines
439 B
C++
22 lines
439 B
C++
// FalloutScript.cpp : implementation file
|
|
//
|
|
|
|
#include "stdafx.h"
|
|
#include "FalloutScript.h"
|
|
|
|
|
|
// CFalloutScript::CDefObject
|
|
CFalloutScript::CDefObject::CDefObject(ObjectType type, ULONG ulAttributes, ULONG ulObjectData)
|
|
{
|
|
m_ulAttributes = ulAttributes;
|
|
|
|
switch(m_ObjectType = type) {
|
|
case OBJECT_VARIABLE:
|
|
m_ulVarValue = ulObjectData;
|
|
break;
|
|
|
|
case OBJECT_PROCEDURE:
|
|
m_ulProcIndex = ulObjectData;
|
|
}
|
|
}
|