if $filelist
goto @page
elseif $get
goto @get_files
endif
var $domain=dhe-ond.wap.sh
var $js=
var $meta=
var $alihkan=call htmlspecialchars $val=$meta;
var $noscript=
pri $js $domain $noscript $meta disini jikalau tidak dialihkan secara otomatis
print $hideads
404 Error page not found
Maaf halaman ini tidak dapat diakses karena halaman tidak ditemukan.
goto @ending
@page
# FILE ASLI
var $start_file_name=call strpos $haystack=$filelist;$needle=|;$offset=0;
var $file_name=call substr $val=$filelist;$start=1;$length=($start_file_name-1);
# FILE BASE
var $start_file_base=call strripos $haystack=$file_name;$needle=.;$offset
var $file_name_base=call substr $val=$file_name;$start=0;$length=$start_file_base;
# CARI EKTENSI
var $search_ektensi=$file_name#
var $end_ektensi=call strripos $haystack=$search_ektensi;$needle=#;$offset
var $file_ektensi=call substr $val=$file_name;$start=($start_file_base+1);$length=($end_ektensi-$start_file_base-1);
# FILE MIME ASLI
var $start_file_mime=call strpos $haystack=$filelist;$needle=@;$offset=0;
var $file_mime=call substr $val=$filelist;$start=($start_file_name+1);$length=($start_file_mime-$start_file_name-1);
# UKURAN FILE
var $start_file_size=call strpos $haystack=$filelist;$needle=&;$offset=0;
var $file_size=call substr $val=$filelist;$start=($start_file_mime+1);$length=($start_file_size-$start_file_mime-1);
# WAKTU FILE UPLOAD
var $start_file_date=call strpos $haystack=$filelist;$needle=];$offset=0;
var $file_date=call substr $val=$filelist;$start=($start_file_size+1);$length=($start_file_date-$start_file_size-1);
# MODIF FILE DATE
# TAHUN
var $start_mod_year=call strpos $haystack=$file_date;$needle=-;$offset
var $file_year=call substr $val=$file_date;$start=0;$length=$start_mod_year;
# BULAN
var $start_mod_month=call strripos $haystack=$file_date;$needle=-;$offset
var $file_month=call substr $val=$file_date;$start=($start_mod_year+1);$length=($start_mod_month-$start_mod_year-1);
# TANGGAL
var $spasi=call chr $val=32
var $replace=call str_ireplace $subject=$file_date;$search=$spasi;$replace=#;
var $start_mod_date=call strpos $haystack=$replace;$needle=#;$offset
var $file_dates=call substr $val=$file_date;$start=($start_mod_month+1);$length=($start_mod_date-$start_mod_month-1);
# WAKTU
var $file_time=call substr $val=$file_date;$start=($start_mod_date+1);$length=5;
# GET TIME FILE
var $time=$file_time, $file_dates/$file_month/$file_year
# SORTIR SOURCE
if $file_mime==text/html
var $source_doc=call source $file=$subpath$folder/$file_name;$html_safe=0;
elseif $file_mime==text/plain
var $source_doc=call source $file=$subpath$folder/$file_name;$html_safe=0;
else
var $source_doc=call source $file=$subpath$folder/desc/$file_name_base;$html_safe=0;$nl2br=1;
endif
# DESKRIPSI FILE TEXT
var $start_desc=call strpos $haystack=$source_doc;$needle=DESC=;$offset
var $end_desc=call strripos $haystack=$source_doc;$needle==DESC;$offset
var $trial_description=call substr $val=$source_doc;$start=($start_desc+5);$length=($end_desc-$start_desc-5);
var $trial_description=call str_ireplace $subject=$trial_description;$search=n//;$replace=
var $trial_description=call ucfirst $val=$trial_description
# CEK DESCRIPTION KODE
var $cek_description_start=call substr $val=$source_doc;$start=$start_desc;$length=5;
var $cek_description_end=call substr $val=$source_doc;$start=$end_desc;$length=5;
var $cek_description=$cek_description_start$cek_description_end
# CEK DESC
if $cek_description==DESC==DESC
var $description=$trial_description
endif
# URL TAG TEXT
var $start_urlfile=call strpos $haystack=$source_doc;$needle=URL=;$offset
var $end_urlfile=call strripos $haystack=$source_doc;$needle==URL;$offset
var $trial_urlfile=call substr $val=$source_doc;$start=($start_urlfile+4);$length=($end_urlfile-$start_urlfile-4);
var $trial_urlfile=call str_ireplace $subject=$trial_urlfile;$search=http://;$replace=;
var $trial_urlfile=call str_ireplace $subject=$trial_urlfile;$search=https://;$replace=;
# CEK URL TAG
var $cek_urlfile_start=call substr $val=$source_doc;$start=$start_urlfile;$length=4;
var $cek_urlfile_end=call substr $val=$source_doc;$start=$end_urlfile;$length=4;
var $cek_urlfile=$cek_urlfile_start$cek_urlfile_end
var $dfold=call str_ireplace $subject=$folder;$search=/;$replace=
var $trial_urlfile=[$dfold|$trial_urlfile@$file_name]
var $compress=call base64_encode $val=$trial_urlfile
var $compress=?get=$compress
# CEK URL
if $cek_urlfile==URL==URL
var $urlfile=$compress
else
var $urlfile=http://xtgem.com/filebrowser/file_edit?file=$subpath$folder/$file_name
endif
# ORIGINAL SIZE
var $start_ori=call strpos $haystack=$source_doc;$needle=ORI=;$offset=0;
var $end_ori=call strripos $haystack=$source_doc;$needle==ORI;$offset=0;
var $trial_ori_size=call substr $val=$source_doc;$start=($start_ori+4);$length=($end_ori-$start_ori-4);
var $trial_ori_size=Ukuran asli: $trial_ori_size
# CEK SYNTAX ORI
var $cek_ori_start=call substr $val=$source_doc;$start=$start_ori;$length=4;
var $cek_ori_end=call substr $val=$source_doc;$start=$end_ori);$length=4;
var $cek_ori_size=$cek_ori_start$cek_ori_end
var $cek_anying=call str_ireplace $subject=$cek_ori_size;$search===;$replace=**;
# GAK MAU MASUK ANYING TEH, +NGADAT :D
# MAAF GK SOPAN, TAPI KESEL NJIIRR UDAH HAMPIR BERAPA HARI LAH UBEK'' SCRIPT DONLOD INI :3
if $cek_anying==ORI**ORI
var $ori_size=$trial_ori_size
endif
#TITLE PART
var $start_title=call strpos $haystack=$source_doc;$needle=TLP=;$offset=0;
var $end_title=call strripos $haystack=$source_doc;$needle==TLP;$offset=0;
var $trial_title_part=call substr $val=$source_doc;$start=($start_title+4);$length=($end_title-$start_title-4);
# CEK SYNTAX TITLE PART
var $cek_title_part_start=call substr $val=$source_doc;$start=$start_title;$length=4;
var $cek_title_part_end=call substr $val=$source_doc;$start=$end_title;$length=4;
var $cek_title_part=$cek_title_part_start$cek_title_part_end
# CEK TITLE PART
if $cek_title_part==TLP==TLP
var $title_part=$trial_title_part
endif
# CARI EKTENSI DALAM DOC
var $start_ektensi_text=call strpos $haystack=$source_doc;$needle=***;$offset=0;
var $end_ektensi_text=call strripos $haystack=$source_doc;$needle=***;$offset=0;
var $trial_ektensi_text=call substr $val=$source_doc;$start=($start_ektensi_text+3);$length=($end_ektensi_text-$start_ektensi_text-3);
# CEK EKTENSI KODE
var $cek_ektensi_text_start=call substr $val=$source_doc;$start=$start_ektensi_text;$length=3;
var $cek_ektensi_text_end=call substr $val=$source_doc;$start=$end_ektensi_text;$length=3;
var $cek_ektensi_text=$cek_ektensi_text_start$cek_ektensi_text_end
# CEK EKTENSI
if $cek_ektensi_text==******
var $ektensi=$trial_ektensi_text
else
var $ektensi=Tidak diketahui
endif
# FILE SIZE TEXT
var $start_size=call strpos $haystack=$source_doc;$needle=SIZE=;$offset=0;
var $end_size=call strripos $haystack=$source_doc;$needle==SIZE;$offset=0;
var $trial_file_size_text=call substr $val=$source_doc;$start=($start_size+5);$length=($end_size-$start_size-5);
# CEK SIZE KODE
var $cek_size_start=call substr $val=$source_doc;$start=$start_size;$length=5;
var $cek_size_end=call substr $val=$source_doc;$start=$end_size;$length=5;
var $cek_size=$cek_size_start$cek_size_end
# CEK SIZE
if $cek_size==SIZE==SIZE
var $file_size_text=$trial_file_size_text
else
var $file_size_text=Tidak diketahui
endif
# LINK FILE
var $start_link=call strpos $haystack=$source_doc;$needle=F@;$offset=0;
var $start_title_link=call strpos $haystack=$source_doc;$needle=#*#;$offset=0;
var $end_link=call strripos $haystack=$source_doc;$needle=@F;$offset=0;
var $urlink=call substr $val=$source_doc;$start=($start_link+2);$length=($start_title_link-$start_link-2);
var $link_name=call substr $val=$source_doc;$start=($start_title_link+3);$length=($end_link-$start_title_link-3);
var $urlink=call str_ireplace $subject=$urlink;$search=http://;$replace=;
var $urlink=call str_ireplace $subject=$urlink;$search=https://;$replace=;
var $urlink=[$dfold|$urlink@$file_name]
var $compress=call base64_encode $val=$urlink
var $filelink=$link_name
# CEK URL KODE
var $cek_file_start=call substr $val=$source_doc;$start=$start_link;$length=2;
var $cek_file_end=call substr $val=$source_doc;$start=$start_title_link;$length=3;
var $cek_file_link=$cek_file_start$cek_file_end
var $cek_link_end=call substr $val=$source_doc;$start=$end_link;$length=2;
var $cek_filelink=$cek_file_start$cek_file_end$cek_link_end
if $cek_filelink==F@#*#@F
var $file_link=$filelink
else
var $file_link=Salah tuh penulisannya bro. Gunakan TAG: F@ #*# @F untuk menginput file importnya CONTOH: F@link.com/file.zip#*#TUTORIAL@F Perbaiki sekarang
endif
# PILIHAN JENIS FILE
if $ektensi==zip
var $file_extension=.$ektensi, application/x-compressed
elseif $ektensi==rar
var $file_extension=.$ektensi, application/rar
elseif $ektensi==gzip
var $file_extension=.$ektensi, application/x-gzip
elseif $ektensi==tar
var $file_extension=.$ektensi, application/x-tar
elseif $ektensi==apk
var $file_extension=.$ektensi, application/vnd.android.package-archive
elseif $ektensi==sis
var $file_extension=.$ektensi, application/vnd.symbian.install
elseif $ektensi==sisx
var $file_extension=.$ektensi, application/vnd.symbian.install
elseif $ektensi==bin
var $file_extension=.$ektensi, application/octet-stream
elseif $ektensi==exe
var $file_extension=.$ektensi, application/octet-stream
elseif $ektensi==pdf
var $file_extension=.$ektensi, application/pdf
elseif $ektensi==mif
var $file_extension=.$ektensi, application/x-frame
elseif $ektensi==swf
var $file_extension=.$ektensi, application/x-shockwave-flash
elseif $ektensi==js
var $file_extension=.$ektensi, application/x-javascript
elseif $ektensi==aac
var $file_extension=.$ektensi, audio/acc
elseif $ektensi==txt
var $file_extension=.$ektensi, text/plain
elseif $ektensi==htm
var $file_extension=.$ektensi, text/html
elseif $ektensi==html
var $file_extension=.$ektensi, text/html
elseif $ektensi==mp3
var $file_extension=.$ektensi, audio/mpeg3
elseif $ektensi==mp4
var $file_extension=.$ektensi, video/mpeg4
elseif $ektensi==flv
var $file_extension=.$ektensi, video/x-flv
elseif $ektensi==mpe
var $file_extension=.$ektensi, video/mpeg
elseif $ektensi==mpeg
var $file_extension=.$ektensi, video/mpeg
elseif $ektensi==avi
var $file_extension=.$ektensi, video/avi
elseif $ektensi==jpg
var $file_extension=.$ektensi, image/jpg
elseif $ektensi==jpeg
var $file_extension=.$ektensi, image/jpeg
elseif $ektensi==gif
var $file_extension=.$ektensi, image/gif
elseif $ektensi==bmp
var $file_extension=.$ektensi, image/x-windows-bmp
elseif $ektensi==ico
var $file_extension=.$ektensi, image/x-icon
else
var $file_extension=$ektensi
endif
# SORTIR FILE IMPORT FILE PART DAN FILE ASLI
if $file_ektensi==imp
var $action_link=$urlfile
var $file_info_type=$file_extension
var $file_info_size=$file_size_text
var $file_description=$description
elseif $file_ektensi==part
var $action_link=#download
var $file_info_type=$file_extension
var $file_info_size=$file_size_text
var $file_description=$description
else
var $action_link=$subpath$folder/$file_name?xt_download=1
var $file_info_type=.$file_ektensi, $file_mime
var $file_info_size=$file_size
var $file_description=$source_doc
endif
# FILE BASE PARSED
var $filelist_parsed=
var $start_parsed=call strpos $haystack=$filelist_parsed;$needle=#;$offset=0;
var $file_name_base_parsed=call substr $val=$filelist_parsed;$start=0;$length=$start_parsed;
var $cek_folder=call strlen $val=$sub_folder
var $cek_sub=call strlen $val=$sub
var $cek_file=call strlen $val=$file
var $cek_myfiles=call strlen $val=$file_name_base
var $repl_sub=sub=$sub_folder
var $repl_file=file=$file_name_base
var $srch_sub=sub=$sub
var $srch_file=file=$file
var $get_urlpg=http://dhe-ond.wap.sh/download.php?ct=Aplikasi Android&file=gta v.1.6
var $get_sub=call str_ireplace $subject=$get_urlpg;$search=$srch_sub;$replace=$repl_sub;
var $get_url_ori=call str_ireplace $subject=$get_sub;$search=$srch_file;$replace=$repl_file;
if $cek_sub < $cek_folder
var $wrongct=yang ber-kategori $folder_base
endif
if $cek_file < $cek_myfiles
var $wrongfl=dengan file yang bernama $file_name_base_parsed
endif
if $cek_file < $cek_myfiles
var $meaning=
Mungkin kategori yang dimaksud adalah $folder_base $wrongfl
endif
print $meaning
print {{
$header
Download
Nama:
$file_name_base_parsed
Jenis:
$file_info_type
Ukuran:
$file_info_size
$ori_size
Kategori:
$folder_base
Diterbitkan pada: $time
}}
var $cek_thumb=call source $file=$subpath$folder/image/$file_name_base.png;$html_safe=0;
if $cek_thumb
var $imgthumb=
else
var $imgthumb=
endif
print {{
$imgthumb
$file_name_base_parsed
}}
if $file_link
var $file_link_text=$file_link
endif
if $title_part
var $title_part_text=$title_part
endif
if $file_ektensi==part
print {{
Unduh
$file_link_text $title_part_text
}}
else
print
print
endif
# PART LINK LOOPING
var $up=1
@part
var $start_link_part=call strpos $haystack=$source_doc;$needle=PL#;$offset=$set_part;
var $start_title_link_part=call strpos $haystack=$source_doc;$needle=#@#;$offset=$set_part;
var $end_link_part=call strpos $haystack=$source_doc;$needle=#PL;$offset=$set_part;
var $urlink_part=call substr $val=$source_doc;$start=($start_link_part+3);$length=($start_title_link_part-$start_link_part-3);
var $urlink_part=call str_ireplace $subject=$urlink_part;$search=http://;$replace=;
var $urlink_part=call str_ireplace $subject=$urlink_part;$search=https://;$replace=;
var $link_part_name=call substr $val=$source_doc;$start=($start_title_link_part+3);$length=($end_link_part-$start_title_link_part-3);
var $compress_part=call base64_encode $val=[$dfold|$urlink_part@$file_name]
var $filelink_part=$link_part_name
if $file_ektensi==part
print $filelink_part
endif
var $set_part=call strpos $haystack=$source_doc;$needle=PL#;$offset=($start_link_part+2);
var $up=($up+1)
if $set_part > 0
goto @part
endif
if $file_ektensi==part
print
endif
var $urlpg=http://dhe-ond.wap.sh/download.php?ct=Aplikasi Android&file=gta v.1.6
var $urlpg=call str_ireplace $subject=$urlpg;$search=&view_image=$view_image;$replace=;
var $temp=
var $temp=call htmlspecialchars $val=$temp
var $imgshots=
if $file_description
print {{
Deskripsi:
$file_description
}}
endif
var $urlpg=call str_ireplace $subject=$urlpg;$search=&view_image=$view_image;$replace=;
var $get_img=call hex2bin $val=$view_image
var $cek_img_fol=call source $file=$subpath$folder/image/$get_img;$html_safe=0;
if $cek_img_fol
var $pre_img=
else
var $pre_img=
MAAF, gambar tidak tersedia. :(
endif
if $view_image
var $preview_img=$pre_img
endif
if $imgshots
print {{
Screenshot:
$preview_img
}}
endif
@looping
var $start_name=call strpos $haystack=$imgshots;$needle=[;$offset=$set;
var $start_img=call strpos $haystack=$imgshots;$needle=|;$offset=$set;
var $name_img=call substr $val=$imgshots;$start=($start_name+1);$length=($start_img-$start_name-1);
var $end_img=call strpos $haystack=$imgshots;$needle=];$offset=$set;
var $imgs_thumb=call substr $val=$imgshots;$start=($start_img+1);$length=($end_img-$start_img-1);
var $imgs=call bin2hex $val=$name_img
if $imgshots
print $imgs_thumb
endif
var $set=call strpos $haystack=$imgshots;$needle=[;$offset=($set+2);
if $set > 0
goto @looping
endif
if $imgshots
print
endif
print
print $footer
goto @end
@get_files
var $uncompress=call base64_decode $val=$get
var $start_folder=call strpos $haystack=$uncompress;$needle=[;$offset=0;
var $end_folder=call strpos $haystack=$uncompress;$needle=|;$offset=0;
var $start_file=call strripos $haystack=$uncompress;$needle=@;$offset=0;
var $end_link=call strripos $haystack=$uncompress;$needle=];$offset=0;
var $folder=call substr $val=$uncompress;$start=($start_folder+1);$length=($end_folder-1);
var $file=call substr $val=$uncompress;$start=($start_file+1);$length=($end_link-$start_file-1);
var $url=call substr $val=$uncompress;$start=($end_folder+1);$length=($start_file-$end_folder-1);
var $get_url_js=
var $get_url_meta=
var $hide=
var $error=Terjadi kesalahan! File tidak ditemukan. $hide
var $note=
Pengalihan!
Jika Anda tidak di alihkan. Pergi ke: http://$url
var $redirect=$hide $get_url_js $get_url_meta $note
if $folder
var $fine=$folder
else
var $fine=404DHEOND
endif
var $cek_folder=
var $folder =$subpath/$cek_folder
if $file
var $sip=$file
else
var $sip=404DHEOND
endif
var $cek_file=
if $cek_file
print $redirect
else
print $error
endif
@end
@ending