Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
AttrDialog.py	14 KB	-rw-r--r--	2020-04-19 21:13
AttrDialog.pyc	18.33 KB	-rw-r--r--	2024-04-10 04:58
AttrDialog.pyo	18.33 KB	-rw-r--r--	2024-04-10 04:58
ManPage.py	6.7 KB	-rw-r--r--	2020-04-19 21:13
ManPage.pyc	6.27 KB	-rw-r--r--	2024-04-10 04:58
ManPage.pyo	6.27 KB	-rw-r--r--	2024-04-10 04:58
MimeViewer.py	4.39 KB	-rwxr-xr-x	2024-04-10 04:57
MimeViewer.pyc	4.83 KB	-rw-r--r--	2024-04-10 04:58
MimeViewer.pyo	4.83 KB	-rw-r--r--	2024-04-10 04:58
ShellWindow.py	4.07 KB	-rw-r--r--	2020-04-19 21:13
ShellWindow.pyc	5.47 KB	-rw-r--r--	2024-04-10 04:58
ShellWindow.pyo	5.47 KB	-rw-r--r--	2024-04-10 04:58
brownian.py	1.07 KB	-rw-r--r--	2020-04-19 21:13
brownian.pyc	1.59 KB	-rw-r--r--	2024-04-10 04:58
brownian.pyo	1.59 KB	-rw-r--r--	2024-04-10 04:58
brownian2.py	1.35 KB	-rw-r--r--	2020-04-19 21:13
brownian2.pyc	1.74 KB	-rw-r--r--	2024-04-10 04:58
brownian2.pyo	1.74 KB	-rw-r--r--	2024-04-10 04:58
canvasevents.py	6.45 KB	-rwxr-xr-x	2024-04-10 04:57
canvasevents.pyc	10.46 KB	-rw-r--r--	2024-04-10 04:58
canvasevents.pyo	10.46 KB	-rw-r--r--	2024-04-10 04:58
dialog.py	3.13 KB	-rwxr-xr-x	2024-04-10 04:57
dialog.pyc	3.11 KB	-rw-r--r--	2024-04-10 04:58
dialog.pyo	3.11 KB	-rw-r--r--	2024-04-10 04:58
electrons.py	2.27 KB	-rwxr-xr-x	2024-04-10 04:57
electrons.pyc	2.33 KB	-rw-r--r--	2024-04-10 04:58
electrons.pyo	2.33 KB	-rw-r--r--	2024-04-10 04:58
hanoi.py	4.54 KB	-rw-r--r--	2020-04-19 21:13
hanoi.pyc	3.82 KB	-rw-r--r--	2024-04-10 04:58
hanoi.pyo	3.82 KB	-rw-r--r--	2024-04-10 04:58
hello.py	331 B	-rw-r--r--	2020-04-19 21:13
hello.pyc	701 B	-rw-r--r--	2024-04-10 04:58
hello.pyo	701 B	-rw-r--r--	2024-04-10 04:58
imagedraw.py	509 B	-rw-r--r--	2020-04-19 21:13
imagedraw.pyc	1.13 KB	-rw-r--r--	2024-04-10 04:58
imagedraw.pyo	1.13 KB	-rw-r--r--	2024-04-10 04:58
imageview.py	205 B	-rw-r--r--	2020-04-19 21:13
imageview.pyc	570 B	-rw-r--r--	2024-04-10 04:58
imageview.pyo	570 B	-rw-r--r--	2024-04-10 04:58
kill.py	3.79 KB	-rwxr-xr-x	2024-04-10 04:57
kill.pyc	4.81 KB	-rw-r--r--	2024-04-10 04:58
kill.pyo	4.81 KB	-rw-r--r--	2024-04-10 04:58
listtree.py	991 B	-rw-r--r--	2020-04-19 21:13
listtree.pyc	1.5 KB	-rw-r--r--	2024-04-10 04:58
listtree.pyo	1.5 KB	-rw-r--r--	2024-04-10 04:58
mbox.py	7.3 KB	-rwxr-xr-x	2024-04-10 04:57
mbox.pyc	8.17 KB	-rw-r--r--	2024-04-10 04:58
mbox.pyo	8.17 KB	-rw-r--r--	2024-04-10 04:58
newmenubardemo.py	1.2 KB	-rwxr-xr-x	2024-04-10 04:57
newmenubardemo.pyc	1.59 KB	-rw-r--r--	2024-04-10 04:58
newmenubardemo.pyo	1.59 KB	-rw-r--r--	2024-04-10 04:58
optionmenu.py	441 B	-rw-r--r--	2020-04-19 21:13
optionmenu.pyc	594 B	-rw-r--r--	2024-04-10 04:58
optionmenu.pyo	594 B	-rw-r--r--	2024-04-10 04:58
paint.py	1.85 KB	-rw-r--r--	2020-04-19 21:13
paint.pyc	2.19 KB	-rw-r--r--	2024-04-10 04:58
paint.pyo	2.19 KB	-rw-r--r--	2024-04-10 04:58
rmt.py	4.39 KB	-rwxr-xr-x	2024-04-10 04:57
rmt.pyc	4.93 KB	-rw-r--r--	2024-04-10 04:58
rmt.pyo	4.93 KB	-rw-r--r--	2024-04-10 04:58
solitaire.py	17.37 KB	-rwxr-xr-x	2024-04-10 04:57
solitaire.pyc	20.41 KB	-rw-r--r--	2024-04-10 04:58
solitaire.pyo	20.41 KB	-rw-r--r--	2024-04-10 04:58
sortvisu.py	18.89 KB	-rwxr-xr-x	2024-04-10 04:57
sortvisu.pyc	23.18 KB	-rw-r--r--	2024-04-10 04:58
sortvisu.pyo	23.18 KB	-rw-r--r--	2024-04-10 04:58
ss1.py	25.57 KB	-rw-r--r--	2020-04-19 21:13
ss1.pyc	31.67 KB	-rw-r--r--	2024-04-10 04:58
ss1.pyo	31.07 KB	-rw-r--r--	2024-04-10 04:58
svkill.py	4.75 KB	-rwxr-xr-x	2024-04-10 04:57
svkill.pyc	5.8 KB	-rw-r--r--	2024-04-10 04:58
svkill.pyo	5.8 KB	-rw-r--r--	2024-04-10 04:58
switch.py	1.52 KB	-rw-r--r--	2020-04-19 21:13
switch.pyc	2.85 KB	-rw-r--r--	2024-04-10 04:58
switch.pyo	2.85 KB	-rw-r--r--	2024-04-10 04:58
tkman.py	8.79 KB	-rwxr-xr-x	2024-04-10 04:57
tkman.pyc	8.88 KB	-rw-r--r--	2024-04-10 04:58
tkman.pyo	8.88 KB	-rw-r--r--	2024-04-10 04:58
wish.py	623 B	-rw-r--r--	2020-04-19 21:13
wish.pyc	737 B	-rw-r--r--	2024-04-10 04:58
wish.pyo	737 B	-rw-r--r--	2024-04-10 04:58

