Found something I bought and tested, it is a great buy on AMazon
Comes with 32 gig card , carrying case, cloth and usb micro cable
https://youtu.be/7lgOjcmjnTI see demo
Ugly but works.
Found something I bought and tested, it is a great buy on AMazon
Comes with 32 gig card , carrying case, cloth and usb micro cable
https://youtu.be/7lgOjcmjnTI see demo
import tweepy
import logging
import os
from dotenv import load_dotenv
# Loads the .env file for the credentials
load_dotenv()
# Credentials set in the .env file
consumer_key = os.environ.get('consumer_key')
print('consumer_key:',consumer_key)
consumer_secret = os.environ.get('consumer_secret')
print('consumer_secret:',consumer_secret)
access_token = os.environ.get('access_token')
print('access_token:',access_token)
access_token_secret = os.environ.get('access_token_secret')
print('access_token_secret:',access_token_secret)
auth = tweepy.OAuthHandler(consumer_key, consumer_secret)
auth.set_access_token(access_token, access_token_secret)
# auth = tweepy.OAuth2AppHandler(consumer_key, consumer_secret)
api = tweepy.API(auth)
output = open('stream_output.txt', 'w')
friends = []
screen_name = 'lansa'
print(f"Friends (accounts {screen_name} follows)")
for page in tweepy.Cursor(api.get_friends, screen_name=screen_name,
count=20).pages(1):
for user in page:
name = f"{user.id} - {user.name} (@{user.screen_name})"
print(name)
friends.append(name)
api.create_friendship(user_id=user.id)
print(len(page))
print(f"Friends: {len(friends)}")
Be sure to create your environment variables first for keys and tokens. Follows first 20 followers of lansa
LANSA REQUEST(IMPORT)
PARM02(‘MAMLIB/MAMLIBSAVF’)
PARM03(QSYSOPR)
PARM04(‘AS/400’)
PARTITION(‘TST’)
LANGUAGE(‘ENG ‘)
parm01 – blank
parm02- qualified name
parm03- what message que
parm04-‘as/400’
LANSA EXPORT COMMAND FORMAT
LANSA REQUEST(EXPORT)
PARM01(AAAATOK)
PARM03(‘mamlib/mamlibsavf’)
PARTITION(‘DEV’)
LANGUAGE(‘ENG ‘)
parm01 – export name
parm02- blank
parm03-qualified name
Partition- Must be specified
Language- Optional
Do not code VL LANSA 14 Web without understanding this
#SYS_WEB.Console.LOG((‘Subroutine Executed’ + #SUBNAME.Caption))
Press F12 and click on Console to see your audit trail / Debug
https://docs.lansa.com/14/en/lansa017/content/lansa/vlwebeng01_0275.htm
command line example windows 10
C:\Windows\System32\WindowsPowerShell\v1.0>powershell.exe C:\Users\markm\Documents\powershell\pwemail03.ps1 markmason@gmail.com ‘”Hello World”‘ RANDY
program pwemail03.ps1
write-host “There are a total of $($args.count) arguments”
for ( $i = 0; $i -lt $args.count; $i++ ) {
write-host “Argument $i is $($args[$i])”
}
$emailtoparm=$args[0]
$envname=$args[1]
write-host “If this script were really going to do something, it would do it on $emailtoparm in the $envname environment”
$EmailFrom = “markmason12@outlook.com”
$EmailTo = $emailtoparm
$Subject = “The subjects $emailtoparm”
$Body = $envname
$SMTPServer = “smtp.gmail.com”
$SMTPClient = New-Object Net.Mail.SmtpClient($SmtpServer, 587)
$SMTPClient.EnableSsl = $true
$SMTPClient.Credentials = New-Object System.Net.NetworkCredential(“mark”, “lansababy”);
$SMTPClient.Send($EmailFrom, $EmailTo, $Subject, $Body)
Start-Sleep -Seconds 8
Dumps file fields as comments
(from here you can modify to build group by ect..)
/* ********** ======================================================= */
/* ********** GET NAME OF JUST ONE PHYSICAL FILE */
/* ********** ======================================================= */
@@GET_FILS TO(1) PROMPT('Enter the name of the PHYSICAL file to be used by this template') EXTEND('The file name may be specified in full, partially (to cause a partial list' 'of available files to be displayed) or left blank (to cause a full list of' 'available files to be displayed). When a list of files is displayed, the' 'file required may be selected from the list.' ' ' 'Use the HELP function key for more details about this template and' 'examples of the type of RDML applications it can create.') HELPIDS(HELP010 HELP020 HELP030 HELP040 HELP050)
@@COMMENT COMMENT('=======================================================')
@@COMMENT COMMENT(' Simple File Dump ')
@@COMMENT COMMENT(' ')
@@COMMENT COMMENT(' @@FNAME01 - Field List ')
@@COMMENT COMMENT(' ')
@@COMMENT COMMENT(' Template - Z_Filedump ')
@@COMMENT COMMENT(' ')
@@COMMENT COMMENT(' FILE INFO ')
@@COMMENT COMMENT(' @@FLIBR01 - File Library ')
@@COMMENT COMMENT(' @@FVERS01 - File Version No ')
@@COMMENT COMMENT(' @@FTYPE01 - File Type ')
@@COMMENT COMMENT(' @@FNAME01 - File Name ')
@@COMMENT COMMENT('=======================================================')
/* ********** ======================================================= */
/* ********** GET FIELDS OF CHOSEN FILE INTO LIST 1 */
/* ********** ======================================================= */
@@CLR_LST NUMBER(1)
@@RTV_FLDS FROM_FILE(1) INTO_LST(1)
/* ********** ======================================================= */
/* ********** GET KEYS OF CHOSEN FILE INTO LIST 2 */
/* ********** ======================================================= */
@@CLR_LST NUMBER(2)
@@RTV_KEYS OF_FILE(1) INTO_LST(2)
/* ********** ======================================================= */
/* ********** GET USER TO CHOOSE FIELDS TO APPEAR ON PANEL */
/* ********** AND PUT RESULTS INTO LIST 3 */
/* ********** ======================================================= */
@@CLR_LST NUMBER(3)
@@MAK_LSTS FROM_LSTS(1) FORCE_LSTS(2) INTO_LSTS((3 'Fields to' 'Appear in' 'Comments ' *SEQUENCE *ALL)) HELPIDS(HELP010 HELP020 HELP030 HELP040 HELP050)
@@COMMENT 'Function control options'
@@SET_IDX IDX_NAME(DP) TO(1)
@@SET_IDX IDX_NAME(KF) TO(1)
K30: @@LABEL
@@CMP_IDX IDX_NAME(KF) IDX_VALUE(@@LNE03) IF_GT(K40)
@@COMMENT COMMENT('#@@LEL03KF TYPE(@@LTP03KF) @@LDS03KF @@LAT03KF')
@@INC_IDX IDX_NAME(DP)
@@INC_IDX IDX_NAME(KF)
@@GOTO LABEL(K30)
K40: @@LABEL
/* ********** ======================================================= */
/* ********** CLEAR ALL LISTS USED */
/* ********** ======================================================= */
@@CLR_LST NUMBER(1)
@@CLR_LST NUMBER(2)
@@CLR_LST NUMBER(3)
(260) 2ZoomMe
(606) POOCHIE
(321) 341-PAIN – Space Coast
(434) 686PAIN (86 Pain)
(930) 600-1212
(628) 213-PAIN – San Francisco
(562) 31SPINE – Long Beach CA
(320) 525-0100
(818) 450-5978 – Burbank CA
(872) 259-0001 – Chicago IL
(702) POOCHIE
43 Hot or Not
(813) 592-HURT – Tampa FL
(813) PEE WALK – Tampa FL
(813) 733-PAIN – Tampa FL
(808) 320-HURT – Kauai HI
(260) 2ZoomUs
(214) 396-BIDS – Dallas TX
(434) 3MAGNUM
(743) 500-2020
(689) 210-HURT
(929) 55comic Comedian Prevention Hotline
(551) 400-8999
(321) 701-2426 KSC Rocket Launch
(872) 260-0001 Chicago IL
(818) 450-5357 Burbank CA
(213) 652-JOBS Los Angeles CA
(863) POOCHIE
(727) 758-CASH
(323) 904-PAIN
(252) 5TICKET
(336) 86FUNNY Comedian Prevention Hotline
I just found a texting chat bot that pays me $100 when I connect people to her! No really, check it out for yourself at http://EFTme.com and learn how she can do the same for you!
Oh and BTW: You can also generate leads for your primary business with this! It’s the coolest.
Tiktok uses live texting to connect you with like minded individuals. And I mean real like minded individuals. She doesn’t know if you’re 20 or 40 or 60, she knows you’re someone who likes to play games, drink coffee, travel, enjoy the beach, etc. The first 60 minutes of every chat is just you and her talking and learning about each other. After that, you can use the tool to start a relationship and build a connection that will hopefully lead to business meetings. And if you don’t have an existing relationship, she’ll also find a way to introduce you to a business contact, friend, or family member.
I know what you’re thinking. “Don’t we already have a text chat bot like this?” Of course we do. You may not know the name, but you can have a free conversation with IG @Text.Bot.AI right now. It’s very similar, but Tiktok is slightly more powerful. Plus, you get to use real money for it.
So what does Tiktok look like? It’s a stunning screen saver I guess. Check it out for yourself here.