`@\Cn̴dd ( @ (//(  0/80@0?/8 0( ?G@POWOXOP?H0@/7@O_``h_hPX 0(P_oppxow_g@O/8'' 7p`o?G/7 0??H/8`/o?GOX@H0?/pOW?H/8 7OP?G/7( P0@PX@O0@ 0O @H/@' 00@@P0?'_OP@H( 7/7' ^^^^^^^^^^^^^^^^^^^^^^^^^^TeeBBBBeTT^^^^^^^eBDJ33333JJDBeZ^^^^TD33==#####==3JDBT^^^^eJ=###=3DeZ^^TB3# #=3JBZ^^T3#  #=JBT^^J# Sll #=JBZ^T# %,68??86,/@A*< ##45('.6787-9%:;*<=#$+&,--.,/01)2 3 $%&&'%($!)* ##  !"#     ??dGh?@ spr_new xKKBANj@>B}"QB킠]@(_>^jZ>9ڢa~3㓖NYDq=Um=S4A5N:g8fÖL &_1=Do@vAg$Lsm3>L—,tLf1-a#FǍWL""aƏio7' _xikJ ̇1茸! D\&^]_)*IQ!L9 ?婚r>?ÂL T-؇׊\T2(9]>> JTS%-!F˷Y7k*:n$mhV7\+R@LcgBDYËbəƛe^/QUy 6xSmX7yMq spr_saveas Zxo@YLOi$YB0MH$r~tAD)G ju'*N58}h*.{wR]7z=)UYal;rvBN|&1M#y $I^wJ|}wUx\$mxaEGQeEq<?Tw#)-vx۶u}Jil*Jw;ݘ&Zj|] g{=c %Dhx>I"GZ top + h - 1 { top = py - h + 1 } if px < left { left = px } if px > left + w - 1 { left = px - w + 1 } if line[0] = "" && lines = 1 && file = "" { saved = true } room_caption = "Gamepad - " if file = "" { room_caption += "Untitled Document" } else { room_caption += file_name(file) } if !saved { room_caption += "*" } room_caption += " ("+string(obj_right.size)+"b)" if mouse_x > x && mouse_y > y && mouse_x < x + w*tw && mouse_y < y + h*th { mx = (mouse_x - x) / tw my = (mouse_y - y) / th cursor = cr_beam } else { cursor = cr_default } set_cursor(cursor) if top + h > max(h,lines) { top = lines - h }0000000.[keyboard_clear(vk_delete) saved = false if px = string_length(line[py]) { if py = lines - 1 { exit } line[py] += line[py+1] for (m = py+1; m < lines-1; m += 1) { line[m] = line[m+1] } lines -= 1 exit } line[py] = string_delete(line[py],px+1,1)0000000([bkeyboard_clear(vk_down) if py = lines - 1 { exit } py += 1 px = min(px,string_length(line[py]))0000000'[keyboard_clear(vk_right) if px = string_length(line[py]) && py = lines-1 { exit } px += 1 if px > string_length(line[py]) { py += 1 px = 0 }0000000&[Xkeyboard_clear(vk_up) if py = 0 { exit } py -= 1 px = min(px,string_length(line[py]))0000000%[xkeyboard_clear(vk_left) if px = 0 && py = 0 { exit } px -= 1 if px = -1 { py -= 1 px = string_length(line[py]) }0000000"[~keyboard_clear(vk_pagedown) top = max(0,min(top + h,lines-h)) py = min(py + h,lines-1) px = min(px,string_length(line[py]))0000000![ikeyboard_clear(vk_pageup) top = max(top - h,0) py = max(py - h,0) px = min(px,string_length(line[py]))0000000 [keyboard_clear(vk_enter) saved = false for (m = lines-1; m > py; m -= 1) { line[m+1] = line[m] } line[py+1] = string_copy(line[py],px+ins,string_length(line[py])-px) line[py] = string_copy(line[py],1,px) py += 1 px = 0 lines += 10000000[keyboard_clear(vk_backspace) saved = false if px = 0 { if py = 0 { exit } px = string_length(line[py-1]) line[py-1] += line[py] for (m = py; m < lines-1; m += 1) { line[m] = line[m+1] } lines -= 1 py -= 1 exit } line[py] = string_delete(line[py],px,1) px -= 10000000 [*if !mouse_check_button(mb_left) { exit } if cursor = cr_beam { py = min(floor(my+top),lines-1) px = min(round(mx+left),string_length(line[py])) if py < top { top = py } if py > top + h - 1 { top = py - h + 1 } if px < left { left = px } if px > left + w - 1 { left = px - w + 1 } }0000000[-pen_color = c_white brush_color = c_white draw_rectangle(x-2,y+1,x+w*tw,y+h*th+2) pen_color = c_black brush_color = c_black draw_line(x-2,y+1,x+w*tw,y+1) draw_line(x-2,y+1,x-2,y+h*th+2) draw_line(x+w*tw+15,y+1,x+w*tw+15,y+h*th+2) draw_line(x-2,y+h*th+17,x+w*tw,y+h*th+17) font_color = c_black font_align = fa_right draw_text(x+w*tw/2,y+h*th,string(px)+', '+string(py+1)) font_align = fa_left draw_text(x+w*tw/2,y+h*th,'/'+string(lines)) draw_text(0,0,"Made by IsmAvatar") for (m = top; m < min(top + h,lines); m += 1) { if m = py { font_color = c_red if ins = 1 draw_text(x+(px-left)*tw-tw/3,y+(m-top)*12,'|') else draw_text(x+(px-left)*tw-tw/3,y+(m-top)*12,'/') } font_color = c_black draw_text(x,y+(m-top)*12,string_copy(string_replace_all(line[m],'#','\#'),left+1,w)) }0000000x[if !saved { switch show_message_ext("File changed. Save changes?","Yes","No","Cancel") { case 1: keyboard_key_press(vk_f5) keyboard_key_release(vk_f5) break case 3: exit break } } lastfile = file file = get_open_filename("Text files (*.txt)|*.txt","") if file = "" { file = lastfile exit } if !file_exists(file) { file = file_change_ext(file,".txt") if !file_exists(file) { show_message(file+"#"+"File not found") file = lastfile exit } } file_open_read(file) for (lines = 0; !file_eof(); lines += 1) { line[lines] = file_read_string() file_readln() } file_close() top = 0 left = 0 px = 0 py = 0 saved = true0000000t[if file = "" { keyboard_key_press(vk_f4) keyboard_key_release(vk_f4) exit } file_open_write(file) for (m = 0; m < lines; m += 1) { file_write_string(line[m]) if m < lines - 1 { file_writeln() } } file_close() saved = true0000000s[lastfile = file file = get_save_filename("Text files (*.txt)|*.txt","") if file = "" { file = lastfile exit } if file_exists(file) { if !show_question("File exists. Overwrite?") { file = lastfile exit } } file_open_write(file) file_close() if !file_exists(file) { show_message("Could not save file") file = lastfile exit } f = file_open_write(file) for (m = 0; m < lines; m += 1) { file_write_string(line[m]) if m < lines - 1 { file_writeln() } } file_close() saved = true0000000q["if !saved { switch show_message_ext("File changed. Save changes?","Yes","No","Cancel") { case 1: keyboard_key_press(vk_f5) keyboard_key_release(vk_f5) break case 3: exit break } } lines = 1 top = 0 left = 0 px = 0 py = 0 line[0] = '' file = "" saved = true0000000-[ ins = 3 - ins0000000$[0px = 0 if keyboard_check(vk_control) { py = 0 }0000000#[Nif keyboard_check(vk_control) { py = lines - 1 } px = string_length(line[py])0000000obj_new [6keyboard_key_press(vk_f2) keyboard_key_release(vk_f2)0000000[ draw_this()0000000 obj_saveas [6keyboard_key_press(vk_f4) keyboard_key_release(vk_f4)0000000[ draw_this()0000000obj_save [6keyboard_key_press(vk_f5) keyboard_key_release(vk_f5)0000000[ draw_this()0000000obj_load [6keyboard_key_press(vk_f9) keyboard_key_release(vk_f9)0000000[ draw_this()0000000obj_up [Zx = obj_textbox.x + obj_textbox.w * obj_textbox.tw y = obj_textbox.y + 1 image_speed = 00000000[#image_index = (obj_textbox.top > 0)0000000[if image_index { obj_textbox.top -= 1 obj_textbox.py -= 1 obj_textbox.px = min(string_length(obj_textbox.line[obj_textbox.py]),obj_textbox.px) }0000000obj_down [{x = obj_textbox.x + obj_textbox.w * obj_textbox.tw y = obj_textbox.y + obj_textbox.h * obj_textbox.th + 2 image_speed = 00000000[Cimage_index = (obj_textbox.lines > obj_textbox.top + obj_textbox.h)0000000[if image_index { obj_textbox.top += 1 obj_textbox.py += 1 obj_textbox.px = min(string_length(obj_textbox.line[obj_textbox.py]),obj_textbox.px) }0000000obj_left [^x = obj_textbox.x - 2 y = obj_textbox.y + obj_textbox.h * obj_textbox.th + 2 image_speed = 00000000[$image_index = (obj_textbox.left > 0)0000000[Aif image_index { obj_textbox.left -= 1 obj_textbox.px -= 1 }0000000 obj_right [x = obj_textbox.x + obj_textbox.w * obj_textbox.tw y = obj_textbox.y + obj_textbox.h * obj_textbox.th + 2 ml = 0 size = 0 alarm = room_speed image_speed = 00000000[ml = 0 size = 0 for (m = 0; m < obj_textbox.lines; m += 1) { size += string_length(obj_textbox.line[m]) + 2 ml = max(string_length(obj_textbox.line[m]),ml) } size -= 2 alarm = room_speed0000000[6image_index = (obj_textbox.left + obj_textbox.w <= ml)0000000[Aif image_index { obj_textbox.left += 1 obj_textbox.px += 1 }0000000room0@F        @` 0@0@P P@P<{\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\fnil\fcharset0 Courier New;}{\f1\fnil Arial;}} {\colortbl ;\red0\green0\blue0;} \viewkind4\uc1\pard\cf1\b\f0\fs24 GamePad - GameMaker Notepad \par \b0 By Prophet IsmAvatar \par \par \b The Ten Commandments \par \b0 1) Thou shalt type freely within thy multi-line environment. \par 2) Thou shalt move thy cursor with thy arrow keys or mouse. \par 3) Thou shalt edit within lines. \par 4) Thou shalt, with moderate ease, delete letters, and overwrite letters (insert key) \par 5) Thou shalt jump around with the page-down/up, Home/End, or the scroll arrows. \par 6) Thou shalt modify thine environment (see the obj_textbox create event) \par 7) Thou shalt load in text files. (F9) \par 8) Thou shalt save text files. (F4 = save as. F5 = save) \par 9) Thou shalt erase all text. (F2 = new) \par 10) Thou shalt worship (give credit to) thine prophet, IsmAvatar\f1 \par } SpritesFilesspr_new spr_saveasspr_savespr_loadspr_boxarrowsspr_upspr_downspr_left spr_rightSounds BackgroundsPathsScripts draw_thisFile file_namefile_change_ext Data Files Time LinesObjects obj_textboxFileobj_new obj_saveasobj_saveobj_loadarrowsobj_upobj_downobj_left obj_rightRoomsroom0 Game Information Game Options