mainframed

#!/bin/bash
# This output goes in to <whatever>.VTAMLST(A0TCP)
echo "[+] Creating 00 through 99 LUs for" $1
STRLENGTH=`echo -n $1 | wc -m`
if [ "$STRLENGTH" -ne "6" ] ; then
  echo "[!] The name you entered ($1) not long enough."
  echo "[!] Must be 6 characters long"
  exit
fi

mainframed

#!/bin/bash

for i in {11..99}; do
  echo "A06TSO$i APPL  AUTH=(NOACQ,NOBLOCK,PASS,NOTCAM,NVPACE,TSO,NOPO),       X"
  echo "               EAS=1,ACBNAME=TSO00$i                                    "
  echo "*"
done

mainframed

/* REXX */
/* Change port to user number */
/* i.e. EVIL21 set port to 55521 */
p = '46290'
mf_ip = '0.0.0.0'
n = "25"x
txt = ''
r = "READY"||n
s = SOCKET('INITIALIZE','DAEMON',2)
s = SOCKET('SOCKET')

mainframed

!Add this to your x3270 profile in your home folder (~/.x3270pro)
x3270.model: 2
! First we set the color scheme to the name demo
x3270.colorScheme: demo
! Then we set the colors we need
! These colors were picked for the class
x3270.colorScheme.demo: \
	black midnightBlue darkred brown \
	darkGreen midnightblue darkgoldenrod black \
	black midnightblue SaddleBrown purple \

mainframed

PROC 2 USER TOTAL                                 
CONTROL NOCAPS                                    
WRITE *** Protecting users &USER 1 to &USER &TOTAL
DO &COUNT = 1 TO &TOTAL                           
   ALU &USER&COUNT NOPASS                         
END                                               
WRITE *** DONE                                    

mainframed

//RACROUTE JOB (ACCT),                                 
//             '                    ',                 
//             CLASS=A,                                
//             MSGCLASS=X,                             
//             MSGLEVEL=(1,1),                         
//             REGION=0M,                              
//             NOTIFY=&SYSUID 
//*
//* From David Spiegel 2016
//*

mainframed

//<USERID> JOB (ACCT),                                 
//             '                    ',                 
//             CLASS=A,                                
//             MSGCLASS=X,                             
//             MSGLEVEL=(1,1),                         
//             REGION=0M
//UNIXCMD   EXEC PGM=BPXBATCH,REGION=800M
//STDPARM   DD *
SH find . -type f -exec ls -s {} \; > /tmp/t
/*

mainframed

//SOF1C    JOB (ASSY),'COMPILE IT',CLASS=A,MSGCLASS=Y,        
//         NOTIFY=&SYSUID,MSGLEVEL=(1,1)                     
//* Use this JCL to compile HLASM in TEST mode
//* So you can use TSO TEST to debug
//         SET FILE=APFLISTC
//ASM      EXEC PROC=HLASMCL,PARM.L=(TEST),PARM.C=(TEST)     
//SYSIN    DD   DSN=SOF.ASM.SOURCE(&FILE),DISP=(SHR)        
//C.SYSLIB DD  DISP=SHR,DSN=SYS1.MACLIB                      
//         DD  DISP=SHR,DSN=SYS1.MODGEN                      
//L.SYSLMOD DD DSN=SOF.ASM.BIN(&FILE),DISP=(SHR)            

mainframed

#!/usr/bin/env python
import tweepy
import sys

# argument 1 is the tweet, argument 2 is the path to the image

def get_api(cfg):
  auth = tweepy.OAuthHandler(cfg['consumer_key'], cfg['consumer_secret'])
  auth.set_access_token(cfg['access_token'], cfg['access_token_secret'])
  return tweepy.API(auth)

mainframed