Rename

#! /usr/bin/python2.7

# A Python program implementing rmt, an application for remotely
# controlling other Tk applications.
# Cf. Ousterhout, Tcl and the Tk Toolkit, Figs. 27.5-8, pp. 273-276.

# Note that because of forward references in the original, we
# sometimes delay bindings until after the corresponding procedure is
# defined.  We also introduce names for some unnamed code blocks in
# the original because of restrictions on lambda forms in Python.

# XXX This should be written in a more Python-like style!!!

from Tkinter import *
import sys

# 1. Create basic application structure: menu bar on top of
# text widget, scrollbar on right.

root = Tk()
tk = root.tk
mBar = Frame(root, relief=RAISED, borderwidth=2)
mBar.pack(fill=X)

f = Frame(root)
f.pack(expand=1, fill=BOTH)
s = Scrollbar(f, relief=FLAT)
s.pack(side=RIGHT, fill=Y)
t = Text(f, relief=RAISED, borderwidth=2, yscrollcommand=s.set, setgrid=1)
t.pack(side=LEFT, fill=BOTH, expand=1)
t.tag_config('bold', font='-Adobe-Courier-Bold-R-Normal-*-120-*')
s['command'] = t.yview

root.title('Tk Remote Controller')
root.iconname('Tk Remote')

