Обфускатор QUIK

Версия 1.2 от 28.01.2012

Генерация зашифрованного кода для портфелей программы Quik. Данная утилита позволит Вам защифровать код на QPILE. Конечно, это не сделает его взломостойким, однако, существенно затруднит его модификацию.
Утилита шифрования портфеля на данный момент работает в тестовом режиме и некоторые функции обфускации QPILE еще планируется реализовать. Также следует обратить внимание на то, что если вы используете опцию портфеля USE_CASE_SENSITIVE_CONSTANTS и опцию преобразования к верхнему регистру, то что-то может перестать работать.

Для обфускации портфеля Quik введите свой код в форме ниже, укажите нужные опции и нажмите кнопку "Закодировать портфель".

Пример 1

PORTFOLIO_EX Tri_Svechi;
DESCRIPTION Tri_Svechi;
CLIENTS_LIST ALL_CLIENTS;
FIRMS_LIST ALL_FIRMS;
 
PROGRAM
new_global("ClassCodeList","QJSIM") ' код класса инструмента
new_global("Instrument","SBER") ' название инструмента
new_global("Interval",5) 
new_global("DayToFind",5) 
new_global("MessageShow","Три свечи для Сбербанка.") 
new_global("Percent",0.005) 
new_global("PrevCurMin","") 
new_global("CandleToFind",3) 
cDATETIME=GET_DATETIME()
CurYear=get_value(cDATETIME, "YEAR")
CurMonth=get_value(cDATETIME, "MONTH")
CurDay=get_value(cDATETIME, "DAY")
CurHour = GET_VALUE(cDATETIME, "Hour")
CurMin = GET_VALUE(cDATETIME, "Min")
CurMin1 = Interval*Floor(CurMin/Interval) ' округляем минуты до "интервальных"
CurTime="" & CurHour & CurMin1
if (PrevCurMin<>CurTime) 
		History=CREATE_COLLECTION()
		Get_CANDLE_COLLECTION()
		if (CandleCount>=CandleToFind) && CandleToFind>=3
			CountHistory=0+GET_COLLECTION_COUNT(History)
			if CountHistory>=CandleToFind 
				output=GET_COLLECTION_ITEM(History,0)
				High0=GET_VALUE(output,"High")
				Low0=GET_VALUE(output,"Low")

output=GET_COLLECTION_ITEM(History,1)
				High1=GET_VALUE(output,"High")
				Low1=GET_VALUE(output,"Low")

output=GET_COLLECTION_ITEM(History,2)
				High2=GET_VALUE(output,"High")
				Low2=GET_VALUE(output,"Low")

dHigh1=ABS(High0-High1)/High0
				dHigh2=ABS(High0-High2)/High0
				Percent100=Percent/100
				if (dHigh1<Percent100) && (dHigh2<Percent100)
						message(MessageShow & " (По максимумам)",1)
					else
						dLow1=ABS(Low0-Low1)/Low0
						dLow2=ABS(Low0-Low2)/Low0
						if (dLow1<Percent100) && (dLow2<Percent100)
							message(MessageShow & " (По минимумам)",1)						
						end if 
				end if 				
			end if 
		end if 		
		PrevCurMin=CurTime		
end if

func Get_CANDLE_COLLECTION()
		' получение истории по указанному инструменту 
		DELETE_ALL_ITEMS()
		CandleCount=0
		CurMin = Interval*Floor(CurMin/Interval) ' округляем минуты до "инте

Преобразовывать к верхнему регистру
Удалять лишние пробелы и табуляцию
Удалять коментарии

Кодировать имена функций
Кодировать имена переменных