# 2. Create menu button and menus.

file = Menubutton(mBar, text='File', underline=0)
file.pack(side=LEFT)
file_m = Menu(file)
file['menu'] = file_m
file_m_apps = Menu(file_m, tearoff=0)
file_m.add_cascade(label='Select Application', underline=0,
                   menu=file_m_apps)
file_m.add_command(label='Quit', underline=0, command=sys.exit)

# 3. Create bindings for text widget to allow commands to be
# entered and information to be selected.  New characters
# can only be added at the end of the text (can't ever move
# insertion point).

def single1(e):
    x = e.x
    y = e.y
    t.setvar('tk_priv(selectMode)', 'char')
    t.mark_set('anchor', At(x, y))
    # Should focus W
t.bind('<1>', single1)

def double1(e):
    x = e.x
    y = e.y
    t.setvar('tk_priv(selectMode)', 'word')
    t.tk_textSelectTo(At(x, y))
t.bind('<Double-1>', double1)

def triple1(e):
    x = e.x
    y = e.y
    t.setvar('tk_priv(selectMode)', 'line')
    t.tk_textSelectTo(At(x, y))
t.bind('<Triple-1>', triple1)

def returnkey(e):
    t.insert(AtInsert(), '\n')
    invoke()
t.bind('<Return>', returnkey)

def controlv(e):
    t.insert(AtInsert(), t.selection_get())
    t.yview_pickplace(AtInsert())
    if t.index(AtInsert())[-2:] == '.0':
        invoke()
t.bind('<Control-v>', controlv)

# 4. Procedure to backspace over one character, as long as
# the character isn't part of the prompt.

def backspace(e):
    if t.index('promptEnd') != t.index('insert - 1 char'):
        t.delete('insert - 1 char', AtInsert())
        t.yview_pickplace(AtInsert())
t.bind('<BackSpace>', backspace)
t.bind('<Control-h>', backspace)
t.bind('<Delete>', backspace)

# 5. Procedure that's invoked when return is typed:  if
# there's not yet a complete command (e.g. braces are open)
# then do nothing.  Otherwise, execute command (locally or
# remotely), output the result or error message, and issue
# a new prompt.

def invoke():
    cmd = t.get('promptEnd + 1 char', AtInsert())
    if t.getboolean(tk.call('info', 'complete', cmd)): # XXX
        if app == root.winfo_name():
            msg = tk.call('eval', cmd) # XXX
        else:
            msg = t.send(app, cmd)
        if msg:
            t.insert(AtInsert(), msg + '\n')
        prompt()
    t.yview_pickplace(AtInsert())

def prompt():
    t.insert(AtInsert(), app + ': ')
    t.mark_set('promptEnd', 'insert - 1 char')
    t.tag_add('bold', 'insert linestart', 'promptEnd')

# 6. Procedure to select a new application.  Also changes
# the prompt on the current command line to reflect the new
# name.

def newApp(appName):
    global app
    app = appName
    t.delete('promptEnd linestart', 'promptEnd')
    t.insert('promptEnd', appName + ':')
    t.tag_add('bold', 'promptEnd linestart', 'promptEnd')

def fillAppsMenu():
    file_m_apps.add('command')
    file_m_apps.delete(0, 'last')
    names = root.winfo_interps()
    names = list(names)
    names.sort()
    for name in names:
        try:
            root.send(name, 'winfo name .')
        except TclError:
            # Inoperative window -- ignore it
            pass
        else:
            file_m_apps.add_command(
                label=name,
                command=lambda name=name: newApp(name))

file_m_apps['postcommand'] = fillAppsMenu
mBar.tk_menuBar(file)

# 7. Miscellaneous initialization.

app = root.winfo_name()
prompt()
t.focus()

root.mainloop()